diff options
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/lux/concurrency/stm.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/lux/concurrency/stm.lux b/stdlib/source/lux/concurrency/stm.lux index 9fef9f59e..eddaabf2b 100644 --- a/stdlib/source/lux/concurrency/stm.lux +++ b/stdlib/source/lux/concurrency/stm.lux @@ -127,13 +127,13 @@ [(#.Cons [var (read!! var) value] tx) []]))) -(struct: #export _ (Functor STM) +(structure: #export _ (Functor STM) (def: (map f fa) (function (_ tx) (let [[tx' a] (fa tx)] [tx' (f a)])))) -(struct: #export _ (Apply STM) +(structure: #export _ (Apply STM) (def: functor Functor<STM>) (def: (apply ff fa) @@ -142,7 +142,7 @@ [tx'' a] (fa tx')] [tx'' (f a)])))) -(struct: #export _ (Monad STM) +(structure: #export _ (Monad STM) (def: functor Functor<STM>) (def: (wrap a) |