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

Subversion Repositories ssbcc

[/] [ssbcc/] [trunk/] [core/] [9x8/] [peripherals/] [tb/] [outFIFO_async/] [tb_outFIFO_async.s] - Blame information for rev 2

Details | Compare with Previous | View Log


; Copyright 2013, Sinclair R.F., Inc.
;
; Test bench for big_output peripheral.
 
.main
 
  ; Write 64 unqiue values to the FIFO whenever possible.
  ${64-1} :loop
    .inport(I_FULL) .jumpc(loop)
    O_DATA outport
  .jumpc(loop,1-) drop
 
  ; Wait for the FIFO to become empty
  :wait .inport(I_EMPTY) 0= .jumpc(wait)
 
  ; Send the termination signal and then enter an infinite loop.
  1 .outport(O_DONE)
  :infinite .jump(infinite)

Line No.	Rev	Author	Line
1	2	sinclairrf	`; Copyright 2013, Sinclair R.F., Inc.`
2			`;`
3			`; Test bench for big_output peripheral.`
4
5			`.main`
6
7			`; Write 64 unqiue values to the FIFO whenever possible.`
8			`${64-1} :loop`
9			`.inport(I_FULL) .jumpc(loop)`
10			`O_DATA outport`
11			`.jumpc(loop,1-) drop`
12
13			`; Wait for the FIFO to become empty`
14			`:wait .inport(I_EMPTY) 0= .jumpc(wait)`
15
16			`; Send the termination signal and then enter an infinite loop.`
17			`1 .outport(O_DONE)`
18			`:infinite .jump(infinite)`

Browse

Tools

Subversion Repositories ssbcc

[/] [ssbcc/] [trunk/] [core/] [9x8/] [peripherals/] [tb/] [outFIFO_async/] [tb_outFIFO_async.s] - Blame information for rev 2