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

Subversion Repositories eco32

[/] [eco32/] [trunk/] [fp/] [implementation/] [mmix/] [fib.mms] - Blame information for rev 273

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

Line No. Rev Author Line
1 15 hellwig
t IS $255
2
n IS $0
3
new GREG
4
old GREG
5
phii GREG #9e3779b97f4a7c16
6
lo GREG
7
hi GREG
8
hihi GREG
9
  LOC  #100
10
Main SET n,2
11
     SET old,1
12
     SET new,1
13
1H   ADDU new,new,old
14
     INCL n,1
15
     CMPU t,new,old
16
     BN   t,9F
17
     SUBU old,new,old
18
     MULU lo,old,phii
19
     GET hi,rH
20
     ADDU hi,hi,old
21
     ADDU hihi,hi,1
22
     CSN hi,lo,hihi
23
     CMP t,hi,new
24
     PBZ  t,1B
25
     SET  t,1
26
9H   TRAP 0,Halt,0

powered by: WebSVN 2.1.0

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