[Oberon] SystemV - Directory

Jörg joerg.straube at iaeth.ch
Sun Jan 6 16:34:13 CET 2019

Hi Tomas

What exactly did you do?
I mean: How does your filename without extension look like and what System.Directory parameter did you use?


Am 06.01.19, 12:01 schrieb "Oberon im Auftrag von Tomas Kral" <oberon-bounces at lists.inf.ethz.ch im Auftrag von thomas.kral at email.cz>:

    `System.Directory' on files w/o dot extension gives TRAP 1 around this
     IF (name[i0] = 0X) & (pat[j0] = 0X) THEN (*found*)
     END List;
    I have applied this patch on "!" option
     pat[i] := 0X; pat[i+1] := ch;  (*directory option*)
     (*IF ch = "!" THEN pat[i+1] := "!" END ;*)
     END Directory;
    What is a quick remedy?
    Tomas Kral <thomas.kral at email.cz>
    Oberon at lists.inf.ethz.ch mailing list for ETH Oberon and related systems

More information about the Oberon mailing list