From 4091dc466258c71b46a6297edcf6a7ddfe1c6303 Mon Sep 17 00:00:00 2001 From: Justin Ethier Date: Tue, 7 Jun 2022 21:45:51 -0400 Subject: [PATCH] Reorganize, add TODO --- test-bn.scm | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/test-bn.scm b/test-bn.scm index f1945117..d7fb0112 100644 --- a/test-bn.scm +++ b/test-bn.scm @@ -19,15 +19,16 @@ (write (list + (test-larger-bn 0 #x0FFF0001 10) ;; TODO: why is this not writing the correct number? + (test-bn #x0FFF0001 10) + (test-bn -10 10) (test-bn 163264 10) (test-bn 16326 10) - ;(test-bn -16326000 10) + (test-bn -16326000 10) (test-bn #x0FFFffff 10) (test-bn #x0FFFffff 16) (test-bn #x3FFFffff 10) - (test-bn #x0FFF0001 10) - (test-larger-bn 0 #x0FFF0001 10) (test-larger-bn #x3FFF0000 #x0FFF0001 10) )) (newline)