From 226109b3d67a3ebb532343c0a0bef96b98dffc1c Mon Sep 17 00:00:00 2001 From: Christophe Rhodes Date: Thu, 5 May 2016 16:36:25 +0100 Subject: [PATCH] test for previous (sharp-star) commit --- tests/reader.pure.lisp | 3 +++ 1 file changed, 3 insertions(+) diff --git a/tests/reader.pure.lisp b/tests/reader.pure.lisp index 8116bb41c..6a6dac0a2 100644 --- a/tests/reader.pure.lisp +++ b/tests/reader.pure.lisp @@ -427,3 +427,6 @@ (sb-int:collect ((l)) (read-from-string "a" (l 'first) (l 'second) :start (progn (l 'third) 0)) (assert (equal (l) '(first second third))))) + +(with-test (:name :sharp-star-reader-error) + (assert-error (read-from-string (format nil "#~D*" (1+ most-positive-fixnum))) reader-error)) -- 2.11.4.GIT