allow context-less use of Install

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@7987 8c9fc860-2736-0410-a75d-ab315db34111

ARM/ARM.A2/Zynq.DisplayLinear.Mod

@@ -289,10 +289,12 @@ VAR
 	PROCEDURE Install*(context: Commands.Context);
 	VAR options: Options.Options;
 	BEGIN
-		NEW(options);
-		options.Add("r", "reverse", Options.Flag);
-		IF options.Parse(context.arg, context.error) THEN
-			IF options.GetFlag("r") THEN Displays.Reverse() END;
+		IF context # NIL THEN
+			NEW(options);
+			options.Add("r", "reverse", Options.Flag);
+			IF options.Parse(context.arg, context.error) THEN
+				IF options.GetFlag("r") THEN Displays.Reverse() END;
+			END;
 		END;
 	END Install;