aboutsummaryrefslogtreecommitdiff
path: root/examples/state.scm
diff options
context:
space:
mode:
authorMasaya Tojo <masaya@tojo.tokyo>2024-06-13 02:11:07 +0900
committerMasaya Tojo <masaya@tojo.tokyo>2024-06-13 02:11:07 +0900
commitca1584a5c87c2952af08c74ce80b1cb2a75a1d19 (patch)
tree6a6f5ebde7bb00f8bd74501ecac563c5a1dc51f6 /examples/state.scm
parent653b204b583da363a97464960a00f1bd0dbed865 (diff)
Rename modules from (<feature name> ... make) to (<feature name>)
Diffstat (limited to 'examples/state.scm')
-rw-r--r--examples/state.scm12
1 files changed, 6 insertions, 6 deletions
diff --git a/examples/state.scm b/examples/state.scm
index b1aedc6..21efc1b 100644
--- a/examples/state.scm
+++ b/examples/state.scm
@@ -35,12 +35,12 @@
[(x* . st**) ((f x) st*)])
(cons x* st**)))))
-(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 (only (algebraic-structures functor))
+ (only (algebraic-structures applicative))
+ (only (algebraic-structures monad)))
+(module (data state functor) = ((algebraic-structures functor) (data state)))
+(module (data state applicative) = ((algebraic-structures applicative) (data state)))
+(module (data state monad) = ((algebraic-structures monad) (data state)))
(import (prefix (data state) st:)
(prefix (data state functor) st:)