aboutsummaryrefslogtreecommitdiffstats
path: root/code/tools/lcc/sparc/solaris/tst/cf.sbk
blob: 8ac1a39ec973545dca3d8647db51bdfb534b7045 (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
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
.global main
.section ".text"
.align 4
main:
save %sp,-96,%sp
cmp %i0,1; bg .L2; nop
set .L4,%i2
ld [%i2],%f31
st %f31,[%fp+-4]
ba .L3; nop
.L2:
ld [%i1+4],%o0
call atof; nop
fmovs %f0,%f31
set .L5,%i2
ld [%i2],%f30
fdivs %f31,%f30,%f31
st %f31,[%fp+-4]
.L3:
mov %g0,%i5
.L6:
mov %i5,%i2
add %i2,1,%i5
sll %i2,2,%i2
set f,%l7
set .L4,%l6
ld [%l6],%f31
st %f31,[%i2+%l7]
.L7:
cmp %i5,127; ble .L6; nop
mov %g0,%i4
ba .L11; nop
.L10:
sll %i3,2,%i2
set f,%l7
add %i2,%l7,%i2
ld [%i2],%f31
set .L13,%l7
ld [%l7],%f30
fadds %f31,%f30,%f31
st %f31,[%i2]
add %i4,1,%i4
.L11:
call getchar; nop
mov %o0,%i3
cmp %o0,-1; bne .L10; nop
set .L14,%o0
call printf; nop
mov %g0,%i5
.L15:
sll %i5,2,%i2
set f,%l7
ld [%i2+%l7],%f31
set .L4,%i2
ld [%i2],%f30
fcmpes %f31,%f30; nop; fbue .L19; nop
st %i4,[%sp+64]; ld [%sp+64],%f30; fitos %f30,%f30
fdivs %f31,%f30,%f31
ld [%fp+-4],%f30
fcmpes %f31,%f30; nop; fbul .L19; nop
cmp %i5,32; bg .L21; nop
set .L23,%o0
mov %i5,%o1
call printf; nop
ba .L22; nop
.L21:
set .L24,%o0
mov %i5,%o1
call printf; nop
.L22:
set .L25,%o0
set .L5,%i2
ld [%i2],%f31
sll %i5,2,%i2
set f,%l7
ld [%i2+%l7],%f30
fmuls %f31,%f30,%f31
st %i4,[%sp+64]; ld [%sp+64],%f30; fitos %f30,%f30
fdivs %f31,%f30,%f31
fstod %f31,%f30
st %f30,[%sp+4*1+68]
st %f31,[%sp+4*2+68]
ld [%sp+4*1+68],%o1
ld [%sp+4*2+68],%o2
call printf; nop
.L19:
.L16:
add %i5,1,%i5
cmp %i5,127; ble .L15; nop
mov %g0,%i0
.L1:
ret; restore
.type main,#function
.size main,.-main
.section ".bss"
.global f
.type f,#object
.size f,512
.common f,512,4
.section ".rodata"
.align 1
.L25:
.byte 9
.byte 37
.byte 46
.byte 49
.byte 102
.byte 10
.byte 0
.align 1
.L24:
.byte 37
.byte 99
.byte 0
.align 1
.L23:
.byte 37
.byte 48
.byte 51
.byte 111
.byte 0
.align 1
.L14:
.byte 99
.byte 104
.byte 97
.byte 114
.byte 9
.byte 102
.byte 114
.byte 101
.byte 113
.byte 10
.byte 0
.align 4
.L13:
.word 0x3f800000
.align 4
.L5:
.word 0x42c80000
.align 4
.L4:
.word 0x0