Hi,
I get a strange DSI when calling a rexx script that calls another rexx script that uses RexxReqTools.
Minimal testcase:
IMPsend.rexx (opening requester):
/*
$VER: impsend.rexx 1.0
*/
addlib('rexxreqtools.library',0,-30,0)
string = rtgetstring('Hello' ,'Test', 'Title', 'Okay|Okay & Send|Cancel')
say string
exit
IMPwttr.rexx (calling impsend):
/*
$VER: IMPwttr.rexx 1.0
*/
call pragma('w','NULL')
call impsend.rexx()
Calling IMPSend.rexx directly does not cause any issue.
GrimReaper:
Guru Meditiation: 8000 0003
Task: 0x646fcaa0 ('ARexx')
verursachte einen Fehler des Typs DSI (Data Storage Interrup)
an Adresse 0x01824ae0
'Rote Zone' des Stacks wude nicht beschädigt
Stackpointer ist innerhalb der Grenze
It crashes somewhere in the reqtools.library.
If I remove the line
call pragma('w','NULL')
it no longer crashes.
Anybody has any idea why the pragma call is causing issues?
Versions:
68k:
rexxreqtools.library 37.95 (16.08.1994)
68k with PPC glue code:
reqtools.library 39.3 (15.11.2001)
Thank you,
Flynn