added dog expression ("@")

Author: bas1c1

SourceCode/Parser/Parser.cs

@@ -593,6 +593,10 @@ private Expression primary()
             {
                 return element();
             }
+            if (lookMatch(0, TokenType.DOG))
+            {
+                return dog();
+            }
             if (match(TokenType.WORD))
             {
                 return new ConstantExpression(current.getText());
@@ -610,6 +614,15 @@ private Expression primary()
             throw new Exception("unknown expression");
         }
 
+        private DogExpression dog()
+        {
+            consume(TokenType.DOG);
+            consume(TokenType.LDEF);
+            List<string> argNames = new List<string>();
+            Statement body = statementOrBlock();
+            return new DogExpression(new LdefExpression(body, argNames));
+        }
+
         private Expression element()
         {
             string variable = consume(TokenType.WORD).getText();