YACAL2: CASL2処理系

[YACASL2.git] / as / minus.casl

MAIN    START
BEGIN   LD      GR1,A
        XOR     GR1,B
    LAD GR1,1,GR1
    RET
A       DC      -3
B       DC      #FFFF
        END