paranoia.sbk

lcc source code enjoy your self

fsubd %f24,%f26,%f26
st %f26,[%l1]; st %f27,[%l1+4]
fsubd %f28,%f30,%f30
ld [%l3],%f28; ld [%l3+4],%f29
faddd %f30,%f28,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set X,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbug .L258; nop
set Y,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbug .L258; nop
set Z,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbug .L258; nop
set T,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbug .L258; nop
set X,%l3
set OneAndHalf,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set Y2,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fdivd %f30,%f28,%f26
st %f26,[%l3]; st %f27,[%l3+4]
set Y,%l1
set U2,%l0
ld [%l0],%f26; ld [%l0+4],%f27
fsubd %f30,%f26,%f24
st %f24,[%l1]; st %f25,[%l1+4]
set Z,%l0
faddd %f30,%f26,%f24
st %f24,[%l0]; st %f25,[%l0+4]
ld [%l1],%f24; ld [%l1+4],%f25
ld [%l3],%f22; ld [%l3+4],%f23
fsubd %f22,%f24,%f22
st %f22,[%l3]; st %f23,[%l3+4]
set T,%l3
set Y1,%o5
ld [%o5],%f22; ld [%o5+4],%f23
fdivd %f30,%f22,%f20
st %f20,[%l3]; st %f21,[%l3+4]
fdivd %f24,%f22,%f24
st %f24,[%l1]; st %f25,[%l1+4]
ld [%l0],%f24; ld [%l0+4],%f25
ld [%l3],%f22; ld [%l3+4],%f23
faddd %f24,%f26,%f20
fsubd %f22,%f20,%f22
st %f22,[%l3]; st %f23,[%l3+4]
ld [%l1],%f22; ld [%l1+4],%f23
fsubd %f22,%f24,%f22
st %f22,[%l1]; st %f23,[%l1+4]
fdivd %f24,%f28,%f24
st %f24,[%l0]; st %f25,[%l0+4]
faddd %f28,%f26,%f26
fdivd %f26,%f28,%f26
st %f26,[%o5]; st %f27,[%o5+4]
ld [%l0],%f26; ld [%l0+4],%f27
fsubd %f26,%f30,%f30
st %f30,[%l0]; st %f31,[%l0+4]
ld [%o5],%f30; ld [%o5+4],%f31
fsubd %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set F9,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set U1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f30,%f28,%f28
fdivd %f28,%f30,%f30
st %f30,[%o5]; st %f31,[%o5+4]
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set X,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L260; nop
set Y,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L260; nop
set Z,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L260; nop
set T,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L260; nop
set Y2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L260; nop
fcmpd %f28,%f30; nop; fbne .L260; nop
set Half,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Y1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f28,%f30,%f28
set F9,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f26,%f30,%f30
fcmpd %f28,%f30; nop; fbne .L260; nop
set RDiv,%l3
set 1,%l2
st %l2,[%l3]
set .L262,%o0
call printf; nop
set GDiv,%l3
ld [%l3],%l3
cmp %l3,0; bne .L261; nop
set .L265,%o0
call notify; nop
ba .L261; nop
.L260:
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set X,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbuge .L266; nop
set Y,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbuge .L266; nop
set Z,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbuge .L266; nop
set T,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbuge .L266; nop
set Y2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbuge .L266; nop
set Half,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Y1,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f28,%f30,%f28
set F9,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f26,%f30,%f30
fcmpd %f28,%f30; nop; fbuge .L266; nop
set RDiv,%l3
set 2,%l2
st %l2,[%l3]
set .L268,%o0
call printf; nop
.L266:
.L261:
.L258:
set RDiv,%l3
ld [%l3],%l3
cmp %l3,0; bne .L269; nop
set .L271,%o0
call printf; nop
.L269:
set BInvrse,%l3
set Radix,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set One,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fdivd %f28,%f30,%f28
st %f28,[%l3]; st %f29,[%l3+4]
mov %g0,%o0
set Half,%l2
ld [%l2],%f28; ld [%l2+4],%f29
ld [%l3],%f26; ld [%l3+4],%f27
fmuld %f26,%f30,%f30
fsubd %f30,%f28,%f30
fcmpd %f30,%f28; nop; fbne .L274; nop
set 1,%l3
st %l3,[%fp+-40]
ba .L275; nop
.L274:
st %g0,[%fp+-40]
.L275:
ld [%fp+-40],%o1
set .L273,%o2
call TstCond; nop
set Milestone,%l3
set 50,%l2
st %l2,[%l3]
mov %g0,%o0
set Half,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set F9,%l3
ld [%l3],%f28; ld [%l3+4],%f29
set U1,%l3
ld [%l3],%f26; ld [%l3+4],%f27
faddd %f28,%f26,%f28
fsubd %f28,%f30,%f28
fcmpd %f28,%f30; nop; fbne .L278; nop
set One,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set BMinusU2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
set U2,%l3
ld [%l3],%f26; ld [%l3+4],%f27
faddd %f28,%f26,%f28
fsubd %f28,%f30,%f28
set Radix,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f26,%f30,%f30
fcmpd %f28,%f30; nop; fbne .L278; nop
set 1,%l3
st %l3,[%fp+-44]
ba .L279; nop
.L278:
st %g0,[%fp+-44]
.L279:
ld [%fp+-44],%o1
set .L277,%o2
call TstCond; nop
set X,%l3
set One,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set U1,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fmuld %f28,%f28,%f28
fsubd %f30,%f28,%f28
st %f28,[%l3]; st %f29,[%l3+4]
set Y,%l2
set U2,%l1
ld [%l1],%f28; ld [%l1+4],%f29
fsubd %f30,%f28,%f26
fmuld %f28,%f26,%f28
faddd %f30,%f28,%f28
st %f28,[%l2]; st %f29,[%l2+4]
set Z,%l1
set Half,%l0
ld [%l0],%f28; ld [%l0+4],%f29
set F9,%l0
ld [%l0],%f26; ld [%l0+4],%f27
fsubd %f26,%f28,%f26
st %f26,[%l1]; st %f27,[%l1+4]
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f26,%f28,%f28
ld [%l1],%f26; ld [%l1+4],%f27
fsubd %f28,%f26,%f28
st %f28,[%l3]; st %f29,[%l3+4]
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f28,%f30,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set X,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L280; nop
set Y,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L280; nop
set RAddSub,%l3
set 2,%l2
st %l2,[%l3]
set .L282,%o0
call printf; nop
.L280:
set GAddSub,%l3
ld [%l3],%l3
cmp %l3,1; bne .L283; nop
set X,%l3
set Half,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set U2,%l2
ld [%l2],%f28; ld [%l2+4],%f29
faddd %f30,%f28,%f26
fmuld %f26,%f28,%f26
st %f26,[%l3]; st %f27,[%l3+4]
set Y,%l2
fsubd %f30,%f28,%f30
fmuld %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set One,%l1
ld [%l1],%f30; ld [%l1+4],%f31
ld [%l3],%f26; ld [%l3+4],%f27
faddd %f30,%f26,%f26
st %f26,[%l3]; st %f27,[%l3+4]
ld [%l2],%f26; ld [%l2+4],%f27
faddd %f30,%f26,%f26
st %f26,[%l2]; st %f27,[%l2+4]
faddd %f30,%f28,%f28
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f28,%f26,%f28
st %f28,[%l3]; st %f29,[%l3+4]
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set X,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L285; nop
set Y,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L285; nop
set X,%l3
set Half,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set U2,%l2
ld [%l2],%f28; ld [%l2+4],%f29
set U1,%l2
ld [%l2],%f26; ld [%l2+4],%f27
faddd %f30,%f28,%f24
fmuld %f24,%f26,%f24
st %f24,[%l3]; st %f25,[%l3+4]
set Y,%l2
fsubd %f30,%f28,%f30
fmuld %f30,%f26,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set One,%l1
ld [%l1],%f30; ld [%l1+4],%f31
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f30,%f28,%f28
st %f28,[%l3]; st %f29,[%l3+4]
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f30,%f28,%f28
st %f28,[%l2]; st %f29,[%l2+4]
set F9,%l1
ld [%l1],%f28; ld [%l1+4],%f29
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f28,%f26,%f28
st %f28,[%l3]; st %f29,[%l3+4]
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set X,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L287; nop
set Y,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L287; nop
set RAddSub,%l3
set 1,%l2
st %l2,[%l3]
set .L289,%o0
call printf; nop
set GAddSub,%l3
ld [%l3],%l3
cmp %l3,0; bne .L284; nop
set .L292,%o0
call notify; nop
ba .L284; nop
.L287:
set .L293,%o0
call printf; nop
ba .L284; nop
.L285:
set .L293,%o0
call printf; nop
ba .L284; nop
.L283:
set .L293,%o0
call printf; nop
.L284:
set One,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set S,%l3
st %f30,[%l3]; st %f31,[%l3+4]
set X,%l3
set Half,%l2
ld [%l2],%f28; ld [%l2+4],%f29
faddd %f30,%f28,%f26
fmuld %f28,%f26,%f26
faddd %f30,%f26,%f26
st %f26,[%l3]; st %f27,[%l3+4]
set Y,%l2
set U2,%l1
ld [%l1],%f26; ld [%l1+4],%f27
faddd %f30,%f26,%f30
fmuld %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set Z,%l1
ld [%l3],%f30; ld [%l3+4],%f31
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f30,%f28,%f26
st %f26,[%l1]; st %f27,[%l1+4]
set T,%l3
fsubd %f28,%f30,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set StickyBit,%l2
ld [%l1],%f30; ld [%l1+4],%f31
ld [%l3],%f28; ld [%l3+4],%f29
faddd %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
ld [%l2],%f30; ld [%l2+4],%f31
set Zero,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbe .L294; nop
set S,%l3
set Zero,%l2
ld [%l2],%f30; ld [%l2+4],%f31
st %f30,[%l3]; st %f31,[%l3+4]
set 3,%o0
set .L296,%o1
call BadCond; nop
.L294:
set StickyBit,%l3
set Zero,%l2
ld [%l2],%f30; ld [%l2+4],%f31
st %f30,[%l3]; st %f31,[%l3+4]
set GMult,%l3
ld [%l3],%l3
cmp %l3,1; bne .L297; nop
set GDiv,%l3
ld [%l3],%l3
cmp %l3,1; bne .L297; nop
set GAddSub,%l3
ld [%l3],%l3
cmp %l3,1; bne .L297; nop
set RMult,%l3
ld [%l3],%l3
cmp %l3,1; bne .L297; nop
set RDiv,%l3
ld [%l3],%l3
cmp %l3,1; bne .L297; nop
set RAddSub,%l3
ld [%l3],%l3
cmp %l3,1; bne .L297; nop
set RadixD2,%l3
ld [%l3],%f30; ld [%l3+4],%f31
st %f30,[%sp+4*0+68]
st %f31,[%sp+4*1+68]
ld [%sp+4*0+68],%o0
ld [%sp+4*1+68],%o1
call floor; nop
fmovs %f0,%f30; fmovs %f1,%f31
set RadixD2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbne .L297; nop
set .L299,%o0
call printf; nop
set X,%l3
set Half,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set U2,%l2
ld [%l2],%f28; ld [%l2+4],%f29
set U1,%l2
ld [%l2],%f26; ld [%l2+4],%f27
faddd %f30,%f26,%f26
fmuld %f26,%f28,%f26
st %f26,[%l3]; st %f27,[%l3+4]
set Y,%l2
fmuld %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set One,%l1
ld [%l1],%f30; ld [%l1+4],%f31
set Z,%l1
ld [%l2],%f28; ld [%l2+4],%f29
faddd %f30,%f28,%f28
st %f28,[%l1]; st %f29,[%l1+4]
set T,%l2
ld [%l3],%f28; ld [%l3+4],%f29
faddd %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set One,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Z,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f28,%f30,%f28
set Zero,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fcmpd %f28,%f26; nop; fbug .L300; nop
set T,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f28,%f30,%f30
set U2,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbul .L300; nop
set Z,%l3
set Y,%l2
set T,%l1
ld [%l1],%f30; ld [%l1+4],%f31
ld [%l2],%f28; ld [%l2+4],%f29
faddd %f30,%f28,%f30
st %f30,[%l3]; st %f31,[%l3+4]
ld [%l3],%f30; ld [%l3+4],%f31
set X,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set T,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Z,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f28,%f30,%f28
set U2,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fcmpd %f28,%f26; nop; fbul .L302; nop
set Y,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f28,%f30,%f30
set Zero,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f30,%f28; nop; fbne .L302; nop
set X,%l3
set Half,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set U1,%l2
ld [%l2],%f28; ld [%l2+4],%f29
faddd %f30,%f28,%f26
fmuld %f26,%f28,%f26
st %f26,[%l3]; st %f27,[%l3+4]
set Y,%l2
fmuld %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set One,%l1
ld [%l1],%f30; ld [%l1+4],%f31
set Z,%l1
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f30,%f28,%f28
st %f28,[%l1]; st %f29,[%l1+4]
set T,%l2
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f30,%f28,%f30
st %f30,[%l2]; st %f31,[%l2+4]
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Z,%l3
ld [%l3],%f28; ld [%l3+4],%f29
set One,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f28,%f26,%f28
fcmpd %f28,%f30; nop; fbne .L304; nop
set T,%l3
ld [%l3],%f28; ld [%l3+4],%f29
set F9,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f28,%f26,%f28
fcmpd %f28,%f30; nop; fbne .L304; nop
set Z,%l3
set U1,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set Half,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f28,%f30,%f28
fmuld %f28,%f30,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set F9,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set T,%l2
ld [%l3],%f28; ld [%l3+4],%f29
fsubd %f30,%f28,%f28
st %f28,[%l2]; st %f29,[%l2+4]
set Q,%l3
set Y,%l2
ld [%l2],%f28; ld [%l2+4],%f29
fsubd %f30,%f28,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set F9,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set Zero,%l3
ld [%l3],%f28; ld [%l3+4],%f29
set T,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f26,%f30,%f26
fcmpd %f26,%f28; nop; fbne .L306; nop
set U1,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f30,%f26,%f30
set Q,%l3
ld [%l3],%f26; ld [%l3+4],%f27
fsubd %f30,%f26,%f30
fcmpd %f30,%f28; nop; fbne .L306; nop
set Z,%l3
set One,%l2
ld [%l2],%f30; ld [%l2+4],%f31
set U2,%l2
ld [%l2],%f28; ld [%l2+4],%f29
set OneAndHalf,%l2
ld [%l2],%f26; ld [%l2+4],%f27
faddd %f30,%f28,%f24
fmuld %f24,%f26,%f24
st %f24,[%l3]; st %f25,[%l3+4]
set T,%l2
faddd %f26,%f28,%f26
ld [%l3],%f24; ld [%l3+4],%f25
fsubd %f26,%f24,%f26
faddd %f26,%f28,%f26
st %f26,[%l2]; st %f27,[%l2+4]
set X,%l2
set Radix,%l1
ld [%l1],%f26; ld [%l1+4],%f27
set Half,%l1
ld [%l1],%f24; ld [%l1+4],%f25
fdivd %f24,%f26,%f24
faddd %f30,%f24,%f24
st %f24,[%l2]; st %f25,[%l2+4]
set Y,%l1
fmuld %f26,%f28,%f28
faddd %f30,%f28,%f30
st %f30,[%l1]; st %f31,[%l1+4]
ld [%l2],%f30; ld [%l2+4],%f31
ld [%l1],%f28; ld [%l1+4],%f29
fmuld %f30,%f28,%f30
st %f30,[%l3]; st %f31,[%l3+4]
set Zero,%l3
ld [%l3],%f30; ld [%l3+4],%f31
set T,%l3
ld [%l3],%f28; ld [%l3+4],%f29
fcmpd %f28,%f30; nop; fbne .L308; nop
set X,%l3
ld [%l3],%f28; ld [