From 221f3bdebd41ed2507ac660a868f408ef491829b Mon Sep 17 00:00:00 2001 From: "Sunrim KIM (keen)" <3han5chou7@gmail.com> Date: Sun, 9 Nov 2014 17:09:06 +0900 Subject: [PATCH] add regression test against benz/#55 --- extlib/benz | 2 +- t/r7rs-tests.scm | 10 ++++++++++ 2 files changed, 11 insertions(+), 1 deletion(-) diff --git a/extlib/benz b/extlib/benz index 15889a5f..569b1ace 160000 --- a/extlib/benz +++ b/extlib/benz @@ -1 +1 @@ -Subproject commit 15889a5feb515bd67ee7dc2c6419d16703151a54 +Subproject commit 569b1ace02e6a066b21f94dff23c4e01b8748bf0 diff --git a/t/r7rs-tests.scm b/t/r7rs-tests.scm index 8f315463..e1d82f48 100644 --- a/t/r7rs-tests.scm +++ b/t/r7rs-tests.scm @@ -919,6 +919,16 @@ (test 1 (exact 1.0)) (test #t (exact? (exact 1.0))) +(test "10" (number->string 10)) +(test "10" (number->string 10 10)) +(test "10" (number->string 2 2)) +(test "10" (number->string 8 8)) +(test "10" (number->string 16 16)) + +(test "2.3" (number->string 2.3)) +(test "2.3" (number->string 2.30)) +(test "2.301" (number->string 2.301)) + (test 100 (string->number "100")) (test 256 (string->number "100" 16)) (test 100.0 (string->number "1e2"))