aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--prelude.scm3
-rw-r--r--rust/spectrum.rs2
2 files changed, 4 insertions, 1 deletions
diff --git a/prelude.scm b/prelude.scm
index a7469b5..9721c33 100644
--- a/prelude.scm
+++ b/prelude.scm
@@ -27,5 +27,8 @@
(cond ((null? l) ())
(else (cons (f (car l)) (map f (cdr l)))))))
+(define true #t)
+(define false #f)
+
(define for-each map)
;(define compose (lambda (f g) (lambda args (f (apply g args)))))
diff --git a/rust/spectrum.rs b/rust/spectrum.rs
index 8325798..ecc00d2 100644
--- a/rust/spectrum.rs
+++ b/rust/spectrum.rs
@@ -562,7 +562,7 @@ fn apply_action(list: &Vec<SchemeExpr>,
}
},
_ => Err(format!("cdr only takes lists and quotes (got {})",
- scheme_repr(&args[0]):unwrap()))
+ scheme_repr(&args[0]).unwrap()))
}
},
"cons" => {