¿ªÔÆÌåÓý


Re: Hercules VM TCPIP - current situation?

 

On Wed, Jan 11, 2023 at 01:33 PM, Bob Bolch wrote:
VMCE is based on nearly 50 year old code. IBM introduced TCPIP support years later. That IBM TCPIP code depends on facilities that were not added to VM until much later.?

VM/370 R6 PLC 17 is ~ 1980 code; TCP/IP was running at (for example) at Clarkson University in 1986.? That's not?a huge?gap; I think the primary thing missing was IUCV, but you might be to use VMCF if IUCV has not been backported to VM/CE.

On Wed, Jan 11, 2023 at 10:24 PM, Bernd Oppolzer wrote:

the original VM TCP/IP was written in IBMs Pascal/VS, AFAIK.

If the source code of this product could be found somewhere, I could?imagine it would be possible?to compile it with my current version of New Stanford Pascal without or?with minor changes.
If someone out there has access to the original TCP/IP source code for?VM and wants to test this,?feel free to contact me offline for discussion and support.

Any IBM TCP/IP program is a Licensed Program Product and can't be blithely redistributed in source or object. Same for the header files. So don't bother.

Three legal alternatives one could consider:
  • IBM TCP/IP originally was based on WISCNET (); is there a pre-PP of WISCNET archive out there?
  • Look for BSD network kernels, especially those ported to foreign platforms.
    VM specific network adapter and client VMCF/IUCV support would have to be written.
  • KNET was a TCP/IP competitor from Spartacus/Fibronics. Perhaps they released their code to the public domain.
-ahd-


Re: Hercules VM TCPIP - current situation?

 

On Thu, 12 Jan 2023 at 01:24, Bernd Oppolzer via groups.io
<berndoppolzer@...> wrote:

the original VM TCP/IP was written in IBMs Pascal/VS, AFAIK.

If the source code of this product could be found somewhere, I could
imagine it would be possible
to compile it with my current version of New Stanford Pascal without or
with minor changes.
If someone out there has access to the original TCP/IP source code for
VM and wants to test this,
feel free to contact me offline for discussion and support.
I doubt the source code was ever published. The original VM TCP/IP
("FAL") was at a time after IBM's Object Code Only (OCO) policy was
already established, and although a lot of the VM assembler code
remained available in source, virtually everything written in high
level languages (PL/X, C, and Pascal) was never shipped with source.

I would be happy to be proven wrong!

Tony H.


Re: Hercules VM TCPIP - current situation?

 

FWIW:

the original VM TCP/IP was written in IBMs Pascal/VS, AFAIK.

If the source code of this product could be found somewhere, I could imagine it would be possible
to compile it with my current version of New Stanford Pascal without or with minor changes.
If someone out there has access to the original TCP/IP source code for VM and wants to test this,
feel free to contact me offline for discussion and support.

New Stanford Pascal compiler website:

Thank you, kind regards

Bernd


Am 12.01.2023 um 03:57 schrieb Fish Fish:

Rob wrote:

I've downloaded and successfully run CE1.2. I would like to
get it Internet connected.

I've found some advice ()
that involves routing through virtual networks within the host
machine. I've also found a comment somewhere (that I cannot find
again) that seemed to say using QETH in bridge mode (Layer2)
could be made to work.
I don't know what you saw and where (some IBM documentation perhaps?), but if it was VM related, it was more than likely referring to z/VM, a much more modern z/Architecture version of VM which does indeed support networking with QETH (i.e. OSA) devices in Layer 2 (or Layer 3!) mode.

As Bob pointed out in his reply however, the VM that is usually discussed here in this group is VM/CE ("Community Edition"), which is a community modified/enhanced/supported version of VM/370, a very old version of VM that does not have any TCP/IP support at all as far a I know.

HTH


Re: Hercules VM TCPIP - current situation?

 

Rob wrote:

I've downloaded and successfully run CE1.2. I would like to
get it Internet connected.

I've found some advice ()
that involves routing through virtual networks within the host
machine. I've also found a comment somewhere (that I cannot find
again) that seemed to say using QETH in bridge mode (Layer2)
could be made to work.
I don't know what you saw and where (some IBM documentation perhaps?), but if it was VM related, it was more than likely referring to z/VM, a much more modern z/Architecture version of VM which does indeed support networking with QETH (i.e. OSA) devices in Layer 2 (or Layer 3!) mode.

As Bob pointed out in his reply however, the VM that is usually discussed here in this group is VM/CE ("Community Edition"), which is a community modified/enhanced/supported version of VM/370, a very old version of VM that does not have any TCP/IP support at all as far a I know.

HTH

--
"Fish" (David B. Trout)
Software Development Laboratories

mail: fish@...


Re: Hercules VM TCPIP - current situation?

 

On 1/11/23 18:00, robballantyne3@... wrote:
? ?That makes perfect sense.? I seem to have missed that part of the document I referenced that lists: VSE, VM/ESA, and LinuxS/390 as the Hercules guests that you might want to configure networking for.
But if you DO end up needing to configure TCP/IP under VM/ESA, I have done that several times, and can assist if needed. It's also the same IP stack as is used under OS/390, and the configuration is very much the same.

-Dave

--
Dave McGuire, AK4HZ
New Kensington, PA


Re: Hercules VM TCPIP - current situation?

 

Hi Bob,?

? ?That makes perfect sense.? I seem to have missed that part of the document I referenced that lists: VSE, VM/ESA, and LinuxS/390 as the Hercules guests that you might want to configure networking for.

Thanks!
Rob


Re: Hercules VM TCPIP - current situation?

 

Hi Rob,

VMCE is based on nearly 50 year old code. IBM introduced TCPIP support years later. That IBM TCPIP code depends on facilities that were not added to VM until much later.?

Best regards,
Bob Bolch

On Wed, Jan 11, 2023, 4:05 PM <robballantyne3@...> wrote:
Hi,

? I've downloaded and successfully run CE1.2.? I would like to get it Internet connected.

? I've found some advice () that involves routing through virtual networks within the host machine.? I've also found a comment somewhere (that I cannot find again) that seemed to say using QETH in bridge mode (Layer2) could be made to work.? I'm perhaps jumping to a conclusion here but I'm wondering if that meant that this configuration would permit the VM "host" to appear as a secondary IP on the Linux host system's ethernet adapter (with a 2nd MAC address, I'm also guessing).? Maybe I'm misunderstanding what was meant about that comment.

? Is this possible?? Has anyone done it?? Are there any written instructions?? ?I've searched the various mail groups to no avail.

? I understand UNIX/Networking but I'm a VM newbie.

Thanks!
Rob


Hercules VM TCPIP - current situation?

 

Hi,

? I've downloaded and successfully run CE1.2.? I would like to get it Internet connected.

? I've found some advice () that involves routing through virtual networks within the host machine.? I've also found a comment somewhere (that I cannot find again) that seemed to say using QETH in bridge mode (Layer2) could be made to work.? I'm perhaps jumping to a conclusion here but I'm wondering if that meant that this configuration would permit the VM "host" to appear as a secondary IP on the Linux host system's ethernet adapter (with a 2nd MAC address, I'm also guessing).? Maybe I'm misunderstanding what was meant about that comment.

? Is this possible?? Has anyone done it?? Are there any written instructions?? ?I've searched the various mail groups to no avail.

? I understand UNIX/Networking but I'm a VM newbie.

Thanks!
Rob


Re: DMSIPT143T ADDESSING EXCEPTION OCCURRED AT F2A6FC IN SYSTEM ROUTINE EXEC, RE-IPL CMS

 

Hello,


>>? I've read the later replies on this thread, but
>>? couldn't help thinking that
>>? it would have been useful if you'd told us if >> the program actually ran
>> at all, and if so, how far it got.

First let me apologize to everyone for writing two confusing messages.

The DMSIPT143T occurred when I first ran the program.

The other error occurred ONLY AFTER I ADDED:

trace 'e'

To the program.? I added the trace 'e' to help determine how far the program got and specifically where it failed.


IMHO, calling a non-existing program should not cause CMS to terminate and require a reipl of CMS.

Additional having trace 'e' should not cause REXX to die as it did.

In both cases a better way of dealing with the error is needed.

I hope I helped clarify the two messages.? Again I apologize for the. Misunderstanding of the two messages.? The first was for the DMSIPT error. The second for adding trace 'e'.

Thank you.





On Tue, Jan 10, 2023, 15:01 Jeremy Nicoll <yahgrp87@...> wrote:
On Fri, 6 Jan 2023, at 02:48, Bertram Moshier wrote:
> Hello,
>
> I'm getting DMSIPT143T on a very simple REXX program.
>
> DMSIPT143T ADDESSING EXCEPTION OCCURRED AT F2A6FC IN SYSTEM ROUTINE EXEC,
> RE-IPL CMS.
> CP ENTERED; DISABLED WAIT PSW '00020000 40F8B75E'


I've read the later replies on this thread, but couldn't help thinking that
it would have been useful if you'd told us if the program actually ran
at all, and if so, how far it got.

Wouldn't one at least possibly expect this program to fail at some
point, when a exceeds the maximum value of an integer at whatever
the "numeric digits" value is?

Also, I question the wisdom of

? rc = syssleep(1)

as it conflates the normal use of "rc" (to represent the return
code from an issued command) with the returned value from
a function.


> The REXX program is:
>
> /* */
>? ? ? 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


--
Jeremy Nicoll - my opinions are my own.






Re: DMSIPT143T ADDESSING EXCEPTION OCCURRED AT F2A6FC IN SYSTEM ROUTINE EXEC, RE-IPL CMS

 

I got far enough on tracing this program to see that it us failing during REXX initialization. No program statements have run yet. The interpreter is trying to reference uninitialized storage. I just started on this, so I am not very far along yet.
Bob Bolch

On Tue, Jan 10, 2023, 4:01 PM Jeremy Nicoll <yahgrp87@...> wrote:
On Fri, 6 Jan 2023, at 02:48, Bertram Moshier wrote:
> Hello,
>
> I'm getting DMSIPT143T on a very simple REXX program.
>
> DMSIPT143T ADDESSING EXCEPTION OCCURRED AT F2A6FC IN SYSTEM ROUTINE EXEC,
> RE-IPL CMS.
> CP ENTERED; DISABLED WAIT PSW '00020000 40F8B75E'


I've read the later replies on this thread, but couldn't help thinking that
it would have been useful if you'd told us if the program actually ran
at all, and if so, how far it got.

Wouldn't one at least possibly expect this program to fail at some
point, when a exceeds the maximum value of an integer at whatever
the "numeric digits" value is?

Also, I question the wisdom of

? rc = syssleep(1)

as it conflates the normal use of "rc" (to represent the return
code from an issued command) with the returned value from
a function.


> The REXX program is:
>
> /* */
>? ? ? 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


--
Jeremy Nicoll - my opinions are my own.






Re: DMSIPT143T ADDESSING EXCEPTION OCCURRED AT F2A6FC IN SYSTEM ROUTINE EXEC, RE-IPL CMS

 

On Fri, 6 Jan 2023, at 02:48, Bertram Moshier wrote:
Hello,

I'm getting DMSIPT143T on a very simple REXX program.

DMSIPT143T ADDESSING EXCEPTION OCCURRED AT F2A6FC IN SYSTEM ROUTINE EXEC,
RE-IPL CMS.
CP ENTERED; DISABLED WAIT PSW '00020000 40F8B75E'

I've read the later replies on this thread, but couldn't help thinking that
it would have been useful if you'd told us if the program actually ran
at all, and if so, how far it got.

Wouldn't one at least possibly expect this program to fail at some
point, when a exceeds the maximum value of an integer at whatever
the "numeric digits" value is?

Also, I question the wisdom of

rc = syssleep(1)

as it conflates the normal use of "rc" (to represent the return
code from an issued command) with the returned value from
a function.


The REXX program is:

/* */
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

--
Jeremy Nicoll - my opinions are my own.


Re: (B)Rexx and Signal

 

I posted a fix to add TRACE ON FAILURE support to BREXX for CMS 1.1.2
See the issue entry at:? to obtain the test fix.
Please provide feedback if you?can test this fix.
Bob Bolch.

On Wed, Jan 4, 2023 at 11:48 AM Bob Bolch via <Bob=[email protected]> wrote:
No, I just added the symptom to the open issue for SIGNAL processing.?
Bob

On Wed, Jan 4, 2023, 11:25 AM Bertram Moshier <herc370390vm@...> wrote:
Are you opening a ticket for this issue?

On Wed, Jan 4, 2023, 08:17 Bob Bolch <Bob@...> wrote:
It looks like SIGNAL ON ERROR doesn't work correctly either.? It is not being signaled when a CMS command gets a non-zero RC.?
?
======================== TEST EXEC
/* */? ? ? ? ? ? ? ? ? ? ? ??
ADDRESS ''? ? ? ? ? ? ? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ?
SIGNAL ON ERROR? ? ? ? ? ? ??
? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
'ACCESS 333 Z'? ? ? ? ? ? ? ?
EXIT RC? ? ? ? ? ? ? ? ? ? ??
? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
ERROR: SAY 'ERROR SIGNALLED'?
===========================
Currently returns:
test2? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
DMSACC113S 'Z (333) ' NOT ATTACHED?
Ready(00100); T=0.02/0.02 10:03:18?
===========================
Should return:
test2? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ??
DMSACC113S 'Z (333) ' NOT ATTACHED? ? ?
? ? ?6 *-* 'ACCESS 333 Z'? ? ? ? ? ? ??
? ? ? ?+++ RC(100) +++? ? ? ? ? ? ? ? ?
ERROR signalled? ? ? ? ? ? ? ? ? ? ? ??
Ready(00016); T=0.02/0.02 10:03:05? ? ?
?


Re: DMKCNS modifications

 

On Mon, Jan 9, 2023 at 12:33 PM, Bob Polmanter wrote:
Since it is so easy to get the system restored from a backup, why not try?
Oh I already tried it Bob, and I even explain to other people on the channel how to do it on VM/370 CE. :-)

Regular 3270 logon and dial don't seem to be affected indeed.

I just thought knowledgeable people here like you and many others could provide more information (or reassurance) regarding ignoring those fixes. I felt they fixed problems, so ignoring them would leave the problems there. However, it could be that what is fixed has nothing to do with 3270 connections or is of no (serious) consequence when the system runs under Hercules (like Dave suggested).

One last point intrigues me. I don't know who came out with the idea of ignoring those fixes to make the 2703 connections work with UTS, but then again how did he figure that out (since the memos are missing)?

Anyway, thanks to all here.

Cheers,

Rene FERLAND, Montreal


Re: DMKCNS modifications

 

Hi Rene,

If you are comfortable building a CP nucleus, I'd suggest that you simply try it yourself.? If you back up your disk images before you bring up your system in order to make the change, it is easy to get back and there is no risk.

Simply make a copy of DMKCNS AUXR60 to your A-disk and edit it and comment out the fixes in question.? Then reassemble DMKCNS the CP way? (using VMFASM), and rebuild the CP nucleus and then re-ipl.? I can't provide specific instructions since I don't know what system version you are using and things have been changed around lately.

I'd say with reasonable confidence that the system will be fine if you comment out those fixes, if for no other reason than before the PUT tapes that introduced those fixes into DMKCNS, they simply were not there in the first place, before those tapes appeared back in the day.? It is not a guarantee of course, but you have someone saying that commenting them out resolves the problem.? Since it is so easy to get the system restored from a backup, why not try?

Regards,
Bob (the other one)


Re: DMKCNS modifications

 

On Mon, Jan 9, 2023 at 04:28 AM, Bob Bolch wrote:
Any pointers would be appreciated. I would need to understand the issue more completely,
before I? would remove any IBM PTFs from the VMCE distribution.?
Hi Bob,
?
If by "discussion forum" you mean the Moshix Discord channel, then the topic was discussed in the #uts-unix room (under Spare Computer Room group):
?
https://discord.com/channels/423767742546575361/871957791923920967
?
around December, 19th:
?
https://discord.com/channels/423767742546575361/871957791923920967/1054463813556121660
?
The original "starting" message there was:
?
"It is in fact possible to get ASCII terminals mode working with UTS, but it is only line-at-a-time, half duplex. ?Which really sucks. ?You need 2703 emulation, which Hercules does fine, but you also need a patch to CP to prevent it from a pointer chasing bug. If someone can remind me of the MAINT password, I could show my UTS config."
?
To be clear, I am not asking you to include the modifications in the next release of VM/370 CE, I am just wondering about the possible side effects of them.
?
CHeers,
?
Rene FERLAND, Montreal


Re: DMKCNS modifications

 

Hi Ren¨¦,
I joined the discussion forum to look at the discussion on DMKCNS, but I could not find it.
Any pointers would be appreciated. I would need to understand the issue more completely,
before I? would remove any IBM PTFs from the VMCE distribution.?
Thanks!/Bob Bolch

On Sun, Jan 8, 2023 at 9:22 PM Ren¨¦ Ferland <ferland.rene@...> wrote:
On Sun, Jan 8, 2023 at 06:03 PM, Mark A. Stevens wrote:
So ... I'm confused about your statement. From what I see, they have been applied, and are present in CP.
Yes, they are present normally in CP, but they need to be removed from DMKCNS TXTHRC if one wants the 2703 connection to UTS to work properly.

I am wondering if that "removal" will affect the behaviour of the console when doing a 3270 logon or a dial to an other virtual machine.

Rene FERLAND, Montreal


Re: DMKCNS modifications

 

On Sun, Jan 8, 2023 at 06:03 PM, Mark A. Stevens wrote:
So ... I'm confused about your statement. From what I see, they have been applied, and are present in CP.
Yes, they are present normally in CP, but they need to be removed from DMKCNS TXTHRC if one wants the 2703 connection to UTS to work properly.

I am wondering if that "removal" will affect the behaviour of the console when doing a 3270 logon or a dial to an other virtual machine.

Rene FERLAND, Montreal


Re: DMKCNS modifications

 

Aww Nuts!

I missed and cut & paste ...

FSVIEW: DMKCNS AUXR60 H1???????????????? Lines 1-23/23 F80[1-79]? FSVIEW V1.2.5
R15227DK 629 UV06277 PEVM11927 SWITCHED LINE DISABLED ON IR AND UC
R14789DK 627 UV05984 PEVM13019 LOOP CAN STILL OCCUR IF CPU NOT 4300
R13158DK 625 UV05563 LOOP IN CNS AND IOS ON IFCC CC=1
R13198DK 625 UV04984 NO DISCONNECT IF IN ERROR RECOVERY
R12733DK 625 UV05520 CC1 LOOP SOUNDING ALARM TO POWERED OFF D/T3215
R12126DK 624 UV02926 D/T4331 CA UNIT CHECK NOT HANDLED CORRECTLY
R13019DK 623 UV04539 PEVM12111 LOOP DURING ERROR RECOVERY
R13993DK 623 UV05102 ABEND OR OVERLAY DUE TO REG10 ZERO IN DMKCNS
R11927DK 623 UV04909 LOOP DOING ENABLE OF LEASED LINE WITH NO MODEM
R12941DK 622 UV04884 SYNC ERROR RECOV FOR INTERVENTION REQUIRED COND.
R13327DK 621 UV04667 WRONG BRANCH TAKEN FROM VM10282
R12345DK 618 UV03134 CHECK FOR NO CPEXBLOK WHEN RDEVSYNC IS STILL ON
R12111DK 618 UV02950 PREVENT TTY I/O LOOP IF ENDLESS BREAK KEY
R11726DK 616 UV01890 ATTN INTERRUPT AND OPERATOR IN CF MODE CAUSES WAIT
R11780DK 616 UV01924 D/T4331 ICA NOT HANDLED CORRECTLY IF ERROR OCCURS
R11261DK 616 UV01936 ABENDPRG005 WHEN UNSOL ATTN FROM D/T3215 ON AP
R10282DK 614 UV01462 VARIOUS ABENDS BECAUSE TWO IOBLOKS FOR SAME DEVICE
R10462DK 611 UV00555 ABENDLOK001 DMKDSP LABEL LOCKVM TRYING TO LOC VMBLOK
R09490DK 610 CONTINUOUS LOOP IF HARDWARE ERROR OCCURS
R10263DK 609 DMKCNS TTY TWX XOFF NOT RECOGNIZED AFTER PTF V10075
R08988DK 606 SWITCHED LINE LEFT DISABLED IF GO ON HOOK BEFORE LOGOFF
R09229DK 606 ABENDFRE005 IF ATTN INTERRUPT DURING DISCONNECT PROCESSING
R09957DK - CORRECT IOBLOK CONFLICT IN MSS SUPPORT

?... Mark S.


Re: DMKCNS modifications

 

On Sat, Jan 7, 2023 at 03:37 PM, Ren¨¦ Ferland wrote:
the following modifications are commented out from DMKCNS AUXR60:?
?
?R13158DK 625 UV05563 LOOP IN CNS AND IOS ON IFCC CC=1
?R13198DK 625 UV04984 NO DISCONNECT IF IN ERROR RECOVERY
?R12733DK 625 UV05520 CC1 LOOP SOUNDING ALARM TO POWERED OFF D/T3215
?R12126DK 624 UV02926 D/T4331 CA UNIT CHECK NOT HANDLED CORRECTLY
?
If I am right, these modifications come from IBM,
Rene,

I'm confused about the patches above not being applied. The following files are found after a vmsetup cp is run on MAINT.

XLIST: DMKCNS * *?????????????????????????????????? Lines 1-31/31? XLIST V1.2.5
? Filename Filetype Fm? Format??? Recs Blocks? Date?????? Time?? Label
? DMKCNS?? AUXHRC?? F1? F??? 80????? 2????? 1? 2013-01-01 17:53? MNT094
? DMKCNS?? HRC101DK F1? F??? 80????? 1????? 1? 2013-01-01 17:53? MNT094
? DMKCNS?? HRC370DK F1? F??? 80????? 4????? 1? 2013-01-01 17:53? MNT094
? DMKCNS?? TXTHRC?? F1? F??? 80??? 198???? 20? 2018-03-11 09:24? MNT094
? DMKCNS?? TEXT???? G1? F??? 80??? 192???? 21? 2006-02-08 14:58? MNT194
? DMKCNS?? AUXR60?? H1? F??? 80???? 23????? 4? 2042-09-18 19:51? MNT294
? DMKCNS?? R08988DK H1? F??? 80???? 12????? 3? 1979-11-13 05:25? MNT294
? DMKCNS?? R09229DK H1? F??? 80????? 9????? 2? 1979-11-02 04:11? MNT294
? DMKCNS?? R09490DK H1? F??? 80????? 7????? 2? 1980-03-03 03:03? MNT294
? DMKCNS?? R09957DK H1? F??? 80????? 1????? 2? 1979-07-12 09:51? MNT294
? DMKCNS?? R10263DK H1? F??? 80????? 4????? 2? 1980-01-25 10:26? MNT294
? DMKCNS?? R10282DK H1? F??? 80????? 8????? 2? 1980-06-30 06:06? MNT294
? DMKCNS?? R10462DK H1? F??? 80????? 3????? 2? 1980-04-03 03:19? MNT294
? DMKCNS?? R11261DK H1? F??? 80????? 8????? 2? 1980-09-08 08:26? MNT294
? DMKCNS?? R11726DK H1? F??? 80???? 29????? 4? 1980-09-26 08:26? MNT294
? DMKCNS?? R11780DK H1? F??? 80???? 15????? 3? 1980-09-08 08:26? MNT294
? DMKCNS?? R11927DK H1? F??? 80????? 8????? 2? 1981-08-07 07:10? MNT294
? DMKCNS?? R12111DK H1? F??? 80???? 19????? 3? 1980-12-08 12:01? MNT294
? DMKCNS?? R12126DK H1? F??? 80??? 453???? 47? 1981-10-12 16:33? MNT294
? DMKCNS?? R12345DK H1? F??? 80????? 6????? 2? 1981-01-09 12:03? MNT294
? DMKCNS?? R12733DK H1? F??? 80????? 4????? 2? 1981-10-15 10:22? MNT294
? DMKCNS?? R12941DK H1? F??? 80????? 1????? 2? 1981-07-07 13:28? MNT294
? DMKCNS?? R13019DK H1? F??? 80???? 17????? 3? 1981-08-14 08:11? MNT294
? DMKCNS?? R13158DK H1? F??? 80???? 14????? 3? 1981-11-10 09:32? MNT294
? DMKCNS?? R13198DK H1? F??? 80???? 36????? 5? 1981-10-22 13:45? MNT294
? DMKCNS?? R13327DK H1? F??? 80????? 2????? 2? 1981-06-03 06:02? MNT294
? DMKCNS?? R13993DK H1? F??? 80????? 3????? 2? 1981-08-07 08:05? MNT294
? DMKCNS?? R14789DK H1? F??? 80????? 2????? 2? 1982-01-15 16:23? MNT294
? DMKCNS?? R15227DK H1? F??? 80????? 4????? 2? 1982-04-01 14:48? MNT294
? DMKCNS?? ASSEMBLE I1? F??? 80?? 2132??? 215? 1978-12-07 16:57? MNT394
? DMKCNS?? UPDTAP?? I1? F??? 80????? 1????? 2? 2002-01-28 23:55? MNT394

and? those patches are not commented out in the version of CE 1.1.2 I have running.

XLIST: DMKCNS * *?????????????????????????????????? Lines 1-31/31? XLIST V1.2.5
? Filename Filetype Fm? Format??? Recs Blocks? Date?????? Time?? Label
? DMKCNS?? AUXHRC?? F1? F??? 80????? 2????? 1? 2013-01-01 17:53? MNT094
? DMKCNS?? HRC101DK F1? F??? 80????? 1????? 1? 2013-01-01 17:53? MNT094
? DMKCNS?? HRC370DK F1? F??? 80????? 4????? 1? 2013-01-01 17:53? MNT094
? DMKCNS?? TXTHRC?? F1? F??? 80??? 198???? 20? 2018-03-11 09:24? MNT094
? DMKCNS?? TEXT???? G1? F??? 80??? 192???? 21? 2006-02-08 14:58? MNT194
? DMKCNS?? AUXR60?? H1? F??? 80???? 23????? 4? 2042-09-18 19:51? MNT294
? DMKCNS?? R08988DK H1? F??? 80???? 12????? 3? 1979-11-13 05:25? MNT294
? DMKCNS?? R09229DK H1? F??? 80????? 9????? 2? 1979-11-02 04:11? MNT294
? DMKCNS?? R09490DK H1? F??? 80????? 7????? 2? 1980-03-03 03:03? MNT294
? DMKCNS?? R09957DK H1? F??? 80????? 1????? 2? 1979-07-12 09:51? MNT294
? DMKCNS?? R10263DK H1? F??? 80????? 4????? 2? 1980-01-25 10:26? MNT294
? DMKCNS?? R10282DK H1? F??? 80????? 8????? 2? 1980-06-30 06:06? MNT294
? DMKCNS?? R10462DK H1? F??? 80????? 3????? 2? 1980-04-03 03:19? MNT294
? DMKCNS?? R11261DK H1? F??? 80????? 8????? 2? 1980-09-08 08:26? MNT294
? DMKCNS?? R11726DK H1? F??? 80???? 29????? 4? 1980-09-26 08:26? MNT294
? DMKCNS?? R11780DK H1? F??? 80???? 15????? 3? 1980-09-08 08:26? MNT294
? DMKCNS?? R11927DK H1? F??? 80????? 8????? 2? 1981-08-07 07:10? MNT294
? DMKCNS?? R12111DK H1? F??? 80???? 19????? 3? 1980-12-08 12:01? MNT294
? DMKCNS?? R12126DK H1? F??? 80??? 453???? 47? 1981-10-12 16:33? MNT294
? DMKCNS?? R12345DK H1? F??? 80????? 6????? 2? 1981-01-09 12:03? MNT294
? DMKCNS?? R12733DK H1? F??? 80????? 4????? 2? 1981-10-15 10:22? MNT294
? DMKCNS?? R12941DK H1? F??? 80????? 1????? 2? 1981-07-07 13:28? MNT294
? DMKCNS?? R13019DK H1? F??? 80???? 17????? 3? 1981-08-14 08:11? MNT294
? DMKCNS?? R13158DK H1? F??? 80???? 14????? 3? 1981-11-10 09:32? MNT294
? DMKCNS?? R13198DK H1? F??? 80???? 36????? 5? 1981-10-22 13:45? MNT294
? DMKCNS?? R13327DK H1? F??? 80????? 2????? 2? 1981-06-03 06:02? MNT294
? DMKCNS?? R13993DK H1? F??? 80????? 3????? 2? 1981-08-07 08:05? MNT294
? DMKCNS?? R14789DK H1? F??? 80????? 2????? 2? 1982-01-15 16:23? MNT294
? DMKCNS?? R15227DK H1? F??? 80????? 4????? 2? 1982-04-01 14:48? MNT294
? DMKCNS?? ASSEMBLE I1? F??? 80?? 2132??? 215? 1978-12-07 16:57? MNT394
? DMKCNS?? UPDTAP?? I1? F??? 80????? 1????? 2? 2002-01-28 23:55? MNT394

and the text deck DMKCNS TXTHRC shows them as being applied.

FSVIEW: DMKCNS TXTHRC F1?????????????? Lines 27-65/198 F80[1-79]? FSVIEW V1.2.5
R12941DK 622 UV04884 SYNC ERROR RECOV FOR INTERVENTION REQUIRED COND.
*???????? DMKCNS?? R12941DK E1 MNT294 07/07/81? 13:28
R11927DK 623 UV04909 LOOP DOING ENABLE OF LEASED LINE WITH NO MODEM
*???????? DMKCNS?? R11927DK E1 MNT294 08/07/81? 07:10
R13993DK 623 UV05102 ABEND OR OVERLAY DUE TO REG10 ZERO IN DMKCNS
*???????? DMKCNS?? R13993DK E1 MNT294 08/07/81? 08:05
R13019DK 623 UV04539 PEVM12111 LOOP DURING ERROR RECOVERY
*???????? DMKCNS?? R13019DK E1 MNT294 08/14/81? 08:11
R12126DK 624 UV02926 D/T4331 CA UNIT CHECK NOT HANDLED CORRECTLY
*???????? DMKCNS?? R12126DK E1 MNT294 10/12/81? 16:33

and the CP nucleus MAP shows them included. I'm showing just one below.

XLIST: *NUC* MAP *??????????????????????????????????? Lines 1-5/5? XLIST V1.2.5
? Filename Filetype Fm? Format??? Recs Blocks? Date?????? Time?? Label
? CPNUC??? MAP????? F1? F?? 132?? 6223?? 1027? 2021-02-17 11:11? MNT094

and from the map.

FSVIEW: CPNUC MAP F1?????????????? Lines 908-946/6223 F132[1-79]? FSVIEW V1.2.5
???????????????????????? R13158DK 625 UV05563 LOOP IN CNS AND IOS ON IFCC CC=1
???????????????????????? *???????? DMKCNS?? R13158DK E1 MNT294 11/10/81? 09:32

So ... I'm confused about your statement. From what I see, they have been applied, and are present in CP.

?... Mark S.


New release of New Stanford Pascal (2023.01)

 

¿ªÔÆÌåÓý

This is cross-posted to both H390-VM and Hercules-390

The Stanford Pascal Compiler release 2023.01 is now available for Windows, OS/2, Linux etc. - and for VM/CMS and MVS (or z/OS) on IBM mainframes or Hercules

New features:

- CONST parameters now work with RECORDs and ARRAYs, too
- Types on parameter lists can be specified more flexibly (complete TYPE syntax, not only identifiers)
- Pointer types on function results can be specified using the arrow symbol
- LEFT and RIGHT string functions now work correctly when the second parameter is zero (null string is returned)
- a strange and difficult error in PASCAL2 (IBM 370 code generator) related to literal handling has been fixed
- PASCAL2 now is compiled with the D+ (debug) option, which involves many run-time checks and makes the PASCAL2 execution much more secure

Actual releases:

the Compiler release 2023.01 is available for Windows, OS/2 and Unix-like systems at GitHub -
the Compiler release 2023.01 is available for VM/CMS - Download here:
the Compiler release 2023.01 is available for MVS (TK4-) or z/OS - Download here:

More information on the compiler project can be found here:
If you have any questions or suggestions, please contact me directly.
Thank you very much, have a nice day

Bernd Oppolzer
Leinfelden-Echterdingen, Germany