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

Subversion Repositories mips32

[/] [mips32/] [trunk/] [Classic-MIPS/] [TestBenchs/] [function/] [fact.smd] - Blame information for rev 2

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 2 jjf
main:
2
ori $sp, $zero, 1024
3
ori $fp, $zero, 256
4
ori $a0, $zero, 20
5
sw $a0, 0($zero)
6
jal fact
7
j DONE
8
 
9
 
10
fact:
11
addi $sp, $sp, -32
12
sw $ra, 20($sp)
13
sw $fp, 16($sp)
14
addi $fp, $sp, 28
15
sw $a0, 0($fp)
16
lw $v0, 0($fp)
17
bne $v0, $zero, NEXT2
18
ori $v0, $zero, 0
19
j NEXT1
20
 
21
NEXT2:
22
lw $v1, 0($fp)
23
addi $v0, $v1, -1
24
addi $a0, $v0, 0
25
jal fact
26
lw $v1, 0($fp)
27
add $v0, $v0, $v1
28
 
29
NEXT1:
30
lw $ra, 20($sp)
31
lw $fp, 16($sp)
32
addi $sp, $sp, 32
33
jr $ra
34
 
35
DONE:
36
sw $v0, 4($zero)
37
lw $t0, 2048($zero)
38
nop
39
nop
40
nop

powered by: WebSVN 2.1.0

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