Permalink
Browse files

Replace coerce with map to guarantee consistency in between?. Fixes #5.

  • Loading branch information...
1 parent 738ad65 commit d246c1d596e8f16c2c1d0715b7b51cde4702d24b @Ramarren committed Mar 27, 2012
Showing with 3 additions and 1 deletion.
  1. +3 −1 parsers.lisp
View
@@ -210,7 +210,9 @@ parsers."
(zero-width
(setf zero-width nil)
(make-instance 'parser-possibility
- :tree (coerce nil result-type)
+ ;; use map to gurantee the result type is handled the
+ ;; same way as in the case above
+ :tree (map result-type #'identity nil)
:suffix inp))))))))))))
(defun many? (parser)

0 comments on commit d246c1d

Please sign in to comment.