Re: WAKEUP - does a emulation of this module exist
MACLIB MAP tells me the SCHMAC MACLIB is not a library. I have had a look and it is full of macros that I can read by eye including the ??EQU that defines the registers. Cannot work out what could be the issue with SCHMAC other than perhaps it originates from a later VM?
Ant
|
Re: How do I load a windows folder containing 100+ assemble/copy/macro files onto my 'A' disk under VM
#sixpack
"James Oswald via groups.io" <oswaldjb@...> writes: Greetings, I'm running the VM370sixpack-1_3 Beta system, and I'm wondering how I
can load all the assemble / copy / macro files I have in a windows folder onto my 'A'
disk so that I can attempt to assemble and rebuild a series/1 emulator I wrote
almost 40 years ago.
I did successfully read one file I pointed 00C to in the configuration file, but I can't do
that one by one for 100+ membs.
I'm sure there is a way - I just haven't stumbled across it yet.
I'm running the Sixpack system under Windows.
Thanks for any help.
Get a copy of the program vma. One place it looks likes it is available is ". This program is used like zip/unzip but with vmarc archives (the the archive file type used by VM), then trnsfer the resulting archive to VM run vmarc on the VM system to extract your source. There may be other ways, but this seems to be the simplest. But then again, I'm not a VM expert, just fooled around with some of the vm/370 systems such as the various Sixpack or Community Editions. -- Bill Doughty, N2OCM MVS Sysprog & UNIX/Linux Sysadmin (retired)
|
Re: How do I load a windows folder containing 100+ assemble/copy/macro files onto my 'A' disk under VM
#sixpack
James, ? Lots of ways. If you have a REXX that’s supported by Hercules you could write REXX exec to load all the files via 00C. If you are using one of Fish’s Hercules you can use his VMFPLC2 utility to create and AWS tape which you can load with VMFPLC2 => you will need a control file There are some PC utilities in the files section of the group that let you build CMS TAPE tapes and DISKDUMP card decks. You can use an OMA/TDF tape. You need a Tape Descriptor FILE (.TDF) that lists the disk files you want to be on a tape. See the documentation for your Hercules. You can ZIP the files up with no compression and use MVSUNZIP on VM There are PC versions of VMARC…… ? Dave ? ?
toggle quoted message
Show quoted text
From: [email protected] <[email protected]> On Behalf Of James Oswald via groups.io
Sent: 09 February 2022 16:00
To: [email protected]
Subject: [h390-vm] How do I load a windows folder containing 100+ assemble/copy/macro files onto my 'A' disk under VM #sixpack? Greetings,? I'm running the VM370sixpack-1_3 Beta system, and I'm wondering how I can load all the assemble / copy / macro files I have in a windows folder onto my 'A' disk so that I can attempt to assemble and rebuild a series/1 emulator I wrote almost 40 years ago.?
I did successfully read one file I pointed 00C to in the configuration file, but I can't do that one by one for 100+ members.
I'm sure there is a way - I just haven't stumbled across it yet.
I'm running the Sixpack system under Windows.
Thanks for any help.
|
Re: How do I load a windows folder containing 100+ assemble/copy/macro files onto my 'A' disk under VM
#sixpack
Hi James,
you can make a VMARC file of that directory and upload that using IND$FILE, using the upload facility of most 3270 emulators. You can get a windows version of VMA (that can make a VMARC file) on? If that does not work, send me a zip file and I’ll send you a VMARC file of it back.
Then VMARC UNPK it on VM/370.?
best regards,
toggle quoted message
Show quoted text
On 9 Feb 2022, at 17:00, James Oswald via < oswaldjb@...> wrote:
Greetings,? I'm running the VM370sixpack-1_3 Beta system, and I'm wondering how I can load all the assemble / copy / macro files I have in a windows folder onto my 'A' disk so that I can attempt to assemble and rebuild a series/1 emulator I wrote almost 40 years ago.?
I did successfully read one file I pointed 00C to in the configuration file, but I can't do that one by one for 100+ members.
I'm sure there is a way - I just haven't stumbled across it yet.
I'm running the Sixpack system under Windows.
Thanks for any help.
|
How do I load a windows folder containing 100+ assemble/copy/macro files onto my 'A' disk under VM
#sixpack
Greetings,? I'm running the VM370sixpack-1_3 Beta system, and I'm wondering how I can load all the assemble / copy / macro files I have in a windows folder onto my 'A' disk so that I can attempt to assemble and rebuild a series/1 emulator I wrote almost 40 years ago.?
I did successfully read one file I pointed 00C to in the configuration file, but I can't do that one by one for 100+ members.
I'm sure there is a way - I just haven't stumbled across it yet.
I'm running the Sixpack system under Windows.
Thanks for any help.
|
Re: Stupid z/VM 7.1 assembler question
HLASM is included with z/OS but I believe it is still an additional cost.
Dennis
toggle quoted message
Show quoted text
On 2/6/22 22:55, Fish Fish wrote: Tony Harminc wrote:
[...]
I think it's separately priced. :-( :(
It's included in z/OS because it's needed for various things
like sysgens. I would think the same would be true for z/VM too!
[...]
Of course if you have access to a z/OS system you can use that
and just send the object deck over. There is obviously nothing
in your program that depends on an operating system. :-) Or I can just use Harold Grovesteen's excellent ASMA that comes with his SATK product:
*
and then just upload the resulting binary .core file to z/VM and load and run it via "cpvload" instead (which is what I usually do and what I did to resolve my problem this time too). It's just that I thought it might be faster and simpler to just write it directly on z/VM itself since it was such a small/simple program rather than having to mess with "vmfplc2"ing it. So I was quite surprised when that didn't work.
I also ran it through HLASM here at work, and it fails because
your TBEGIN[C]s have no operands. Yeah, you'd think that comma
would do, but I changed them to 0,0 and that makes it happy. Thanks. Fixed. ASMA is more forgiving in that regard though. For any missing arguments it just presumes/uses 0.
(Well it then complains about no base register in the D1(B1)
expression, but that sounds bogus to me. That sounds completely bogus to me too. The use of a TDB is entirely optional for TBEGIN and is not even allowed for TBEGINC, and the way you indicate that (according to the Principles of Operation) is by specifying the operand as zero.
Regardless, I turned off the complaint (NOPAGE0 option) and it
assembles cleanly. I can send you the listing and object deck
if you like, but I can't do this as an ongoing service. Nah. I got around it using ASMA as I said. (I just *love* ASMA!)
But thanks anyway.
|
Re: Stupid z/VM 7.1 assembler question
Mike,
Not sure how long ago you got involved, but I feel this goes back to when IBM released VM/ESA and started shipping some modules as OCO.
They wanted to stop customers from tampering with the code, and removing the ASSEMBLER made this simpler.
It was much harder to justify a system modification of you had to buy the assembler to implement it.
You might want to browse some of the VMSAHRE files on OCO here:-
Dave
toggle quoted message
Show quoted text
-----Original Message-----
From: [email protected] <[email protected]> On Behalf Of Mike Ward
Sent: 07 February 2022 12:02
To: [email protected]
Subject: Re: [h390-vm] Stupid z/VM 7.1 assembler question
It's all about money......
-----Original Message-----
From: [email protected] <[email protected]> On Behalf Of Fish Fish
Sent: Sunday, February 6, 2022 9:31 PM
To: [email protected]
Subject: Re: [h390-vm] Stupid z/VM 7.1 assembler question
Dave Wade wrote:
[...]
There is no HLASM in the base. It remains a chargeable, installable
product. !! (me: shocked)
[...]
Not sure but be aware that as well as having no modern OP CODE support
from what I remember it won't generate code that the linker considers
to be 64-bit. It is in fact exactly the same assembler that there is
in VM/370 (well I think it has a couple of fixes) but it still has the
same limits and needs patching to assemble. I find it both shocking and disappointing that IBM now chooses to charge for
such a product. :(
You would think an assembler that supports the very architecture their very
operating system runs in (as well as what's used in all of their code
samples/examples and what they recommend/encourage all their customers
to use too) would be an integral REQUIRED component of the operating
system itself, and not a chargeable "add-on" product. It seems silly to me
(and somewhat insulting as well) to only provide an assembler that is by
design INCAPABLE of generating the very code that the operating system
itself uses.
Boy, IBM sure has changed over the years.
And not for the better either.
(sigh)
:(
--
"Fish" (David B. Trout)
Software Development Laboratories
mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
It's all about money......
toggle quoted message
Show quoted text
-----Original Message----- From: [email protected] < [email protected]> On Behalf Of Fish Fish Sent: Sunday, February 6, 2022 9:31 PM To: [email protected]Subject: Re: [h390-vm] Stupid z/VM 7.1 assembler question Dave Wade wrote: [...] There is no HLASM in the base. It remains a chargeable, installable
product. !! (me: shocked) [...] Not sure but be aware that as well as having no modern OP CODE support
from what I remember it won't generate code that the linker considers
to be 64-bit. It is in fact exactly the same assembler that there is
in VM/370 (well I think it has a couple of fixes) but it still has the
same limits and needs patching to assemble. I find it both shocking and disappointing that IBM now chooses to charge for such a product. :( You would think an assembler that supports the very architecture their very operating system runs in (as well as what's used in all of their code samples/examples and what they recommend/encourage all their customers to use too) would be an integral REQUIRED component of the operating system itself, and not a chargeable "add-on" product. It seems silly to me (and somewhat insulting as well) to only provide an assembler that is by design INCAPABLE of generating the very code that the operating system itself uses. Boy, IBM sure has changed over the years. And not for the better either. (sigh) :( -- "Fish" (David B. Trout) Software Development Laboratories mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
Tony Harminc wrote: [...] I think it's separately priced. :-( :( It's included in z/OS because it's needed for various things
like sysgens. I would think the same would be true for z/VM too! [...] Of course if you have access to a z/OS system you can use that
and just send the object deck over. There is obviously nothing
in your program that depends on an operating system. :-) Or I can just use Harold Grovesteen's excellent ASMA that comes with his SATK product: * and then just upload the resulting binary .core file to z/VM and load and run it via "cpvload" instead (which is what I usually do and what I did to resolve my problem this time too). It's just that I thought it might be faster and simpler to just write it directly on z/VM itself since it was such a small/simple program rather than having to mess with "vmfplc2"ing it. So I was quite surprised when that didn't work. I also ran it through HLASM here at work, and it fails because
your TBEGIN[C]s have no operands. Yeah, you'd think that comma
would do, but I changed them to 0,0 and that makes it happy. Thanks. Fixed. ASMA is more forgiving in that regard though. For any missing arguments it just presumes/uses 0. (Well it then complains about no base register in the D1(B1)
expression, but that sounds bogus to me. That sounds completely bogus to me too. The use of a TDB is entirely optional for TBEGIN and is not even allowed for TBEGINC, and the way you indicate that (according to the Principles of Operation) is by specifying the operand as zero. Regardless, I turned off the complaint (NOPAGE0 option) and it
assembles cleanly. I can send you the listing and object deck
if you like, but I can't do this as an ongoing service. Nah. I got around it using ASMA as I said. (I just *love* ASMA!) But thanks anyway. -- "Fish" (David B. Trout) Software Development Laboratories mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
Dave Wade wrote: [...] There is no HLASM in the base. It remains a chargeable,
installable product. !! (me: shocked) [...] Not sure but be aware that as well as having no modern OP CODE
support from what I remember it won't generate code that the
linker considers to be 64-bit. It is in fact exactly the same
assembler that there is in VM/370 (well I think it has a couple
of fixes) but it still has the same limits and needs patching
to assemble. I find it both shocking and disappointing that IBM now chooses to charge for such a product. :( You would think an assembler that supports the very architecture their very operating system runs in (as well as what's used in all of their code samples/examples and what they recommend/encourage all their customers to use too) would be an integral REQUIRED component of the operating system itself, and not a chargeable "add-on" product. It seems silly to me (and somewhat insulting as well) to only provide an assembler that is by design INCAPABLE of generating the very code that the operating system itself uses. Boy, IBM sure has changed over the years. And not for the better either. (sigh) :( -- "Fish" (David B. Trout) Software Development Laboratories mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
Joe Monk wrote: I think what you are looking for can be found at File 177
of the CBT tape. This is Jan Jaeger's MNEMAC package which
implements the z/arch instructions as macros to assembler XF. Thanks, Joe! -- "Fish" (David B. Trout) Software Development Laboratories mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
toggle quoted message
Show quoted text
-----Original Message-----
From: [email protected] <[email protected]> On Behalf Of Fish Fish
Sent: 06 February 2022 20:25
To: [email protected]
Subject: Re: [h390-vm] Stupid z/VM 7.1 assembler question
René wrote:
Is HLASM now in the base? I have no idea! How do I tell? I told you I am inexperienced with modern
z/VM! Help!
There is no HLASM in the base. It remains a chargeable, installable product.
In 6.4 it still wasn’t. If you only have assembler XF, Fish, look for
the downloadable OPCODES package. Where do I find it? Where can I download it from? How to I install it once it's
downloaded? Help!
Not sure but be aware that as well as having no modern OP CODE support from what I remember it won't generate code that the linker considers to be 64-bit. It is in fact exactly the same assembler that there is in VM/370 (well I think it has a couple of fixes) but it still has the same limits and needs patching to assemble. --
"Fish" (David B. Trout)
Software Development Laboratories
mail: fish@...
Dave G4UGM
|
Re: Stupid z/VM 7.1 assembler question
René wrote:
> Is HLASM now in the base?
I have no idea! How do I tell? I told you I am inexperienced with modern z/VM! Help!
I think it's separately priced. :-(? It's included in z/OS because it's needed for various things like sysgens.
> In 6.4 it still wasn’t. If you only have assembler XF, Fish,
> look for the downloadable OPCODES package.
Thing is, the new opcodes (STG, LCTLG, etc.) aren't all that you need for your program. Those AD adcons aren't going to work, and I doubt they are included in macros. Well, perhaps they are (I don't know the macro package), but in the general case it would be difficult to make them work in a 24-bit assembler.
I ran your code through the free "try it" at Dignus (), but amusingly it seems that the assembler at that page has an expired licence, and all it does is show you the input listing.
Dignus is a good bet if you don't have a local assembler you can use. It wouldn't hurt to at least point out that the try it page is broken. Of course if you have access to a z/OS system you can use that and just send the object deck over. There is obviously nothing in your program that depends on an operating system. :-)
I also ran it through HLASM here at work, and it fails because your TBEGIN[C]s have no operands. Yeah, you'd think that comma would do, but I changed them to 0,0 and that makes it happy. (Well it then complains about no base register in the D1(B1) expression, but that sounds bogus to me. Regardless, I turned off the complaint (NOPAGE0 option) and it assembles cleanly. I can send you the listing and object deck if you like, but I can't do this as an ongoing service.
Tony H.
|
Re: Stupid z/VM 7.1 assembler question
Hi Fish ...
I think what you are looking for can be found at File 177 of the CBT tape. This is Jan Jaeger's MNEMAC package which implements?the z/arch instructions as macros to assembler XF.
Joe
Joe Monk wrote:
> Has your version of Assembler XF been patched for
> z/Arch opcodes?
I have no idea! How can I tell? I told you I was inexperienced with modern z/VM! Help!
> I thought the only way to get z/Arch opcodes in Assembler XF
> was via macros?
So okay then, where are the macros I need? Which maclib? What global maclib command do I need to enter before issuing my assemble command? I told you I was inexperienced with modern z/VM! Help!
--
"Fish" (David B. Trout)
Software Development Laboratories
mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
Joe Monk wrote: Has your version of Assembler XF been patched for
z/Arch opcodes? I have no idea! How can I tell? I told you I was inexperienced with modern z/VM! Help! I thought the only way to get z/Arch opcodes in Assembler XF
was via macros? So okay then, where are the macros I need? Which maclib? What global maclib command do I need to enter before issuing my assemble command? I told you I was inexperienced with modern z/VM! Help! -- "Fish" (David B. Trout) Software Development Laboratories mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
Joe Monk wrote: Or maybe ... If youre assembling on z/VM 7.1, why arent you
using HLASM instead of Assembler XF (IFOX00)? Because I don't know how! I told you I was inexperienced with modern z/VM! When I try entering the command "hlasm", I get the following error: hlasm ASMACMS074E Required module 'ASMADOPT MODULE' not found Ready(00040); T=0.01/0.01 12:26:20 -- "Fish" (David B. Trout) Software Development Laboratories mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
René wrote: Is HLASM now in the base? I have no idea! How do I tell? I told you I am inexperienced with modern z/VM! Help! In 6.4 it still wasn’t. If you only have assembler XF, Fish,
look for the downloadable OPCODES package. Where do I find it? Where can I download it from? How to I install it once it's downloaded? Help! -- "Fish" (David B. Trout) Software Development Laboratories mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
Yes, to my surprise and shock, the assembler that comes with z/VM is
still the 370 version, probably about the same level as the
assembler that comes with MVS 3.8. No XA, ESA or z/Arch instruction
support built in. You have to buy the HLASM to get that. (Or use
macros, as mentioned below.)
Dennis Stone
On 2/6/22 14:18, Joe Monk wrote:
toggle quoted message
Show quoted text
"ASSEMBLER (XF) DONE"?
Has your version of Assembler XF been patched for z/Arch
opcodes? I thought the only way to get z/Arch opcodes in
Assembler XF was via macros?
Joe
Folks,
Sorry to bother you with a question about z/VM, but I'm afraid
I'm just not that skilled at doing software development on
modern z/VM systems.
I have a simple standalone test program I want to assemble and
genmod under CMS, but the assembler keeps flagging almost
every statement with "undefined opcode". I noticed they're all
z/Arch instructions.
So it seems obvious I'm either missing some simple but
critically important option to tell the assembler this is a
z/Arch program and not a S/370 or S/390 program, -OR- perhaps
more likely, I'm simply invoking the wrong damn assembler!
Here's the program, and, following it, the errors I get when I
try to assemble it.
HELP!? :(
TXFPER? ?START 0
? ? ? ? ?USING TXFPER,R0
? ? ? ? ?ORG? ?TXFPER+X'1A0'? ? ? ? z Restart New PSW
? ? ? ? ?DC? ? X'0000000180000000'
? ? ? ? ?DC? ? AD(GO)
? ? ? ? ?ORG? ?TXFPER+X'200'
GO? ? ? ?DS? ? 0H
? ? ? ? ?STCTG R0,R0,CTL0
? ? ? ? ?LG? ? R0,CTL0
? ? ? ? ?OIHH? R0,CR0TXF
? ? ? ? ?STG? ?R0,CTL0
? ? ? ? ?LCTLG R0,R0,CTL0
? ? ? ? ?BAL? ?R14,CTRANS
? ? ? ? ?BAL? ?R14,UTRANS
? ? ? ? ?LPSWE GOODPSW
CTRANS? ?DS? ? 0H
? ? ? ? ?LA? ? R1,1(R1,R1)
? ? ? ? ?TBEGINC ,
? ? ? ? ?LA? ? R2,2(R2,R2)
? ? ? ? ?TEND? ,
? ? ? ? ?LA? ? R3,3(R3,R3)
? ? ? ? ?BR? ? R14
UTRANS? ?DS? ? 0H
? ? ? ? ?LA? ? R1,1(R1,R1)
? ? ? ? ?TBEGIN ,
? ? ? ? ?LA? ? R2,2(R2,R2)
? ? ? ? ?TBEGIN ,
? ? ? ? ?LA? ? R3,3(R3,R3)
? ? ? ? ?TEND? ,
? ? ? ? ?LA? ? R4,4(R4,R4)
? ? ? ? ?TEND? ,
? ? ? ? ?LA? ? R5,5(R5,R5)
? ? ? ? ?BR? ? R14
CTL0? ? ?DC? ? D'0'? ? ? ? ? ? ? ?Control Register 0
CR0TXF? ?EQU? ?X'0080'? ? ? ? ? ? CR0 bit 8: TXF Control
GOODPSW? DC? ? XL8'0002000180000000'
? ? ? ? ?DC? ? XL4'00000000',A(X'00000000')
R0? ? ? ?EQU? ?0
R1? ? ? ?EQU? ?1
R2? ? ? ?EQU? ?2
R3? ? ? ?EQU? ?3
R4? ? ? ?EQU? ?4
R5? ? ? ?EQU? ?5
R6? ? ? ?EQU? ?6
R7? ? ? ?EQU? ?7
R8? ? ? ?EQU? ?8
R9? ? ? ?EQU? ?9
R10? ? ? EQU? ?10
R11? ? ? EQU? ?11
R12? ? ? EQU? ?12
R13? ? ? EQU? ?13
R14? ? ? EQU? ?14
R15? ? ? EQU? ?15
? ? ? ? ?END
assemble txfper
ASSEMBLER (XF) DONE
? ? ? ? ? ? ? ? 5? ? ? ? ? DC? ? AD(GO)
IFO178 SYNTAX ERROR NEAR OPERAND COLUMN 2
? ? ? ? ? ? ? ? 8? ? ? ? ? STCTG R0,R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ? 9? ? ? ? ? LG? ? R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?10? ? ? ? ? OIHH? R0,CR0TXF
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?11? ? ? ? ? STG? ?R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?12? ? ? ? ? LCTLG R0,R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?15? ? ? ? ? LPSWE GOODPSW
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?18? ? ? ? ? TBEGINC ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?20? ? ? ? ? TEND? ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?25? ? ? ? ? TBEGIN ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?27? ? ? ? ? TBEGIN ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?29? ? ? ? ? TEND? ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?31? ? ? ? ? TEND? ,
IFO078 UNDEFINED OP CODE
NUMBER OF STATEMENTS FLAGGED IN THIS ASSEMBLY =? ? 13
Ready(00008); T=0.09/0.13 10:45:36
What am I doing wrong? What am I missing?
HELP!? :(
Thanks.
--
"Fish" (David B. Trout)
Software Development Laboratories
mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
Is HLASM now in the base? In 6.4 it still wasn’t. If you only have assembler XF, Fish, look for the downloadable OPCODES package.
Best regards,
toggle quoted message
Show quoted text
On 6 Feb 2022, at 20:22, Joe Monk <joemonk64@...> wrote:
? Or maybe ... If youre?assembling on z/VM 7.1, why arent you using HLASM ?instead of Assembler XF (IFOX00)?
Joe "ASSEMBLER (XF) DONE"?
Has your version of Assembler XF been patched for z/Arch opcodes? I thought the only way to get z/Arch opcodes in Assembler XF was via macros?
Joe
Folks,
Sorry to bother you with a question about z/VM, but I'm afraid I'm just not that skilled at doing software development on modern z/VM systems.
I have a simple standalone test program I want to assemble and genmod under CMS, but the assembler keeps flagging almost every statement with "undefined opcode". I noticed they're all z/Arch instructions.
So it seems obvious I'm either missing some simple but critically important option to tell the assembler this is a z/Arch program and not a S/370 or S/390 program, -OR- perhaps more likely, I'm simply invoking the wrong damn assembler!
Here's the program, and, following it, the errors I get when I try to assemble it.
HELP!? :(
TXFPER? ?START 0
? ? ? ? ?USING TXFPER,R0
? ? ? ? ?ORG? ?TXFPER+X'1A0'? ? ? ? z Restart New PSW
? ? ? ? ?DC? ? X'0000000180000000'
? ? ? ? ?DC? ? AD(GO)
? ? ? ? ?ORG? ?TXFPER+X'200'
GO? ? ? ?DS? ? 0H
? ? ? ? ?STCTG R0,R0,CTL0
? ? ? ? ?LG? ? R0,CTL0
? ? ? ? ?OIHH? R0,CR0TXF
? ? ? ? ?STG? ?R0,CTL0
? ? ? ? ?LCTLG R0,R0,CTL0
? ? ? ? ?BAL? ?R14,CTRANS
? ? ? ? ?BAL? ?R14,UTRANS
? ? ? ? ?LPSWE GOODPSW
CTRANS? ?DS? ? 0H
? ? ? ? ?LA? ? R1,1(R1,R1)
? ? ? ? ?TBEGINC ,
? ? ? ? ?LA? ? R2,2(R2,R2)
? ? ? ? ?TEND? ,
? ? ? ? ?LA? ? R3,3(R3,R3)
? ? ? ? ?BR? ? R14
UTRANS? ?DS? ? 0H
? ? ? ? ?LA? ? R1,1(R1,R1)
? ? ? ? ?TBEGIN ,
? ? ? ? ?LA? ? R2,2(R2,R2)
? ? ? ? ?TBEGIN ,
? ? ? ? ?LA? ? R3,3(R3,R3)
? ? ? ? ?TEND? ,
? ? ? ? ?LA? ? R4,4(R4,R4)
? ? ? ? ?TEND? ,
? ? ? ? ?LA? ? R5,5(R5,R5)
? ? ? ? ?BR? ? R14
CTL0? ? ?DC? ? D'0'? ? ? ? ? ? ? ?Control Register 0
CR0TXF? ?EQU? ?X'0080'? ? ? ? ? ? CR0 bit 8: TXF Control
GOODPSW? DC? ? XL8'0002000180000000'
? ? ? ? ?DC? ? XL4'00000000',A(X'00000000')
R0? ? ? ?EQU? ?0
R1? ? ? ?EQU? ?1
R2? ? ? ?EQU? ?2
R3? ? ? ?EQU? ?3
R4? ? ? ?EQU? ?4
R5? ? ? ?EQU? ?5
R6? ? ? ?EQU? ?6
R7? ? ? ?EQU? ?7
R8? ? ? ?EQU? ?8
R9? ? ? ?EQU? ?9
R10? ? ? EQU? ?10
R11? ? ? EQU? ?11
R12? ? ? EQU? ?12
R13? ? ? EQU? ?13
R14? ? ? EQU? ?14
R15? ? ? EQU? ?15
? ? ? ? ?END
assemble txfper
ASSEMBLER (XF) DONE
? ? ? ? ? ? ? ? 5? ? ? ? ? DC? ? AD(GO)
IFO178 SYNTAX ERROR NEAR OPERAND COLUMN 2
? ? ? ? ? ? ? ? 8? ? ? ? ? STCTG R0,R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ? 9? ? ? ? ? LG? ? R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?10? ? ? ? ? OIHH? R0,CR0TXF
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?11? ? ? ? ? STG? ?R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?12? ? ? ? ? LCTLG R0,R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?15? ? ? ? ? LPSWE GOODPSW
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?18? ? ? ? ? TBEGINC ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?20? ? ? ? ? TEND? ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?25? ? ? ? ? TBEGIN ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?27? ? ? ? ? TBEGIN ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?29? ? ? ? ? TEND? ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?31? ? ? ? ? TEND? ,
IFO078 UNDEFINED OP CODE
NUMBER OF STATEMENTS FLAGGED IN THIS ASSEMBLY =? ? 13
Ready(00008); T=0.09/0.13 10:45:36
What am I doing wrong? What am I missing?
HELP!? :(
Thanks.
--
"Fish" (David B. Trout)
Software Development Laboratories
mail: fish@...
|
Re: Stupid z/VM 7.1 assembler question
Or maybe ... If youre?assembling on z/VM 7.1, why arent you using HLASM ?instead of Assembler XF (IFOX00)?
Joe
"ASSEMBLER (XF) DONE"?
Has your version of Assembler XF been patched for z/Arch opcodes? I thought the only way to get z/Arch opcodes in Assembler XF was via macros?
Joe
Folks,
Sorry to bother you with a question about z/VM, but I'm afraid I'm just not that skilled at doing software development on modern z/VM systems.
I have a simple standalone test program I want to assemble and genmod under CMS, but the assembler keeps flagging almost every statement with "undefined opcode". I noticed they're all z/Arch instructions.
So it seems obvious I'm either missing some simple but critically important option to tell the assembler this is a z/Arch program and not a S/370 or S/390 program, -OR- perhaps more likely, I'm simply invoking the wrong damn assembler!
Here's the program, and, following it, the errors I get when I try to assemble it.
HELP!? :(
TXFPER? ?START 0
? ? ? ? ?USING TXFPER,R0
? ? ? ? ?ORG? ?TXFPER+X'1A0'? ? ? ? z Restart New PSW
? ? ? ? ?DC? ? X'0000000180000000'
? ? ? ? ?DC? ? AD(GO)
? ? ? ? ?ORG? ?TXFPER+X'200'
GO? ? ? ?DS? ? 0H
? ? ? ? ?STCTG R0,R0,CTL0
? ? ? ? ?LG? ? R0,CTL0
? ? ? ? ?OIHH? R0,CR0TXF
? ? ? ? ?STG? ?R0,CTL0
? ? ? ? ?LCTLG R0,R0,CTL0
? ? ? ? ?BAL? ?R14,CTRANS
? ? ? ? ?BAL? ?R14,UTRANS
? ? ? ? ?LPSWE GOODPSW
CTRANS? ?DS? ? 0H
? ? ? ? ?LA? ? R1,1(R1,R1)
? ? ? ? ?TBEGINC ,
? ? ? ? ?LA? ? R2,2(R2,R2)
? ? ? ? ?TEND? ,
? ? ? ? ?LA? ? R3,3(R3,R3)
? ? ? ? ?BR? ? R14
UTRANS? ?DS? ? 0H
? ? ? ? ?LA? ? R1,1(R1,R1)
? ? ? ? ?TBEGIN ,
? ? ? ? ?LA? ? R2,2(R2,R2)
? ? ? ? ?TBEGIN ,
? ? ? ? ?LA? ? R3,3(R3,R3)
? ? ? ? ?TEND? ,
? ? ? ? ?LA? ? R4,4(R4,R4)
? ? ? ? ?TEND? ,
? ? ? ? ?LA? ? R5,5(R5,R5)
? ? ? ? ?BR? ? R14
CTL0? ? ?DC? ? D'0'? ? ? ? ? ? ? ?Control Register 0
CR0TXF? ?EQU? ?X'0080'? ? ? ? ? ? CR0 bit 8: TXF Control
GOODPSW? DC? ? XL8'0002000180000000'
? ? ? ? ?DC? ? XL4'00000000',A(X'00000000')
R0? ? ? ?EQU? ?0
R1? ? ? ?EQU? ?1
R2? ? ? ?EQU? ?2
R3? ? ? ?EQU? ?3
R4? ? ? ?EQU? ?4
R5? ? ? ?EQU? ?5
R6? ? ? ?EQU? ?6
R7? ? ? ?EQU? ?7
R8? ? ? ?EQU? ?8
R9? ? ? ?EQU? ?9
R10? ? ? EQU? ?10
R11? ? ? EQU? ?11
R12? ? ? EQU? ?12
R13? ? ? EQU? ?13
R14? ? ? EQU? ?14
R15? ? ? EQU? ?15
? ? ? ? ?END
assemble txfper
ASSEMBLER (XF) DONE
? ? ? ? ? ? ? ? 5? ? ? ? ? DC? ? AD(GO)
IFO178 SYNTAX ERROR NEAR OPERAND COLUMN 2
? ? ? ? ? ? ? ? 8? ? ? ? ? STCTG R0,R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ? 9? ? ? ? ? LG? ? R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?10? ? ? ? ? OIHH? R0,CR0TXF
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?11? ? ? ? ? STG? ?R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?12? ? ? ? ? LCTLG R0,R0,CTL0
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?15? ? ? ? ? LPSWE GOODPSW
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?18? ? ? ? ? TBEGINC ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?20? ? ? ? ? TEND? ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?25? ? ? ? ? TBEGIN ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?27? ? ? ? ? TBEGIN ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?29? ? ? ? ? TEND? ,
IFO078 UNDEFINED OP CODE
? ? ? ? ? ? ? ?31? ? ? ? ? TEND? ,
IFO078 UNDEFINED OP CODE
NUMBER OF STATEMENTS FLAGGED IN THIS ASSEMBLY =? ? 13
Ready(00008); T=0.09/0.13 10:45:36
What am I doing wrong? What am I missing?
HELP!? :(
Thanks.
--
"Fish" (David B. Trout)
Software Development Laboratories
mail: fish@...
|
Anthony Smith
