OpenCores

URL https://opencores.org/ocsvn/t48/t48/trunk

Subversion Repositories t48

[/] [t48/] [tags/] [rel_1_1/] [sw/] [verif/] [black_box/] [cpl/] [c/] [test.asm] - Diff between revs 12 and 289

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 12	Rev 289
`;; *******************************************************************`	`;; *******************************************************************`
`;; $Id: test.asm,v 1.1.1.1 2004-03-25 22:29:17 arniml Exp $`	`;; $Id: test.asm,v 1.1.1.1 2004-03-25 22:29:17 arniml Exp $`
`;;`	`;;`
`;; Test CPL C.`	`;; Test CPL C.`
`;; *******************************************************************`	`;; *******************************************************************`

`INCLUDE "cpu.inc"`	`INCLUDE "cpu.inc"`
`INCLUDE "pass_fail.inc"`	`INCLUDE "pass_fail.inc"`

`ORG 0`	`ORG 0`

`;; Start of test`	`;; Start of test`
`jc fail`	`jc fail`

`cpl c`	`cpl c`
`jnc fail`	`jnc fail`

`mov a, #0FEH`	`mov a, #0FEH`
`add a, #001H`	`add a, #001H`
`jc fail`	`jc fail`
`cpl c`	`cpl c`
`jnc fail`	`jnc fail`

`add a, #001H`	`add a, #001H`
`jnc fail`	`jnc fail`
`cpl c`	`cpl c`
`jc fail`	`jc fail`

`pass: PASS`	`pass: PASS`

`fail: FAIL`	`fail: FAIL`

powered by: WebSVN 2.1.0

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