as/cmd/CALL/call1.casl

   1 MAIN    START   BEGIN
   2 BEGIN   LAD     GR1,29
   3         CALL    COPY
   4         RET
   5 COPY    LD      GR2,GR1
   6         RET
   7         END