[Oberon] System.Directory options

Paul Reed paulreed at paddedcell.com
Sun Oct 22 18:16:10 CEST 2017


Hi Peter,

> If you do "System.Directory *.mod!" and after that without "!" than you
> get details on both outputs. "!" toggles the details for output without
> "!".

Thank you for pointing this out.  Would you be happy with

    ...
    WHILE ch > "!" DO pat[i] := ch; INC(i); Texts.Read(R, ch) END;
    pat[i] := 0X;
    IF ch = "!" THEN pat[i+1] := "!" END ;  (*directory option*)
    ...

being changed to

    ...
    WHILE ch > "!" DO pat[i] := ch; INC(i); Texts.Read(R, ch) END;
    pat[i] := 0X; pat[i+1] := ch; (*directory option*)
    ...

in procedure System.Directory?

Cheers,
Paul




More information about the Oberon mailing list