summaryrefslogtreecommitdiff
path: root/base/Factorial.opt.s
blob: b743942cf25f9ff15fe348a8c65656bbebbd42e6 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
.data

empty_Fac:

.text

  jal Main
  li $v0 10
  syscall

Main:
  sw $fp -8($sp)
  move $fp $sp
  subu $sp $sp 8
  sw $ra -4($fp)
  la $a0 empty_Fac
  li $a1 10
  jal Fac.ComputeFac
  move $t0 $v0
  move $a0 $t0
  jal _print
  lw $ra -4($fp)
  lw $fp -8($fp)
  addu $sp $sp 8
  jr $ra

Fac.ComputeFac:
  sw $fp -8($sp)
  move $fp $sp
  subu $sp $sp 12
  sw $ra -4($fp)
  sw $s0 0($sp)
  move $t0 $a0
  move $s0 $a1
  slti $t1 $s0 1
  beqz $t1 if1_else
  li $t1 1
  j if1_end
if1_else:
  subu $t2 $s0 1
  move $a0 $t0
  move $a1 $t2
  jal Fac.ComputeFac
  move $t2 $v0
  mul $t1 $s0 $t2
if1_end:
  move $v0 $t1
  lw $s0 0($sp)
  lw $ra -4($fp)
  lw $fp -8($fp)
  addu $sp $sp 12
  jr $ra

_print:
  li $v0 1   # syscall: print integer
  syscall
  la $a0 _newline
  li $v0 4   # syscall: print string
  syscall
  jr $ra

.data
.align 0
_newline: .asciiz "\n"