エラー文字列が空のとき、変数にNULLではなく'\0'を設定するよう変更
[YACASL2.git] / as / cmd / CPA / cpa_r_adr__s.casl
1 ;;; CPA r,adr SF:1
2 MAIN    START   BEGIN
3 BEGIN   LD      GR1,A
4         CPA     GR1,B
5         RET
6 A       DC      #5000
7 B       DC      #7000
8         END