as/addl.casl

   1 ;;; ADDL r,adr
   2 MAIN    START
   3         PUSH    0,GR1
   4         LD      GR1,A
   5         ADDL    GR1,B
   6         ST      GR1,C
   7         POP     GR1
   8         RET
   9 A       DC      3
  10 B       DC      2
  11 C       DS      1
  12         END