From 7f29c11592bd32d706075a15737a8e92496c9b68 Mon Sep 17 00:00:00 2001
From: Simon Brooke <simon@journeyman.cc>
Date: Wed, 5 Dec 2018 09:33:37 +0000
Subject: [PATCH] Added new unit test for a failing behaviour in eval

---
 .gitignore               |  4 ++++
 src/lispops.c            |  2 +-
 unit-tests/eval-quote.sh | 12 ++++++++++++
 3 files changed, 17 insertions(+), 1 deletion(-)
 create mode 100644 unit-tests/eval-quote.sh

diff --git a/.gitignore b/.gitignore
index 9bbbb3d..23399b8 100644
--- a/.gitignore
+++ b/.gitignore
@@ -12,3 +12,7 @@ nbproject/
 src/\.#*
 
 *.log
+
+\.idea/
+
+post-scarcity\.iml
diff --git a/src/lispops.c b/src/lispops.c
index 6c442c2..4606f6a 100644
--- a/src/lispops.c
+++ b/src/lispops.c
@@ -483,7 +483,7 @@ lisp_cond( struct stack_frame *frame, struct cons_pointer env ) {
                        frame);
         }
     }
-    /* TODO: if there are more than 8 caluses we need to continue into the
+    /* TODO: if there are more than 8 clauses we need to continue into the
      * remainder */
     
     return result;
diff --git a/unit-tests/eval-quote.sh b/unit-tests/eval-quote.sh
new file mode 100644
index 0000000..eea16ec
--- /dev/null
+++ b/unit-tests/eval-quote.sh
@@ -0,0 +1,12 @@
+#!/bin/bash
+
+expected='5'
+actual=`echo "(eval '(add 2 3))" | target/psse 2> /dev/null | head -2 | tail -1`
+
+if [ "${expected}" = "${actual}" ]
+then
+    echo "OK"
+else
+    echo "Fail: expected '${expected}', got '${actual}'"
+    exit 1
+fi