[Oberon] SystemV - Texts.Mod

[Jörg Straube]

Hi

Trap 4 is „NIL check“. Are you sure „W“ is not NIL? It might be you did NEW(W) and because there was no heap memory available anymore, NEW() returned NIL...

Jörg

> Am 06.03.2019 um 20:38 schrieb Tomas Kral <thomas.kral at email.cz>:
> 
> 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>
> --
> Oberon at lists.inf.ethz.ch mailing list for ETH Oberon and related systems
> https://lists.inf.ethz.ch/mailman/listinfo/oberon