core: Disable quasiquote.

* mes.c (QUASIQUOTE): Switch off.
* tests/read.test: Remove quasiquote tests.

diff --git a/mes.c b/mes.c
index d28c883a285d5c4837bbd3f189d6a38716c87e22..eb39096c24f9caecef87fb7c5ad16eab0363f67d 100644 (file)
--- a/mes.c
+++ b/mes.c
@@ -29,7 +29,7 @@
 #include <stdbool.h>
 
 #define DEBUG 0
-#define QUASIQUOTE 1
+#define QUASIQUOTE 0
 #define QUASISYNTAX 0
 #define ENV_CACHE 0
 #define FIXED_PRIMITIVES 1

diff --git a/tests/read.test b/tests/read.test
index a4be746fa3f50d44fd85172404665531b9c014c9..c29e53d46b42ce0e811ef04557f360f175ba65cb 100755 (executable)
--- a/tests/read.test
+++ b/tests/read.test
@@ -9,7 +9,6 @@ exit $?
 ;; FIXME
 (gc)
 
-
 0
 cons
 (cons 0 1)
@@ -47,8 +46,6 @@ barf
 burp
 |#
 #;(bla) (display "must see!\n")
-(display `(display ,display)) (newline)
-(display `(display ,@'(string port))) (newline)
 (display #(0 1 2)) (newline)
 (display (list '(foo
             #! boo !#