wisp
 
(Arne Babenhauserheide)
2014-01-21: added dot-syntax tests.

added dot-syntax tests.

diff --git a/tests/syntax-dot.scm b/tests/syntax-dot.scm
new file mode 100644
--- /dev/null
+++ b/tests/syntax-dot.scm
@@ -0,0 +1,13 @@
+(define (foo)
+  "bar")
+
+(define (bar)
+  '(1
+    . 2 )); pair
+
+(display (foo))
+(newline)
+(display (bar))
+(newline)
+
+
diff --git a/tests/syntax-dot.w b/tests/syntax-dot.w
new file mode 100644
--- /dev/null
+++ b/tests/syntax-dot.w
@@ -0,0 +1,11 @@
+define : foo
+  . "bar"
+
+define : bar
+  ' 1
+    . . 2 ; pair
+
+display : foo
+newline
+display : bar
+newline