aboutsummaryrefslogtreecommitdiff
path: root/src/sexp/display.rs
diff options
context:
space:
mode:
Diffstat (limited to 'src/sexp/display.rs')
-rw-r--r--src/sexp/display.rs2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/sexp/display.rs b/src/sexp/display.rs
index c3db144..a978f61 100644
--- a/src/sexp/display.rs
+++ b/src/sexp/display.rs
@@ -27,6 +27,7 @@ impl fmt::Display for SLeaf {
Var(s) => s.to_string(),
Quote => "quote".to_string(),
Vector => "vector".to_string(),
+ Print => "print".to_string(),
Let => "let".to_string(),
Nil => "()".to_string(),
})
@@ -40,6 +41,7 @@ impl fmt::Display for SExp {
fn fmt(&self, f: &mut fmt::Formatter<'_>) -> fmt::Result {
match self {
Atom(leaf) => write!(f, "{}", leaf.to_string()),
+ SCons(a, b) if **b == Atom(Nil) => (*a).fmt(f),
SCons(a, b) =>
write!(
f,