[Oberon] SystemV - Modules.Mod

[Tomas Kral]

Hi,

Very occasionally I TRAP1 at this line pos, typically when clicking a
viewer's `System.Close'.

PROCEDURE ThisCommand();
...
REPEAT s[k] := ch; ....
END ThisCommand;

-- 
Tomas Kral <thomas.kral at email.cz>