diff options
Diffstat (limited to 'stdlib/source/library/lux/target/jvm/bytecode/environment.lux')
-rw-r--r-- | stdlib/source/library/lux/target/jvm/bytecode/environment.lux | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/stdlib/source/library/lux/target/jvm/bytecode/environment.lux b/stdlib/source/library/lux/target/jvm/bytecode/environment.lux index bcef16e3e..cc3ff123c 100644 --- a/stdlib/source/library/lux/target/jvm/bytecode/environment.lux +++ b/stdlib/source/library/lux/target/jvm/bytecode/environment.lux @@ -37,17 +37,17 @@ (type: .public Condition (-> Environment (Try Environment))) -(implementation: .public monoid +(def: .public monoid (Monoid Condition) - - (def: identity - (|>> {try.#Success})) - - (def: (composite left right) - (function (_ environment) - (do try.monad - [environment (left environment)] - (right environment))))) + (implementation + (def: identity + (|>> {try.#Success})) + + (def: (composite left right) + (function (_ environment) + (do try.monad + [environment (left environment)] + (right environment)))))) (exception: .public discontinuity) |