YACAL2: CASL2処理系
[YACASL2.git] / as / lad.casl
1 MAIN    START   BEGIN
2 BEGIN   LD      GR1,A
3     LAD GR1,1,GR1
4         RET
5 A       DC      3
6         END