git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6674 8c9fc860-2736-0410-a75d-ab315db34111
@@ -1993,8 +1993,7 @@ TYPE
Error(Diagnostics.Invalid, "Version mismatch, Release.Mod is version #, tool file is version #", v1, v2);
END;
- ASSERT(builds # NIL);
- RETURN ~(error OR scanner.error);
+ RETURN ~(error OR scanner.error OR (builds = NIL));
END Parse;
(* Import = IMPORT Entries END whereas Entries = FileName *)
@@ -2082,6 +2081,7 @@ TYPE
PROCEDURE ParseBuilds(builds : Builds) : BOOLEAN;
VAR token : Token; build : BuildObj;
BEGIN
+ IF builds = NIL THEN RETURN FALSE END;
ASSERT(builds # NIL);
scanner.Peek(token);
IF (token = BUILDS) THEN