Initial files

This commit is contained in:
Justin Ethier 2016-08-19 23:04:50 -04:00
parent 161fb43f72
commit 007ba59ffe
2 changed files with 18 additions and 0 deletions

8
srfi/1.sld Normal file
View file

@ -0,0 +1,8 @@
(define-library (1) ; (srfi 1)
(import (scheme base))
(export
iota
)
(include "1.scm")
(begin)
)

10
srfi/test-1.scm Normal file
View file

@ -0,0 +1,10 @@
(import (scheme base)
(scheme write)
(scheme cyclone pretty-print)
(1))
(pretty-print `(
,(iota 10)
,(iota 10 5)
,(iota 10 5 10)
))