OpenCores
URL https://opencores.org/ocsvn/t400/t400/trunk

Subversion Repositories t400

[/] [t400/] [trunk/] [sw/] [verif/] [black_box/] [ske/] [test.asm] - Rev 2

Go to most recent revision | Compare with Previous | Blame | View Log

        ;; *******************************************************************
        ;; $Id: test.asm,v 1.1.1.1 2006-05-06 01:56:45 arniml Exp $
        ;;
        ;; Checks the SKE instruction.
        ;;

        ;; the cpu type is defined on asl's command line

        org     0x00
        clra

        ;; test 0 == 0
        x       0x0
        clra
        ske
        jmp     fail

        ;; test 5 == 5
        clra
        aisc    0x5
        x       0x0
        ld      0x0
        ske
        jmp     fail

        ;; test a == a
        clra
        aisc    0xa
        x       0x0
        ld      0x0
        ske
        jmp     fail

        ;; test f == f
        clra
        aisc    0xf
        x       0x0
        ld      0x0
        ske
        jmp     fail

        ;; test 0 == f
        clra
        ske
        jmp     ok_0_ne_f
        jmp     fail

ok_0_ne_f:
        ;; test f == 0
        x       0x0
        ske
        jmp     ok_f_ne_0
        jmp     fail

ok_f_ne_0:
        jmp     pass


        org     0x100
        include "pass_fail.asm"

Go to most recent revision | Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.