From 014b35ab2789a7322c67f12d40380c03acc4b6e3 Mon Sep 17 00:00:00 2001
From: bnewbold <bnewbold@robocracy.org>
Date: Thu, 26 May 2016 15:08:10 -0400
Subject: rust: tiny fixes to compile

---
 prelude.scm      | 3 +++
 rust/spectrum.rs | 2 +-
 2 files changed, 4 insertions(+), 1 deletion(-)

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" => {
-- 
cgit v1.2.3