OpenCores

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

Subversion Repositories eco32

[/] [eco32/] [trunk/] [fp/] [implementation/] [mmix/] [hptest.mms] - Rev 15

Compare with Previous | Blame | View Log

* Register stack test program by Hans-Peter Nilsson, January 2002
      LOC  #100
cnt   GREG
max   IS   17
msg   BYTE "No bug noticed here",#a,0

Main PUSHJ $16,Recurse
     GETA  $255,msg
     TRAP  0,Fputs,StdOut
     TRAP  0,Halt,0

Recurse ADDU cnt,cnt,1
        CMP  $0,cnt,max
        BZ   $0,0F
        GET  $1,rJ
        PUSHJ $16,Recurse
        PUT  rJ,$1
0H      POP  0,0

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.