aboutsummaryrefslogtreecommitdiff
path: root/parser.d
diff options
context:
space:
mode:
Diffstat (limited to 'parser.d')
-rw-r--r--parser.d7
1 files changed, 7 insertions, 0 deletions
diff --git a/parser.d b/parser.d
index f05d8fc..43c7faa 100644
--- a/parser.d
+++ b/parser.d
@@ -499,6 +499,7 @@ class Parser {
char next;
while(peekable()) {
+ skipWhitespace();
next = peek();
if (next == ')') {
break;
@@ -534,6 +535,7 @@ class Parser {
char next;
while(peekable()) {
+ skipWhitespace();
next = peek();
if (next == ')') {
break;
@@ -700,6 +702,11 @@ class Parser {
case '(':
advance(); // go past the open paren
return parseCons();
+ case ';':
+ while (peekable() && peek() != '\n') {
+ advance();
+ }
+ return parseForm();
case ':':
// skipping types for now, so consume/print/throw away
char[] typ;