From 39aaba04246dae4ce5f6a2a2489294261582adf7 Mon Sep 17 00:00:00 2001 From: bnewbold Date: Mon, 25 Apr 2016 15:15:56 -0400 Subject: rust: make identifiers applicable --- rust/spectrum.rs | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) diff --git a/rust/spectrum.rs b/rust/spectrum.rs index 2c73281..be0d6d7 100644 --- a/rust/spectrum.rs +++ b/rust/spectrum.rs @@ -511,7 +511,12 @@ fn scheme_meaning<'a, 'b>(ast: &SchemeExpr, apply_action(&list, ctx, env), SchemeExpr::SchemeList(_) => apply_action(&list, ctx, env), - _ => Ok(SchemeExpr::SchemeNull) + SchemeExpr::SchemeIdentifier(_) => + apply_action(&list, ctx, env), + _ => { + Err(format!("unexpected head of expression: {}", + scheme_repr(&list[0]).unwrap())) + } } }, } -- cgit v1.2.3