[YACASL2.git] / as / FE_TESTS / 2008_10 / Q09 / ptn3_call.casl

MAIN    START
        LAD     GR1,5
        CALL    PTN3
        LD      GR1,GR2
        CALL    OUTB
        RET
        END