* CSST test $Id$
sysclear
archmode esame
r 1a0=00000000000000000000000000000200 # z/Arch restart PSW
r 1d0=0002000180000000000000000000DEAD # z/Arch pgm new PSW
r 200=58000314     # L R0,CODE8        R0=SC,FC      
r 204=E31003400004 # LG R1,PLPTR       R1=Parameter list pointer
r 20A=E34003480004 # LG R4,CMPVA       R4=Compare value
r 210=C84203700378 # CSST AREA1,AREA2,R4   Compare and Swap and Store
r 216=58000310     # L R0,CODE4        R0=SC,FC      
r 21A=E31003400004 # LG R1,PLPTR       R1=Parameter list pointer
r 220=E34003480004 # LG R4,CMPVA       R4=Compare value
r 226=C84203700378 # CSST AREA1,AREA2,R4   Compare and Swap and Store
r 22C=58000318     # L R0,CODE16       R0=SC,FC      
r 230=E31003400004 # LG R1,PLPTR       R1=Parameter list pointer
r 236=E34003480004 # LG R4,CMPVA       R4=Compare value
r 23C=C84203700378 # CSST AREA1,AREA2,R4   Compare and Swap and Store
r 242=B2B20300     # LPSWE WAITPSW     Load enabled wait PSW
r 300=07020001800000000000000000FED0D0 # WAITPSW Enabled wait state PSW
r 310=12340300     # CODE4  DC X'12340300'  SC=03,FC=00
r 314=12340101     # CODE8  DC X'12340101'  SC=01,FC=01
r 318=12340402     # CODE16 DC X'12340402'  SC=04,FC=02 CSST FAC-2 TEST
r 340=A5A5A5A5A500035F # PLPTR DC A(PLIST)
r 348=FFFFFFFFA5A6A7A8 # CMPVA Compare value
r 350=1234567890ABCDEF # PLIST Replacement value     
r 358=0000000000000000 #   "   Reserved
r 360=9FEDCBA087654321 #   "   Store value
r 368=0000000000000000 #   "   Reserved
r 370=A5A6A7A812345678 # AREA1 First operand
r 378=FFFFFFFFFFFFFFFF # AREA2 Second operand
s+
restart
