TinyScheme Package in libreCMC

My TinyScheme package was accepted into libreCMC, commit 4a64056e70. Until their next build (a few months away) I’ll keep a binary package available for mips_24kc. That installs on the TPE-R1100, GL-AR150, GL-AR300M16, and GL-AR300M targets, among others.

root@pathos:~# tinyscheme 
TinyScheme 1.41
(define (fact n) 
   (do ((rem n (- rem 1))
        (acc 1 (* rem acc)))
   ((= rem 1) acc)))
ts> fact
(fact 4)
ts> 24
(map fact '(1 2 3 4 5 6 7 8 9 10 11 12 13))
ts> (1 2 6 24 120 720 5040 40320 362880 3628800 39916800 479001600 1932053504)

The 32 bit integer overflow is visible at (fact 13).

Advertisement

1 thought on “TinyScheme Package in libreCMC”

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out /  Change )

Twitter picture

You are commenting using your Twitter account. Log Out /  Change )

Facebook photo

You are commenting using your Facebook account. Log Out /  Change )

Connecting to %s