83 lines
1.9 KiB
ArmAsm
83 lines
1.9 KiB
ArmAsm
# Test for divmod
|
|
|
|
.org 0
|
|
# Provide program starting address to linker
|
|
.global _start
|
|
|
|
.extern div
|
|
.extern tohex
|
|
|
|
/* newlib system calls */
|
|
.set SYSEXIT, 93
|
|
.set SYSWRITE, 64
|
|
|
|
.section .rodata
|
|
|
|
inputs:
|
|
.word 3
|
|
.word 5
|
|
|
|
.word 21
|
|
.word 3
|
|
|
|
.word 0xFFFF
|
|
.word 100
|
|
|
|
# Division of this one doesn't work yet
|
|
# .word -7
|
|
# .word 3
|
|
inputs_end:
|
|
|
|
.section .bss
|
|
|
|
buf: .skip 9
|
|
|
|
.text
|
|
|
|
_start:
|
|
li a0, '\n'
|
|
la a1, buf
|
|
sb a0, 8(a1) # append newline to buf
|
|
|
|
la s0, inputs # init loop variables
|
|
loop:
|
|
lw a0, 0(s0) # dividend
|
|
lw a1, 4(s0) # divisor
|
|
jal divmod
|
|
mv s1, a1 # save remainder
|
|
|
|
# print quotient
|
|
la a1, buf
|
|
jal tohex
|
|
li t0, SYSWRITE # "write" syscall
|
|
li a0, 1 # 1 = standard output (stdout)
|
|
la a1, buf # load address of output string
|
|
li a2, 8 # length of output string
|
|
ecall # invoke syscall to print the string
|
|
|
|
# print ,
|
|
li t0, SYSWRITE # "write" syscall
|
|
li a0, 1 # 1 = standard output (stdout)
|
|
la a1, buf # load address of output string
|
|
li a2, ','
|
|
sb a2, 0(a1)
|
|
li a2, 1 # length of output string
|
|
ecall # invoke syscall to print the string
|
|
|
|
# print remainder
|
|
mv a0, s1 # restore remainder
|
|
la a1, buf
|
|
jal tohex
|
|
li t0, SYSWRITE # "write" syscall
|
|
li a0, 1 # 1 = standard output (stdout)
|
|
la a1, buf # load address of output string
|
|
li a2, 9 # length of output string
|
|
ecall # invoke syscall to print the string
|
|
|
|
addi s0, s0, 8 # increment input pointer to next pair of inputs
|
|
la a0, inputs_end
|
|
bltu s0, a0, loop # if the input address is less than inputs_end, loop
|
|
|
|
li t0, SYSEXIT # "exit" syscall
|
|
la a0, 0 # Use 0 return code
|
|
ecall # invoke syscall to terminate the program
|