From 6780bad8ee4ef5ca9d3ede96648d964074296c2b Mon Sep 17 00:00:00 2001 From: =?utf8?q?David=20V=C3=A1zquez?= Date: Wed, 24 Apr 2013 20:25:11 +0100 Subject: [PATCH] Reapply patch for :junk-allowed in parse-integer --- ecmalisp.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ecmalisp.lisp b/ecmalisp.lisp index 8dd5ef3..bcdf2dd 100644 --- a/ecmalisp.lisp +++ b/ecmalisp.lisp @@ -1199,8 +1199,8 @@ (values nil index))))) #+ecmalisp -(defun parse-integer (string) - (!parse-integer string nil)) +(defun parse-integer (string &key junk-allowed) + (!parse-integer string junk-allowed)) (defvar *eof* (gensym)) (defun ls-read (stream) -- 1.7.10.4