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

Added stubs

Browse source
This commit is contained in:
Justin Ethier 2015-06-03 01:21:22 -04:00
parent 7d7e77df3d
commit 65d53c0b6b
1 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
scheme/base.sld
View file

@ -41,6 +41,7 @@
make-string
vector
vector->list
vector->string
error
raise
raise-continuable
@ -161,6 +162,12 @@
(loop (+ i 1)
(cons (vector-ref vec i) lst))))))
(loop start '())))
(define (vector->string vec . opts)
TODO
)
(define (string->vector str . opts)
TODO
)
(define (boolean=? b1 b2 . bs)
(Cyc-obj=? boolean? b1 (cons b2 bs)))