Fcalva/cyclone
1
0
Fork 0
mirror of https://github.com/justinethier/cyclone.git synced 2025-05-24 20:45:06 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

Reorganize, add TODO

Browse source
This commit is contained in:
Justin Ethier 2022-06-07 21:45:51 -04:00
parent 7e5c29b939
commit 4091dc4662
1 changed files with 4 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
test-bn.scm
View file

@ -19,15 +19,16 @@
(write (write
(list (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 -10 10)
(test-bn 163264 10) (test-bn 163264 10)
(test-bn 16326 10) (test-bn 16326 10)
;(test-bn -16326000 10) (test-bn -16326000 10)
(test-bn #x0FFFffff 10) (test-bn #x0FFFffff 10)
(test-bn #x0FFFffff 16) (test-bn #x0FFFffff 16)
(test-bn #x3FFFffff 10) (test-bn #x3FFFffff 10)
(test-bn #x0FFF0001 10)
(test-larger-bn 0 #x0FFF0001 10)
(test-larger-bn #x3FFF0000 #x0FFF0001 10) (test-larger-bn #x3FFF0000 #x0FFF0001 10)
)) ))
(newline) (newline)