consume types but throw away (for now)

1 files changed, 8 insertions, 0 deletions

diff --git a/parser.d b/parser.d
index c62a762..f05d8fc 100644
--- a/parser.d
+++ b/parser.d
@@ -700,6 +700,14 @@ class Parser {
             case '(':
                 advance();  // go past the open paren
                 return parseCons();
+            case ':':
+                // skipping types for now, so consume/print/throw away
+                char[] typ;
+                while (peekable() && !isBoundary(peek())) {
+                    typ ~= advance();
+                }
+                writefln("received (but ignoring) type %s on line %d", to!string(typ), line);
+                return parseForm();
             default:
                 return parseSymbol();
         }