Change test
This commit is contained in:
91
eval-final-projet/ref-mips/eval2.mips
Normal file
91
eval-final-projet/ref-mips/eval2.mips
Normal file
@@ -0,0 +1,91 @@
|
||||
.data
|
||||
v$i: .space 4
|
||||
v$carre: .space 4
|
||||
|
||||
.text
|
||||
___start:
|
||||
jal f_main
|
||||
li $v0, 10
|
||||
syscall # stoppe l'execution du processus
|
||||
f_main:
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $fp, 0($sp)
|
||||
move $fp, $sp # nouvelle valeur de $fp
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $ra, 0($sp)
|
||||
li $t0, 0
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t0, 0($sp)
|
||||
lw $t1, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
sw $t1, v$i # stocke variable
|
||||
i_e0:
|
||||
lw $t1, v$i # lit variable dans $t1
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t1, 0($sp)
|
||||
li $t0, 10
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t0, 0($sp)
|
||||
lw $t1, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
lw $t0, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
li $t2, -1 # inf
|
||||
blt $t0, $t1, i_e2
|
||||
li $t2, 0
|
||||
i_e2:
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t2, 0($sp)
|
||||
lw $t0, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
beq $t0, $zero, i_e1
|
||||
lw $t1, v$i # lit variable dans $t1
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t1, 0($sp)
|
||||
lw $t1, v$i # lit variable dans $t1
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t1, 0($sp)
|
||||
lw $t1, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
lw $t0, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
mult $t0, $t1
|
||||
mflo $t2
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t2, 0($sp)
|
||||
lw $t1, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
sw $t1, v$carre # stocke variable
|
||||
lw $t1, v$carre # lit variable dans $t1
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t1, 0($sp)
|
||||
lw $a0, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
li $v0, 1
|
||||
syscall # ecriture
|
||||
li $a0, '\n'
|
||||
li $v0, 11
|
||||
syscall # ecrire char
|
||||
lw $t1, v$i # lit variable dans $t1
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t1, 0($sp)
|
||||
li $t0, 1
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t0, 0($sp)
|
||||
lw $t1, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
lw $t0, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
add $t2, $t0, $t1
|
||||
subi $sp, $sp, 4 # empile registre
|
||||
sw $t2, 0($sp)
|
||||
lw $t1, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
sw $t1, v$i # stocke variable
|
||||
j i_e0
|
||||
i_e1:
|
||||
lw $ra, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
lw $fp, 0($sp) # depile vers registre
|
||||
addi $sp, $sp, 4
|
||||
jr $ra
|
||||
Reference in New Issue
Block a user