From 3bc285a64a22182077635c74008f0e222ff355bc Mon Sep 17 00:00:00 2001
From: Colin Okay <cbeok@protonmail.com>
Date: Sat, 25 Apr 2020 10:33:30 -0500
Subject: docstring for <<def

---
 parzival.lisp | 10 ++++++++++
 1 file changed, 10 insertions(+)

diff --git a/parzival.lisp b/parzival.lisp
index 582c1da..2010664 100644
--- a/parzival.lisp
+++ b/parzival.lisp
@@ -43,6 +43,16 @@
 ;;; letting them be called like functions too if necessary.
 
 (defmacro <<def (name parser &optional docstring)
+  "Define a parser. <<DEF will define both a DEFUN called NAME and a
+DEFVAR called name that simply holds the symbol NAME. This makes it
+easier to write recursive parsers and to combine parsers by name.
+
+PARSER is any expression that returns a parser. i.e. a function of
+accepting a REPLAY-STREAM and returning three values. The first value
+is the result of the parse, the second value is a success indicator,
+and the thrid value is the stream stream.  The stream will be left in
+whatever state it was in when the parse stopped, either successfully
+or not."
   `(progn
      (defvar ,name ',name)
      (defun ,name (stream) ,docstring (funcall ,parser stream))))
-- 
cgit v1.2.3