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

Subversion Repositories t400

[/] [t400/] [trunk/] [sw/] [verif/] [black_box/] [ogi/] [test.asm] - Blame information for rev 179

Line No.	Rev	Author	Line
1	2	arniml	`;; *******************************************************************`
2	179	arniml	`;; $Id: test.asm 179 2009-04-01 19:48:38Z arniml $`
3	2	arniml	`;;`
4			`;; Checks the OGI instruction.`
5			`;;`
6
7			`;; the cpu type is defined on asl's command line`
8
9			`org 0x00`
10			`clra`
11
12			`;; output 1 on G`
13			`ogi 0x1`
14
15			`;; output 2 on G`
16			`ogi 0x2`
17
18			`;; output 4 on G`
19			`ogi 0x4`
20
21			`;; output 8 on G`
22			`ogi 0x8`
23
24	24	arniml	`;; output f on G`
25			`ogi 0xf`
26	2	arniml
27			`jmp fail`
28
29			`org 0x100`
30			`include "pass_fail.asm"`