Baseless for code, but you will need a base for data.
I use
@CODE LOCTR ,
@LITERAL LOCTR ,
LITERALS DC 0D'0'
@CODE LOCTR ,
LARL Rx,LITERALS
USING LITERALS,Rx
.
.
.
.
. @LITERAL LOCTR ,
LTORG ,
On Wed, 10 Apr 2013 15:06:44 -0700 Scott Ford <[email protected]> wrote:
:>Guys,
:>
:>I am in the process of trying to understand and use baseless Assembler. I
read through Ed's Jumpify Share presentation so
:>i am trying to read and learn...I am not asking anyone to write my
code...just tell me where I am wrong ..
:>
:>SAMPL001 CSECT
:>SAMPL001 AMODE 31
:>SAMPL001 RMODE ANY
:> EJECT
:> YREGS
:> PRINT OFF
:> SYSSTATE ARCHLVL=2
:> PRINT ON
:> J BEGIN
:> DC C'cccccccccccccc'
:> DC C'cccccccccccccccccccccccccccccccc'
:> DC C'Copyright (C), ccccccccccccccccc'
:> DC C'All rights reserved'
:>BEGIN DS 0H
:> SAVE (14,12) save regs coming in
:> LR R12,R15
:> AHI R12,CONST-BEGIN
:> ......
:> ...... Failing GETMAIN for no using here
:>.......
:>
:>CONST DC 0D
:>DYNAMIC DSECT
:>SAVEAREA DS 18F register save area
:>PARMLIST DS F
:> .........
:> LTORG ,
:> IHAPSA
:> IHAASCB
:> IHAASXB
:> IRREVXP
:> IEANTASM
:> IHAACEE
:> IKJTSB LIST=YES,EXT=YES
:> END ,
:>
:> 000138 0A23 201+ SVC 35
:> 00013A 1B99 202 SR R9,R9
:> 00013C 1B88 203 SR R8,R8
:> 00013E 4100 04A4 004A4 204 LA R0,DYNSIZE
:> 206 GETMAIN RC,LV=(0),SP=229
:> 000142 208+ DS 0H
:> 000142 209+IHB0009C DS 0H
:> 000142 0000 0000 00000 210+ L
15,=AL1(B'00000000',(0),
:> +
:> ** ASMA307E No active USING for operand
=AL1(B'00000000',(0),(229),B'00000000')
:> ** ASMA435I Record 2422 in SYS1.MACLIB(GETMAIN) on volume: SDRES1
:>
:>
:>I know i misunderstood something...any pointers I would be grateful for.
:>
:>Regards,
:>Scott J Ford
:>Software Engineer
:>http://www.identityforge.com/
--
Binyamin Dissen <[email protected]>
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.
I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.
