comparison lab4/test/print.p @ 0:bfdcc3820b32

Basis
author Mike Spivey <mike@cs.ox.ac.uk>
date Thu, 05 Oct 2017 08:04:15 +0100
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:bfdcc3820b32
1 (* Printing numbers *)
2
3 begin
4 print_num(2); newline()
5 end.
6
7 (*<<
8 2
9 >>*)
10
11 (*[[
12 @ picoPascal compiler output
13 .include "fixup.s"
14 .global pmain
15
16 .text
17 pmain:
18 mov ip, sp
19 stmfd sp!, {r4-r10, fp, ip, lr}
20 mov fp, sp
21 @ print_num(2); newline()
22 mov r0, #2
23 bl print_num
24 bl newline
25 ldmfd fp, {r4-r10, fp, sp, pc}
26 .ltorg
27
28 @ End
29 ]]*)