From 424aa88258a410a3bb4918b0a14d030ec71185aa Mon Sep 17 00:00:00 2001 From: pfdietz <pfdietz@localhost> Date: Sun, 7 Sep 2003 17:55:13 +0000 Subject: [PATCH] More tests, including :radix --- ansi-tests/parse-integer.lsp | 21 +++++++++++++++++++++ 1 file changed, 21 insertions(+) diff --git a/ansi-tests/parse-integer.lsp b/ansi-tests/parse-integer.lsp index 5086a536..e68e1835 100644 --- a/ansi-tests/parse-integer.lsp +++ b/ansi-tests/parse-integer.lsp @@ -71,6 +71,27 @@ (parse-integer "+0") 0 2) +(deftest parse-integer.11 + (parse-integer "-00") + 0 3) + +(deftest parse-integer.12 + (parse-integer "+000") + 0 4) + +(deftest parse-integer.13 + (parse-integer "00010") + 10 5) + +(deftest parse-integer.14 + (parse-integer "10110" :radix 2) + 22 5) + +(deftest parse-integer.15 + (parse-integer "1021" :radix 3) + 34 4) + + -- GitLab