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

remvoe unused helper function

This commit is contained in:
Yuichi Nishiwaki 2014-07-22 14:08:54 +09:00
parent 4676550961
commit cba4a6ebf5
1 changed files with 0 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
piclib/prelude.scm
View File

@ -577,13 +577,6 @@
(export define-record-type) (export define-record-type)
(define (every pred list)
(if (null? list)
#t
(if (pred (car list))
(every pred (cdr list))
#f)))
(define (fold f s xs) (define (fold f s xs)
(if (null? xs) (if (null? xs)
s s