On 2/27/2013 12:58 PM, Crabtree, Anne D wrote:
Here's what I get:
0000FC 5110 B698 00698 20546 $DEST
DEST=$WORK16,LEN=L'$WORK16,CONV=SBINARY
000136 4160 B698 00698 20599 LA R6,$WORK16
00013A D503 C210 6000 00260 00000 20600 CLC =CL4'VPRT',0(R6)
Dump shows:
Registers 0-7
GR: 00000000 000004D2 9855D2D2 185A8810 00000000 105A81FC 00007698 00000001
AR: 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000
Registers 8-15
GR: 000B42B0 185A8869 1807B000 00007000 185F4D88 7F50F6A4 185F4E64 00000000
AR: 00000000 00000000 00000000 00000000 00000000 00000000 00000000 00000000
Note that the assembled CLC uses register 12, which has an instruction
in it. About half the registers look questionable. Some macros have
special restrictions, and may require registers to be saved; I don't
know whether the $DEST is responsible, or something earlier.
Gerhard Postpischil
Bradford, Vermont
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN