Subversion Repositories scarts

# sh testcase for subc $rm, $rn -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32

        .include "compact/testutils.inc"

        start
zero:
        mov #0, r0
        mov #0, r1
        clrt
        subc r0, r1
        assert r1, #0

zerot:
        mov #0, r0
        mov #0, r1
        sett
        subc r0, r1
        # Invert all 1's to all 0's for ease of comparison.
        not r1, r1
        assert r1, #0

null:
        mov #0, r0
        mov #10, r1
        clrt
        subc r0, r1
        assert r1, #10

nullt:
        mov #0, r0
        mov #10, r1
        sett
        subc r0, r1
        assert r1, #9

subc:
        mov #10, r0
        mov #0, r1
        clrt
        subc r0, r1
        # Again, invert ..
        not r1, r1
        assert r1, #9

subct:
        mov #10, r0
        mov #0, r1
        sett
        subc r0, r1
        # Again, invert ..
        not r1, r1
        assert r1, #10

subc2:
        mov #10, r0
        mov #20, r1
        clrt
        subc r0, r1
        assert r1, #10

subc2t:
        mov #20, r0
        mov #10, r1
        sett
        subc r0, r1
        # Again, invert ..
        not r1, r1
        assert r1, #10

subc3:
        mov #5, r0
        mov #5, r1
        clrt
        subc r0, r1
        assert r1, #0

subc3t:
        mov #5, r0
        mov #5, r1
        sett
        subc r0, r1
        # Again, invert ..
        not r1, r1
        assert r1, #0
        
large:
        mov #2, r0
        mov #10, r1
        clrt
        subc r1, r0
        # Again, invert ..
        not r0, r0
        assert r0, #7

larget:
        mov #2, r0
        mov #10, r1
        sett
        subc r0, r1
        assert r1, #7

okay:
        pass

wrong:
        fail