as/add2.casl

   1 MAIN    START
   2 BEGIN   LD      GR0,A
   3         LD      GR1,B
   4         ADDA    GR0,GR1
   5     ST  GR1,C
   6     RET
   7 A       DC      3
   8 B       DC      1
   9 C       DS      1
  10         END