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

Subversion Repositories eco32

[/] [eco32/] [trunk/] [fp/] [implementation/] [mmix/] [fibgo.mms] - Rev 16

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

* Fibonacci with frame pointers (exercise 1.4.1--15)
sp GREG
fp GREG
n  GREG
fn IS n

    LOC #100
    GREG  @
Fib CMP   $1,n,2
    PBN   $1,1F
    STO   fp,sp,0
    SET   fp,sp
    INCL  sp,8*4
    STO   $0,fp,8
    STO   n,fp,16
    SUB   n,n,1
    GO    $0,Fib
    STO   fn,fp,24 $F_{n-1}$
    LDO   n,fp,16
    SUB   n,n,2
    GO    $0,Fib
    LDO   $0,fp,24
    ADDU  fn,fn,$0
    LDO   $0,fp,8
    SET   sp,fp
    LDO   fp,sp,0
1H  GO    $0,$0,0

Main SETH  sp,Data_Segment>>48
     SET   n,5
     GO    $0,Fib



Go to most recent revision | 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.