From 3586683bda805c5156649f760f26921b9d0a2250 Mon Sep 17 00:00:00 2001 From: bnewbold Date: Mon, 25 Apr 2016 23:54:43 -0400 Subject: rust: add a (lazy) 'if' applier --- prelude.scm | 1 - 1 file changed, 1 deletion(-) (limited to 'prelude.scm') diff --git a/prelude.scm b/prelude.scm index a3b123e..a7469b5 100644 --- a/prelude.scm +++ b/prelude.scm @@ -18,7 +18,6 @@ ; my favorite! (define cdaddr (lambda (x) (cdr (car (cdr (cdr x)))))) -(define if (lambda (pred tval fval) (cond (pred tval) (else fval)))) (define not (lambda (x) (if x #f #t))) (define abs (lambda (x) (if (> x 0) x (* -1 x)))) -- cgit v1.2.3