diff options
author | Masaya Tojo <masaya@tojo.tokyo> | 2024-06-11 02:13:57 +0900 |
---|---|---|
committer | Masaya Tojo <masaya@tojo.tokyo> | 2024-06-11 02:13:57 +0900 |
commit | c20155977bc23c2be19842cc065e4444b304ecce (patch) | |
tree | 834bb05fb78995e5fd32721630cad9a3742c3a47 /examples/state.scm | |
parent | 552cd6c999f3e44b13be88e45c4a8cb391eb40cf (diff) |
Rename from `algebraic-structs` to `algebraic-structures`
Diffstat (limited to 'examples/state.scm')
-rw-r--r-- | examples/state.scm | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/examples/state.scm b/examples/state.scm index b649859..b1aedc6 100644 --- a/examples/state.scm +++ b/examples/state.scm @@ -35,12 +35,12 @@ [(x* . st**) ((f x) st*)]) (cons x* st**))))) -(import (only (algebraic-structs functor make)) - (only (algebraic-structs applicative make)) - (only (algebraic-structs monad make))) -(module (data state functor) = ((algebraic-structs functor make) (data state))) -(module (data state applicative) = ((algebraic-structs applicative make) (data state))) -(module (data state monad) = ((algebraic-structs monad make) (data state))) +(import (only (algebraic-structures functor make)) + (only (algebraic-structures applicative make)) + (only (algebraic-structures monad make))) +(module (data state functor) = ((algebraic-structures functor make) (data state))) +(module (data state applicative) = ((algebraic-structures applicative make) (data state))) +(module (data state monad) = ((algebraic-structures monad make) (data state))) (import (prefix (data state) st:) (prefix (data state functor) st:) |