commit - 272dc9db9f9b4d4aec058228fd28d94f1bff82b4
commit + 1beaad39356a9582cd6e37bdeb9663f0ca7c17c3
blob - 5a2b37cc93d488f5247334b73ec02d94b9fe1170
blob + d92198e8e3d482c9f569d334aa277f6eaf0300af
--- gemtext.lisp
+++ gemtext.lisp
(with-input-from-string (s str)
(parse s)))
-;; (unparse
-;; (with-open-file (stream #P"~/quicklisp/local-projects/phos/test.gmi")
-;; (parse stream))
-;; *standard-output*)
-
(defgeneric unparse (obj stream)
(:documentation "Print a textual representation of OBJ onto STREAM."))