From 3dc57c3e0087b711cd7845b2c268b9f5c60d9a0d Mon Sep 17 00:00:00 2001 From: Alfredo Beaumont Date: Wed, 24 Apr 2013 17:00:00 +0200 Subject: [PATCH] parse-integer: add support for junk-allowed key parameter --- ecmalisp.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ecmalisp.lisp b/ecmalisp.lisp index 5e37e4a..4bc10b9 100644 --- a/ecmalisp.lisp +++ b/ecmalisp.lisp @@ -1157,8 +1157,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