conservatory
/
picrin
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

remove definition of number->string

This commit is contained in:
Yuito Murase 2014-04-03 02:16:29 +09:00
parent ce3a0225e2
commit 85db821ad2
1 changed files with 0 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
piclib/syntax-rules.scm
View File

@ -12,15 +12,6 @@
(loop (cons (car d) a) (cdr d)) (loop (cons (car d) a) (cdr d))
(cons d a)))) (cons d a))))
(define (number->string n)
;; fixme
(case n
((0) "0")
((1) "1")
((2) "2")
((3) "3")
(else "hogee")))
(define (var->sym v) (define (var->sym v)
(let loop ((cnt 0) (let loop ((cnt 0)
(v v)) (v v))