patched copy/paste (LF missing)

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

source/InterpreterShell.Mod

@@ -304,7 +304,7 @@ TYPE
 
 			command[currentIndex+1] := 0X;
 
-			IF ch = CR THEN
+			IF (ch = CR) OR (ch = LF) THEN
 				commandHistory.AddCommand(command);
 				IF (context.in.Available() > 0) & (context.in.Peek() = LF) THEN ch := context.in.Get() END;
 				IF echo THEN context.out.Ln; context.out.Update END
@@ -967,4 +967,13 @@ END InterpreterShell.
 
 SystemTools.Free WMInterpreterShell InterpreterShell FoxInterpreter FoxInterpreterSymbols Test ~
 
-WMInterpreterShell.Open ~
+WMInterpreterShell.Open ~
+
+
+try this:
+
+o := context.out
+for i := 0 to 100 do
+o.String("i = "); o.Int(i,1); o.Ln
+end
+