home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 3 / 3137 / gnulib00.s < prev    next >
Encoding:
Text File  |  1991-03-27  |  7.2 KB  |  577 lines
  1. #NO_APP
  2. gcc_compiled.:
  3. .text
  4.     .even
  5. .globl __eprintf
  6. __eprintf:
  7.     link a6,#0
  8.     movel a6@(12),sp@-
  9.     movel a6@(8),sp@-
  10.     moveq #52,d0
  11.     addl #__iob,d0
  12.     movel d0,sp@-
  13.     jbsr _fprintf
  14. L1:
  15.     unlk a6
  16.     rts
  17.     .even
  18. .globl __umulsi3
  19. __umulsi3:
  20.     link a6,#0
  21.     movel #___mulsi3,d0
  22.     movel a6@(12),sp@-
  23.     movel a6@(8),sp@-
  24.     jbsr ___mulsi3
  25.     addqw #8,sp
  26.     movel d0,d0
  27.     movel d0,d0
  28.     jra L2
  29. L2:
  30.     unlk a6
  31.     rts
  32.     .even
  33. .globl __mulsi3
  34. __mulsi3:
  35.     link a6,#0
  36.     movel #___mulsi3,d0
  37.     movel a6@(12),sp@-
  38.     movel a6@(8),sp@-
  39.     jbsr ___mulsi3
  40.     addqw #8,sp
  41.     movel d0,d0
  42.     movel d0,d0
  43.     jra L3
  44. L3:
  45.     unlk a6
  46.     rts
  47.     .even
  48. .globl __udivsi3
  49. __udivsi3:
  50.     link a6,#0
  51.     movel #___udivsi3,d0
  52.     movel a6@(12),sp@-
  53.     movel a6@(8),sp@-
  54.     jbsr ___udivsi3
  55.     addqw #8,sp
  56.     movel d0,d0
  57.     movel d0,d0
  58.     jra L4
  59. L4:
  60.     unlk a6
  61.     rts
  62.     .even
  63. .globl __divsi3
  64. __divsi3:
  65.     link a6,#0
  66.     movel #___divsi3,d0
  67.     movel a6@(12),sp@-
  68.     movel a6@(8),sp@-
  69.     jbsr ___divsi3
  70.     addqw #8,sp
  71.     movel d0,d0
  72.     movel d0,d0
  73.     jra L5
  74. L5:
  75.     unlk a6
  76.     rts
  77.     .even
  78. .globl __umodsi3
  79. __umodsi3:
  80.     link a6,#0
  81.     movel #___umodsi3,d0
  82.     movel a6@(12),sp@-
  83.     movel a6@(8),sp@-
  84.     jbsr ___umodsi3
  85.     addqw #8,sp
  86.     movel d0,d0
  87.     movel d0,d0
  88.     jra L6
  89. L6:
  90.     unlk a6
  91.     rts
  92.     .even
  93. .globl __modsi3
  94. __modsi3:
  95.     link a6,#0
  96.     movel #___modsi3,d0
  97.     movel a6@(12),sp@-
  98.     movel a6@(8),sp@-
  99.     jbsr ___modsi3
  100.     addqw #8,sp
  101.     movel d0,d0
  102.     movel d0,d0
  103.     jra L7
  104. L7:
  105.     unlk a6
  106.     rts
  107.     .even
  108. .globl __lshrsi3
  109. __lshrsi3:
  110.     link a6,#0
  111.     movel a6@(8),d0
  112.     movel a6@(12),d1
  113.     lsrl d1,d0
  114.     jra L8
  115. L8:
  116.     unlk a6
  117.     rts
  118.     .even
  119. .globl __lshlsi3
  120. __lshlsi3:
  121.     link a6,#0
  122.     movel a6@(8),d0
  123.     movel a6@(12),d1
  124.     lsll d1,d0
  125.     jra L9
  126. L9:
  127.     unlk a6
  128.     rts
  129.     .even
  130. .globl __ashrsi3
  131. __ashrsi3:
  132.     link a6,#0
  133.     movel a6@(8),d0
  134.     movel a6@(12),d1
  135.     asrl d1,d0
  136.     jra L10
  137. L10:
  138.     unlk a6
  139.     rts
  140.     .even
  141. .globl __ashlsi3
  142. __ashlsi3:
  143.     link a6,#0
  144.     movel a6@(8),d0
  145.     movel a6@(12),d1
  146.     asll d1,d0
  147.     jra L11
  148. L11:
  149.     unlk a6
  150.     rts
  151.     .even
  152. .globl __divdf3
  153. __divdf3:
  154.     link a6,#0
  155.     movel #___divdf3,d0
  156.     movel a6@(20),sp@-
  157.     movel a6@(16),sp@-
  158.     movel a6@(12),sp@-
  159.     movel a6@(8),sp@-
  160.     jbsr ___divdf3
  161.     addw #16,sp
  162.     movel d0,d0
  163.     movel d1,d1
  164.     movel d0,d0
  165.     movel d1,d1
  166.     jra L12
  167. L12:
  168.     unlk a6
  169.     rts
  170.     .even
  171. .globl __muldf3
  172. __muldf3:
  173.     link a6,#0
  174.     movel #___muldf3,d0
  175.     movel a6@(20),sp@-
  176.     movel a6@(16),sp@-
  177.     movel a6@(12),sp@-
  178.     movel a6@(8),sp@-
  179.     jbsr ___muldf3
  180.     addw #16,sp
  181.     movel d0,d0
  182.     movel d1,d1
  183.     movel d0,d0
  184.     movel d1,d1
  185.     jra L13
  186. L13:
  187.     unlk a6
  188.     rts
  189.     .even
  190. .globl __negdf2
  191. __negdf2:
  192.     link a6,#0
  193.     movel #___negdf2,d0
  194.     movel a6@(12),sp@-
  195.     movel a6@(8),sp@-
  196.     jbsr ___negdf2
  197.     addqw #8,sp
  198.     movel d0,d0
  199.     movel d1,d1
  200.     movel d0,d0
  201.     movel d1,d1
  202.     jra L14
  203. L14:
  204.     unlk a6
  205.     rts
  206.     .even
  207. .globl __adddf3
  208. __adddf3:
  209.     link a6,#0
  210.     movel #___adddf3,d0
  211.     movel a6@(20),sp@-
  212.     movel a6@(16),sp@-
  213.     movel a6@(12),sp@-
  214.     movel a6@(8),sp@-
  215.     jbsr ___adddf3
  216.     addw #16,sp
  217.     movel d0,d0
  218.     movel d1,d1
  219.     movel d0,d0
  220.     movel d1,d1
  221.     jra L15
  222. L15:
  223.     unlk a6
  224.     rts
  225.     .even
  226. .globl __subdf3
  227. __subdf3:
  228.     link a6,#0
  229.     movel #___subdf3,d0
  230.     movel a6@(20),sp@-
  231.     movel a6@(16),sp@-
  232.     movel a6@(12),sp@-
  233.     movel a6@(8),sp@-
  234.     jbsr ___subdf3
  235.     addw #16,sp
  236.     movel d0,d0
  237.     movel d1,d1
  238.     movel d0,d0
  239.     movel d1,d1
  240.     jra L16
  241. L16:
  242.     unlk a6
  243.     rts
  244.     .even
  245. .globl __cmpdf2
  246. __cmpdf2:
  247.     link a6,#0
  248.     movel a6@(20),sp@-
  249.     movel a6@(16),sp@-
  250.     movel a6@(12),sp@-
  251.     movel a6@(8),sp@-
  252.     jbsr ___cmpdf2
  253.     addw #16,sp
  254.     tstl d0
  255.     jle L18
  256.     moveq #1,d0
  257.     jra L17
  258.     jra L19
  259. L18:
  260.     movel a6@(20),sp@-
  261.     movel a6@(16),sp@-
  262.     movel a6@(12),sp@-
  263.     movel a6@(8),sp@-
  264.     jbsr ___cmpdf2
  265.     addw #16,sp
  266.     tstl d0
  267.     jge L20
  268.     moveq #-1,d0
  269.     jra L17
  270. L20:
  271. L19:
  272.     moveq #0,d0
  273.     jra L17
  274. L17:
  275.     unlk a6
  276.     rts
  277.     .even
  278. .globl __fixunsdfsi
  279. __fixunsdfsi:
  280.     link a6,#0
  281.     movel a6@(12),sp@-
  282.     movel a6@(8),sp@-
  283.     jbsr ___fixunsdfsi
  284.     addqw #8,sp
  285.     movel d0,d0
  286.     jra L21
  287. L21:
  288.     unlk a6
  289.     rts
  290.     .even
  291. .globl __fixunsdfdi
  292. __fixunsdfdi:
  293.     link a6,#-8
  294.     movel a6@(12),sp@-
  295.     movel a6@(8),sp@-
  296.     jbsr ___fixunsdfsi
  297.     addqw #8,sp
  298.     movel d0,a6@(-8)
  299.     clrl a6@(-4)
  300.     movel a6@(-8),d0
  301.     movel a6@(-4),d1
  302.     jra L22
  303. L22:
  304.     unlk a6
  305.     rts
  306.     .even
  307. .globl __fixdfsi
  308. __fixdfsi:
  309.     link a6,#0
  310.     movel a6@(12),sp@-
  311.     movel a6@(8),sp@-
  312.     jbsr ___fixdfsi
  313.     addqw #8,sp
  314.     movel d0,d0
  315.     jra L23
  316. L23:
  317.     unlk a6
  318.     rts
  319.     .even
  320. .globl __fixdfdi
  321. __fixdfdi:
  322.     link a6,#-8
  323.     movel d2,sp@-
  324.     movel a6@(12),sp@-
  325.     movel a6@(8),sp@-
  326.     jbsr ___fixdfsi
  327.     addqw #8,sp
  328.     movel d0,a6@(-8)
  329.     movel a6@(12),sp@-
  330.     movel a6@(8),sp@-
  331.     jbsr ___fixdfsi
  332.     addqw #8,sp
  333.     movel d0,d0
  334.     tstl d0
  335.     jge L25
  336.     moveq #-1,d2
  337.     movel d2,a6@(-4)
  338.     jra L26
  339. L25:
  340.     clrl a6@(-4)
  341. L26:
  342.     movel a6@(-8),d0
  343.     movel a6@(-4),d1
  344.     jra L24
  345. L24:
  346.     movel a6@(-12),d2
  347.     unlk a6
  348.     rts
  349.     .even
  350. .globl __floatsidf
  351. __floatsidf:
  352.     link a6,#0
  353.     movel a6@(8),sp@-
  354.     jbsr ___floatsidf
  355.     addqw #4,sp
  356.     movel d0,d0
  357.     movel d1,d1
  358.     movel d0,d0
  359.     movel d1,d1
  360.     jra L27
  361. L27:
  362.     unlk a6
  363.     rts
  364.     .even
  365. LC0:
  366.     .double 0r6.55360000000000000000e+04
  367.     .even
  368. .globl __floatdidf
  369. __floatdidf:
  370.     link a6,#0
  371.     moveml #0x3f00,sp@-
  372.     movel a6@(12),sp@-
  373.     jbsr ___floatsidf
  374.     addqw #4,sp
  375.     movel d0,d0
  376.     movel d1,d1
  377.     movel d0,d2
  378.     movel d1,d3
  379.     movel #___muldf3,d0
  380.     movel LC0+4,sp@-
  381.     movel LC0,sp@-
  382.     movel d3,sp@-
  383.     movel d2,sp@-
  384.     jbsr ___muldf3
  385.     addw #16,sp
  386.     movel d0,d0
  387.     movel d1,d1
  388.     movel #___muldf3,d4
  389.     movel LC0+4,sp@-
  390.     movel LC0,sp@-
  391.     movel d1,sp@-
  392.     movel d0,sp@-
  393.     jbsr ___muldf3
  394.     addw #16,sp
  395.     movel d0,d0
  396.     movel d1,d1
  397.     movel d0,d2
  398.     movel d1,d3
  399.     movel a6@(8),sp@-
  400.     jbsr ___floatsidf
  401.     addqw #4,sp
  402.     movel d0,d6
  403.     movel d1,d7
  404.     clrl sp@-
  405.     clrl sp@-
  406.     movel d7,sp@-
  407.     movel d6,sp@-
  408.     jbsr ___cmpdf2
  409.     addw #16,sp
  410.     tstl d0
  411.     jge L29
  412.     movel #___adddf3,d0
  413.     clrl sp@-
  414.     movel #1106247680,sp@-
  415.     movel d7,sp@-
  416.     movel d6,sp@-
  417.     jbsr ___adddf3
  418.     addw #16,sp
  419.     movel d0,d0
  420.     movel d1,d1
  421.     movel d0,d6
  422.     movel d1,d7
  423. L29:
  424.     movel d6,d4
  425.     movel d7,d5
  426.     movel #___adddf3,d0
  427.     movel d5,sp@-
  428.     movel d4,sp@-
  429.     movel d3,sp@-
  430.     movel d2,sp@-
  431.     jbsr ___adddf3
  432.     addw #16,sp
  433.     movel d0,d0
  434.     movel d1,d1
  435.     movel d0,d0
  436.     movel d1,d1
  437.     jra L28
  438. L28:
  439.     moveml a6@(-24),#0xfc
  440.     unlk a6
  441.     rts
  442.     .even
  443. .globl __addsf3
  444. __addsf3:
  445.     link a6,#-4
  446.     movel #___addsf3,d0
  447.     movel a6@(12),sp@-
  448.     movel a6@(8),sp@-
  449.     jbsr ___addsf3
  450.     addqw #8,sp
  451.     movel d0,d0
  452.     movel d0,a6@(-4)
  453.     movel a6@(-4),d0
  454.     jra L30
  455. L30:
  456.     unlk a6
  457.     rts
  458.     .even
  459. .globl __negsf2
  460. __negsf2:
  461.     link a6,#-4
  462.     movel #___negsf2,d0
  463.     movel a6@(8),sp@-
  464.     jbsr ___negsf2
  465.     addqw #4,sp
  466.     movel d0,d0
  467.     movel d0,a6@(-4)
  468.     movel a6@(-4),d0
  469.     jra L31
  470. L31:
  471.     unlk a6
  472.     rts
  473.     .even
  474. .globl __subsf3
  475. __subsf3:
  476.     link a6,#-4
  477.     movel #___subsf3,d0
  478.     movel a6@(12),sp@-
  479.     movel a6@(8),sp@-
  480.     jbsr ___subsf3
  481.     addqw #8,sp
  482.     movel d0,d0
  483.     movel d0,a6@(-4)
  484.     movel a6@(-4),d0
  485.     jra L32
  486. L32:
  487.     unlk a6
  488.     rts
  489.     .even
  490. .globl __cmpsf2
  491. __cmpsf2:
  492.     link a6,#-4
  493.     movel a6@(12),sp@-
  494.     movel a6@(8),sp@-
  495.     jbsr ___cmpsf2
  496.     addqw #8,sp
  497.     tstl d0
  498.     jle L34
  499.     moveq #1,d0
  500.     jra L33
  501.     jra L35
  502. L34:
  503.     movel a6@(12),sp@-
  504.     movel a6@(8),sp@-
  505.     jbsr ___cmpsf2
  506.     addqw #8,sp
  507.     tstl d0
  508.     jge L36
  509.     moveq #-1,d0
  510.     jra L33
  511. L36:
  512. L35:
  513.     moveq #0,d0
  514.     jra L33
  515. L33:
  516.     unlk a6
  517.     rts
  518.     .even
  519. .globl __mulsf3
  520. __mulsf3:
  521.     link a6,#-4
  522.     movel #___mulsf3,d0
  523.     movel a6@(12),sp@-
  524.     movel a6@(8),sp@-
  525.     jbsr ___mulsf3
  526.     addqw #8,sp
  527.     movel d0,d0
  528.     movel d0,a6@(-4)
  529.     movel a6@(-4),d0
  530.     jra L37
  531. L37:
  532.     unlk a6
  533.     rts
  534.     .even
  535. .globl __divsf3
  536. __divsf3:
  537.     link a6,#-4
  538.     movel #___divsf3,d0
  539.     movel a6@(12),sp@-
  540.     movel a6@(8),sp@-
  541.     jbsr ___divsf3
  542.     addqw #8,sp
  543.     movel d0,d0
  544.     movel d0,a6@(-4)
  545.     movel a6@(-4),d0
  546.     jra L38
  547. L38:
  548.     unlk a6
  549.     rts
  550.     .even
  551. .globl __truncdfsf2
  552. __truncdfsf2:
  553.     link a6,#-4
  554.     movel a6@(12),sp@-
  555.     movel a6@(8),sp@-
  556.     jbsr ___truncdfsf2
  557.     addqw #8,sp
  558.     movel d0,a6@(-4)
  559.     movel a6@(-4),d0
  560.     jra L39
  561. L39:
  562.     unlk a6
  563.     rts
  564.     .even
  565. .globl __extendsfdf2
  566. __extendsfdf2:
  567.     link a6,#-4
  568.     movel a6@(8),sp@-
  569.     jbsr ___extendsfdf2
  570.     addqw #4,sp
  571.     movel d0,d0
  572.     movel d1,d1
  573.     jra L40
  574. L40:
  575.     unlk a6
  576.     rts
  577.