¿ªÔÆÌåÓý

Re: DLMALLOC PANIC LINE 3503


 

Hello Bob,

I MESSED up the descriptions.? The subject for this thread goes with my adding trace 'e'

The DMSIPT error goes with the package and call REXXUTIL.

Bert.






On Fri, Jan 6, 2023, 05:33 Bob Bolch <Bob@...> wrote:
It sounds like this mystery code is a REXX function package from a non-VM system.

If that is true, then the best we could do here would be to fail more gracefully.?
The DLMALLOC msg indicates a storage problem to me. Perhaps an overlay.
Bob?

On Fri, Jan 6, 2023 at 6:18 AM Dave Wade <dave.g4ugm@...> wrote:

Bert,

As far as I can tell the sys functions are an add-on package on all CMS.

On LCM+l which is a later VM/CMS but not real iron, it fails gracefully, but support for external functions was only just added to 1.1.2.

Lets see what Bob says, he is on a different time zone.

Dave

?

?

From: [email protected] <[email protected]> On Behalf Of Bertram Moshier
Sent: 06 January 2023 10:45
To: [email protected]
Subject: Re: [h390-vm] DLMALLOC PANIC LINE 3503

?

Dave,

?

So none of the sys functions exist in CMS REXX???

?

Should REXX blow up this way?? How did it blow up on your real iron system?

?

I'm not sure REXX is ready for what I need.? Sys functions are basic to me.

?

Bert

?

On Fri, Jan 6, 2023, 04:30 Dave Wade <dave.g4ugm@...> wrote:

Bert,

What makes you think RxFuncQuery and RxFunctionAdd work in CMS?

It also fails on the SP5 system at LCM+L

Dave

?

From: [email protected] <[email protected]> On Behalf Of Bertram Moshier
Sent: 06 January 2023 02:53
To: [email protected]
Subject: [h390-vm] DLMALLOC PANIC LINE 3503

?

Hello,

?

On the earlier problem, I decided to add some tracing to determine the line causing the DMSIPT143T error.? What I got was:

?

DLMALLOC PANIC LINE 3503

ABNORMAL TERMINATION (NO RESOURCE CLEANUP) ERROR 430 DLMalloc aborted.

Ready (00012);

?

The program now looks like

/* */

trace 'e'

? ? ?if RxFuncQuery( 'SysLoadFuncs' ) <> 0 then
? ? ? ? ?do
? ? ? ? ? ? call RxFuncAdd 'SysLoadFuncs', 'REXXUTIL', 'SysLoadFuncs'
? ? ? ? ? ? call SysLoadFuncs
? ? ? ? end
a = 0
do forever
? a = a + 1
? say a
? if a//20 = 0 then do
? ? 'cls'
? ? rc = syssleep(1)
? ? end
? end

?

Bertram Moshier

?

P.S. Where should I report this problem (e.g. URL) and should it be against REXX or CMS or ????

?

Thank you.

?

?

Join [email protected] to automatically receive all group messages.