Selaa lähdekoodia

Fixed interface issue

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@8179 8c9fc860-2736-0410-a75d-ab315db34111
negelef 7 vuotta sitten
vanhempi
commit
2ec9123702
1 muutettua tiedostoa jossa 3 lisäystä ja 3 poistoa
  1. 3 3
      source/FoxInterpreter.Mod

+ 3 - 3
source/FoxInterpreter.Mod

@@ -816,7 +816,7 @@ TYPE
 			BEGIN
 				reader := expMaker.GetReader();
 				scanner := Scanner.NewScanner("", reader, 0, NIL);
-				NEW(parser, scanner, NIL);
+				NEW(parser, scanner, NIL, "");
 				REPEAT
 					error := FALSE;
 					expression := parser.Expression();
@@ -1278,7 +1278,7 @@ VAR scanner: Scanner.Scanner; parser: Parser; diagnostics: Diagnostics.StreamDia
 BEGIN
 	NEW(diagnostics, context.error);
 	scanner := Scanner.NewScanner("",context.arg,0,diagnostics);
-	NEW(parser, scanner, diagnostics);
+	NEW(parser, scanner, diagnostics, "");
 	seq := parser.StatementSequence(NIL);
 	NEW(interpreter, global, diagnostics,context); interpreter.StatementSequence(seq);
 END Statements;
@@ -1289,7 +1289,7 @@ VAR scanner: Scanner.Scanner; parser: Parser; diagnostics: Diagnostics.StreamDia
 BEGIN
 	NEW(diagnostics, context.error);
 	scanner := Scanner.NewScanner("",context.arg,0,diagnostics);
-	NEW(parser, scanner, diagnostics);
+	NEW(parser, scanner, diagnostics, "");
 	expression := parser.Expression();
 	NEW(interpreter, global, diagnostics,NIL);
 	IF interpreter.GetValue(expression, value) THEN