(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