diff options
| -rw-r--r-- | algebraic-structures.monad.scm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/algebraic-structures.monad.scm b/algebraic-structures.monad.scm index 06bf3cb..80bde36 100644 --- a/algebraic-structures.monad.scm +++ b/algebraic-structures.monad.scm @@ -1,6 +1,9 @@ (functor ((algebraic-structures monad) (M (pure map1 map2 map apply >>=))) (pure map1 map2 map apply >>= do) - (import (rename scheme (map scheme:map) (do scheme:do)) + (import (rename scheme + (apply scheme:apply) + (map scheme:map) + (do scheme:do)) M) (import-for-syntax matchable (chicken syntax) |