[Oberon] SystemV - Modules.Mod

[Jörg]

You could try to use LED() to give some visual feedback...
Jörg

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

    On Wed, 6 Mar 2019 13:02:05 +0100
    Jörg <joerg.straube at iaeth.ch> wrote:
    
    > Trap 1 is "ARRAY bound check". What is the value of "k"?
    
    Cannot tell, as it is uneasy to report from inner core.
    
    I am testing this little change in `Load' of the `Modules.Mod'
    
    BEGIN error(0, name); (*res := 0;*)
    
    Before with res := 0; when accidently clicked piece of text of non
    `M.P' format, system reported Call error, with last module loaded,
    which was typically one step older module.
    
    So it is this TRAP1 then after `System.Close'
    
    PROCEDURE ThisCommand();
    ...
    REPEAT s[k] := ch; ....
    END ThisCommand;
    
    I will try again to make more sense of it.
    
    -- 
    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