Hi all,
maybe I don't see the wood for the trees. I have this simple module:
MODULE TrialsShowGlobals;
IMPORT StdLog;
VAR procNr: ARRAY 2 OF PROCEDURE;
PROCEDURE Proc1*;
BEGIN
StdLog.String ("Proc1"); StdLog.Ln
END Proc1;
PROCEDURE Proc2*;
BEGIN
StdLog.String ("Proc2"); StdLog.Ln
END Proc2;
BEGIN
procNr[0] := Proc1;
procNr[1] := Proc2;
END TrialsShowGlobals.
To get the modue loaded I call Proc1 or Proc2.
When I select the module name and try Info->GlobalVariables I get
a illegal memory read trap.
illegal memory read (ad = 64000008H)
DevDebug.FormOf [0000074CH]
.t POINTER illegal address: 64000000H
DevDebug.WriteName [00000D20H]
.f SHORTCHAR 12X
.name Kernel.Name "fðgðhðiðjðkðlðmðnðoðpðqðrðsðtðuð" ...
.ptr DevDebug.ArrayPtr [61C20124H] illegal pointer !!!
.t POINTER illegal address: 64000000H
DevDebug.ShowArray [0000110BH]
.a INTEGER 1640104236
.back DevDebug.RefView [0100DD50H]
.desc POINTER [61C10094H]
.eltyp POINTER NIL
.f SHORTCHAR 0X
.i INTEGER 0
.ind INTEGER 1
.len INTEGER 842561497
.m INTEGER 0
.n INTEGER 0
.name Kernel.Name 90X, 9AX, 1X, 1X, "r" ...
.ptr DevDebug.ArrayPtr [61C20124H] illegal pointer !!!
.sel Kernel.Name "procNr" ...
.size INTEGER 3932228
.str Dialog.String 0DDCCX, """, 8AADX, 62A6X, 9A90X, 101X, "e" ...
.t POINTER NIL
.vi SHORTINT 0
.vs BYTE 0
DevDebug.ShowVar [00001C45H]
.a INTEGER 1640104236
.a0 TextModels.Attributes [010BCAC0H]
.ad INTEGER 1640104236
.back DevDebug.RefView [0100DD50H]
.c SHORTCHAR 1X
.desc POINTER [61C10094H]
.f SHORTCHAR 12X
.i INTEGER 6
.ind INTEGER 0
.j INTEGER 6
.name Kernel.Name "procNr" ...
.ptr DevDebug.ArrayPtr [61C20124H] illegal pointer !!!
.ref INTEGER 0
.sel Kernel.Name "" ...
.tsel Kernel.Name "procNr" ...
.vc SHORTCHAR 0X
.vi SHORTINT 0
.vli INTEGER 2286100
.vlr REAL 1.791893033836296E-307
.vr SHORTREAL 4.315999270120437E-43
.vs SET {6, 8}
.vsi BYTE 0
DevDebug.ShowGlobals [000028D3H]
.a0 TextModels.Attributes [010BCAC0H]
.d POINTER [61C10094H]
.f SHORTCHAR 12X
.m SHORTCHAR 1X
.mname Kernel.Name "procNr" ...
.mod POINTER [61C10000H]
.name ARRAY 256 OF CHAR "DevDebug.UpdateGlobals('TrialsSh" ...
.ref INTEGER 1640103962
.v DevDebug.RefView [0100DD50H]
.x INTEGER 0
DevDebug.ShowGlobalVariables [000041E8H]
I have no idea what my mistake could be. Could anybody please
give me a hint ?
Best regards,
Rainer
Received on Sat Aug 11 2007 - 14:48:15 UTC