source: buchla-68k/alcyon/tolower.s@ 0170798

Last change on this file since 0170798 was 7bf3856, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Added Alcyon C reference output.

  • Property mode set to 100644
File size: 502 bytes
Line 
1.globl ___atab
2.globl _tolower
3.text
4_tolower:
5~~tolower:
6~c=8
7link R14,#-6
8~x=-2
9*line 22
10*line 22
11move 8(R14),R0
12and #-128,R0
13bne L2
14*line 23
15*line 24
16*line 25
17move.l #___atab,R8
18move 8(R14),R9
19add.l R9,R8
20btst #3,(R8)
21beq L3
22*line 25
23move 8(R14),R0
24add #32,R0
25move R0,-2(R14)
26*line 26
27bra L4
28L3:
29*line 27
30move 8(R14),-2(R14)
31L4:
32*line 28
33bra L5
34L2:
35*line 29
36*line 30
37*line 31
38move 8(R14),-2(R14)
39L5:
40*line 34
41move -2(R14),R0
42bra L1
43L1:unlk R14
44rts
45.data
Note: See TracBrowser for help on using the repository browser.