URL
https://opencores.org/ocsvn/eco32/eco32/trunk
Only display areas with differences |
Details |
Blame |
View Log
Rev 15 |
Rev 270 |
* Fibonacci with frame pointers (exercise 1.4.1--15)
|
* Fibonacci with frame pointers (exercise 1.4.1--15)
|
sp GREG
|
sp GREG
|
fp GREG
|
fp GREG
|
n GREG
|
n GREG
|
fn IS n
|
fn IS n
|
|
|
LOC #100
|
LOC #100
|
GREG @
|
GREG @
|
Fib CMP $1,n,2
|
Fib CMP $1,n,2
|
PBN $1,1F
|
PBN $1,1F
|
STO fp,sp,0
|
STO fp,sp,0
|
SET fp,sp
|
SET fp,sp
|
INCL sp,8*4
|
INCL sp,8*4
|
STO $0,fp,8
|
STO $0,fp,8
|
STO n,fp,16
|
STO n,fp,16
|
SUB n,n,1
|
SUB n,n,1
|
GO $0,Fib
|
GO $0,Fib
|
STO fn,fp,24 $F_{n-1}$
|
STO fn,fp,24 $F_{n-1}$
|
LDO n,fp,16
|
LDO n,fp,16
|
SUB n,n,2
|
SUB n,n,2
|
GO $0,Fib
|
GO $0,Fib
|
LDO $0,fp,24
|
LDO $0,fp,24
|
ADDU fn,fn,$0
|
ADDU fn,fn,$0
|
LDO $0,fp,8
|
LDO $0,fp,8
|
SET sp,fp
|
SET sp,fp
|
LDO fp,sp,0
|
LDO fp,sp,0
|
1H GO $0,$0,0
|
1H GO $0,$0,0
|
|
|
Main SETH sp,Data_Segment>>48
|
Main SETH sp,Data_Segment>>48
|
SET n,5
|
SET n,5
|
GO $0,Fib
|
GO $0,Fib
|
|
|
|
|
|
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.