Add tests, fixes for tests, reinstate and type-convert stuff marked "bitrot"
[ccom.git] / test / usr.lib / ctm019823d_sign.s
diff --git a/test/usr.lib/ctm019823d_sign.s b/test/usr.lib/ctm019823d_sign.s
new file mode 100644 (file)
index 0000000..12c9508
--- /dev/null
@@ -0,0 +1,31 @@
+.globl _d_sign
+.text
+_d_sign:
+~~d_sign:
+jsr    r5,csv
+~a=4
+~b=6
+jbr    L1
+L2:~x=177760
+tstf   *4(r5)
+cfcc
+jmi    L10001
+movf   *4(r5),r0
+jbr    L10002
+L10001:movf    *4(r5),r0
+negf   r0
+L10002:movf    r0,-20(r5)
+tstf   *6(r5)
+cfcc
+jmi    L10004
+movf   -20(r5),r0
+jbr    L10005
+L10004:movf    -20(r5),r0
+negf   r0
+L10005:jbr     L3
+L3:jmp cret
+L1:sub $10,sp
+jbr    L2
+.globl fltused
+.globl
+.data