aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--macros.lisp3
-rw-r--r--package.lisp1
2 files changed, 4 insertions, 0 deletions
diff --git a/macros.lisp b/macros.lisp
index c4aa0aa..d560b68 100644
--- a/macros.lisp
+++ b/macros.lisp
@@ -194,6 +194,9 @@ should return \"☹\".
FAIL-WHEN should be a function, a predicate, that operates on the
first value returned from one of the forms. If non-NIL, the MONADIC>
form returns with the value of the expression FAIL-WITH .
+
+The default value of FAIL-WHEN is the predicate NULL.
+
"
(let ((vals (gensym))
(fn (gensym))
diff --git a/package.lisp b/package.lisp
index 4028f77..00cd296 100644
--- a/package.lisp
+++ b/package.lisp
@@ -4,6 +4,7 @@
(:use #:cl)
(:export #:$
#:->
+ #:monadic>
#:all>
#:some>
#:make-lazy