[Oberon] SystemV - Texts.Mod

[Tomas Kral]

Hi,

Sometimes I TRAP4 at this line pos, when clicking `System.ShowModules'

  PROCEDURE Write* (VAR W: Writer; ch: CHAR);
    VAR p: Piece;
  BEGIN
    IF (W.buf.last.fnt # W.fnt)
    ...
  END Write;

I freely admit I put the whole System to a real strain, being non
proficient coder, I do a lot of code changes and un/loading. Plus
possibly a lot silly no-no things.

I tried new versions of Fonts/Texts, but rolled back in the end.

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