Here is a really really really trivial vector program:

          VL   1,VEC2
          VL   2,VEC2
          VA   3,1,2,2
          VST  3,VSAVEIT
          LM    1,4,VSAVEIT           get answers in GPR 1,2,3,4
          DC   F'0'                              force abend to see the 
registers
VEC1  DC  F'1',F'2',F'3',F'4'
VEC2  DC  F'5',F'6',F'7',F'8'
VSAVEIT DC  4F'0'

You should see in 1+5 in GPR1, 2+6 in GPR 2, etc.
(It works with zPDT.)

Bill Ogden


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN

Reply via email to