home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / usenet / altsrcs / 3 / 3137 / gnulib30.s < prev    next >
Encoding:
Text File  |  1991-03-27  |  4.9 KB  |  420 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 #40,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 a6@(8),d0
  22.     mulsl a6@(12),d0
  23.     movel d0,d0
  24.     jra L2
  25. L2:
  26.     unlk a6
  27.     rts
  28.     .even
  29. .globl __mulsi3
  30. __mulsi3:
  31.     link a6,#0
  32.     movel a6@(8),d0
  33.     mulsl a6@(12),d0
  34.     movel d0,d0
  35.     jra L3
  36. L3:
  37.     unlk a6
  38.     rts
  39.     .even
  40. .globl __udivsi3
  41. __udivsi3:
  42.     link a6,#0
  43.     movel a6@(8),d0
  44.     divul a6@(12),d0
  45.     movel d0,d0
  46.     jra L4
  47. L4:
  48.     unlk a6
  49.     rts
  50.     .even
  51. .globl __divsi3
  52. __divsi3:
  53.     link a6,#0
  54.     movel a6@(8),d0
  55.     divsl a6@(12),d0
  56.     movel d0,d0
  57.     jra L5
  58. L5:
  59.     unlk a6
  60.     rts
  61.     .even
  62. .globl __umodsi3
  63. __umodsi3:
  64.     link a6,#0
  65.     movel a6@(8),d0
  66.     divull a6@(12),d1:d0
  67.     movel d1,d0
  68.     jra L6
  69. L6:
  70.     unlk a6
  71.     rts
  72.     .even
  73. .globl __modsi3
  74. __modsi3:
  75.     link a6,#0
  76.     movel a6@(8),d0
  77.     divsll a6@(12),d1:d0
  78.     movel d1,d0
  79.     jra L7
  80. L7:
  81.     unlk a6
  82.     rts
  83.     .even
  84. .globl __lshrsi3
  85. __lshrsi3:
  86.     link a6,#0
  87.     movel a6@(8),d0
  88.     movel a6@(12),d1
  89.     lsrl d1,d0
  90.     jra L8
  91. L8:
  92.     unlk a6
  93.     rts
  94.     .even
  95. .globl __lshlsi3
  96. __lshlsi3:
  97.     link a6,#0
  98.     movel a6@(8),d0
  99.     movel a6@(12),d1
  100.     lsll d1,d0
  101.     jra L9
  102. L9:
  103.     unlk a6
  104.     rts
  105.     .even
  106. .globl __ashrsi3
  107. __ashrsi3:
  108.     link a6,#0
  109.     movel a6@(8),d0
  110.     movel a6@(12),d1
  111.     asrl d1,d0
  112.     jra L10
  113. L10:
  114.     unlk a6
  115.     rts
  116.     .even
  117. .globl __ashlsi3
  118. __ashlsi3:
  119.     link a6,#0
  120.     movel a6@(8),d0
  121.     movel a6@(12),d1
  122.     asll d1,d0
  123.     jra L11
  124. L11:
  125.     unlk a6
  126.     rts
  127.     .even
  128. .globl __divdf3
  129. __divdf3:
  130.     link a6,#0
  131.     fmoved a6@(8),fp0
  132.     fdivd a6@(16),fp0
  133.     fmoved fp0,sp@-
  134.     movel sp@+,d0
  135.     movel sp@+,d1
  136.     jra L12
  137. L12:
  138.     unlk a6
  139.     rts
  140.     .even
  141. .globl __muldf3
  142. __muldf3:
  143.     link a6,#0
  144.     fmoved a6@(8),fp0
  145.     fmuld a6@(16),fp0
  146.     fmoved fp0,sp@-
  147.     movel sp@+,d0
  148.     movel sp@+,d1
  149.     jra L13
  150. L13:
  151.     unlk a6
  152.     rts
  153.     .even
  154. .globl __negdf2
  155. __negdf2:
  156.     link a6,#0
  157.     fnegd a6@(8),fp0
  158.     fmoved fp0,sp@-
  159.     movel sp@+,d0
  160.     movel sp@+,d1
  161.     jra L14
  162. L14:
  163.     unlk a6
  164.     rts
  165.     .even
  166. .globl __adddf3
  167. __adddf3:
  168.     link a6,#0
  169.     fmoved a6@(8),fp0
  170.     faddd a6@(16),fp0
  171.     fmoved fp0,sp@-
  172.     movel sp@+,d0
  173.     movel sp@+,d1
  174.     jra L15
  175. L15:
  176.     unlk a6
  177.     rts
  178.     .even
  179. .globl __subdf3
  180. __subdf3:
  181.     link a6,#0
  182.     fmoved a6@(8),fp0
  183.     fsubd a6@(16),fp0
  184.     fmoved fp0,sp@-
  185.     movel sp@+,d0
  186.     movel sp@+,d1
  187.     jra L16
  188. L16:
  189.     unlk a6
  190.     rts
  191.     .even
  192. .globl __cmpdf2
  193. __cmpdf2:
  194.     link a6,#0
  195.     fmoved a6@(8),fp0
  196.     fcmpd a6@(16),fp0
  197.     fjngt L18
  198.     moveq #1,d0
  199.     jra L17
  200.     jra L19
  201. L18:
  202.     fmoved a6@(8),fp0
  203.     fcmpd a6@(16),fp0
  204.     fjnlt L20
  205.     moveq #-1,d0
  206.     jra L17
  207. L20:
  208. L19:
  209.     clrl d0
  210.     jra L17
  211. L17:
  212.     unlk a6
  213.     rts
  214.     .even
  215. .globl __fixunsdfsi
  216. __fixunsdfsi:
  217.     link a6,#0
  218.     movel a6@(12),sp@-
  219.     movel a6@(8),sp@-
  220.     jbsr ___fixunsdfsi
  221.     addqw #8,sp
  222.     movel d0,d0
  223.     jra L21
  224. L21:
  225.     unlk a6
  226.     rts
  227.     .even
  228. .globl __fixunsdfdi
  229. __fixunsdfdi:
  230.     link a6,#-8
  231.     movel a6@(12),sp@-
  232.     movel a6@(8),sp@-
  233.     jbsr ___fixunsdfsi
  234.     addqw #8,sp
  235.     movel d0,a6@(-8)
  236.     clrl a6@(-4)
  237.     movel a6@(-8),d0
  238.     movel a6@(-4),d1
  239.     jra L22
  240. L22:
  241.     unlk a6
  242.     rts
  243.     .even
  244. .globl __fixdfsi
  245. __fixdfsi:
  246.     link a6,#0
  247.     fintrzd a6@(8),fp0
  248.     fmovel fp0,d0
  249.     jra L23
  250. L23:
  251.     unlk a6
  252.     rts
  253.     .even
  254. .globl __fixdfdi
  255. __fixdfdi:
  256.     link a6,#-8
  257.     movel d2,sp@-
  258.     fintrzd a6@(8),fp0
  259.     fmovel fp0,a6@(-8)
  260.     fintrzd a6@(8),fp0
  261.     fmovel fp0,d0
  262.     tstl d0
  263.     jge L25
  264.     moveq #-1,d2
  265.     movel d2,a6@(-4)
  266.     jra L26
  267. L25:
  268.     clrl a6@(-4)
  269. L26:
  270.     movel a6@(-8),d0
  271.     movel a6@(-4),d1
  272.     jra L24
  273. L24:
  274.     movel a6@(-12),d2
  275.     unlk a6
  276.     rts
  277.     .even
  278. .globl __floatsidf
  279. __floatsidf:
  280.     link a6,#0
  281.     fmovel a6@(8),fp0
  282.     fmoved fp0,sp@-
  283.     movel sp@+,d0
  284.     movel sp@+,d1
  285.     jra L27
  286. L27:
  287.     unlk a6
  288.     rts
  289.     .even
  290. LC0:
  291.     .double 0r6.55360000000000000000e+04
  292.     .even
  293. .globl __floatdidf
  294. __floatdidf:
  295.     link a6,#0
  296.     fmovem #0x4,sp@-
  297.     fmovel a6@(12),fp0
  298.     fmuld LC0,fp0
  299.     fmuld LC0,fp0
  300.     fmovel a6@(8),fp1
  301.     ftstx fp1
  302.     fjge L29
  303.     faddd #0r4294967296,fp1
  304. L29:
  305.     fmovex fp0,fp2
  306.     faddx fp1,fp2
  307.     fmoved fp2,sp@-
  308.     movel sp@+,d0
  309.     movel sp@+,d1
  310.     jra L28
  311. L28:
  312.     fmovem a6@(-12),#0x20
  313.     unlk a6
  314.     rts
  315.     .even
  316. .globl __addsf3
  317. __addsf3:
  318.     link a6,#-4
  319.     fmoves a6@(8),fp0
  320.     fadds a6@(12),fp0
  321.     fmoves fp0,a6@(-4)
  322.     movel a6@(-4),d0
  323.     jra L30
  324. L30:
  325.     unlk a6
  326.     rts
  327.     .even
  328. .globl __negsf2
  329. __negsf2:
  330.     link a6,#-4
  331.     fnegs a6@(8),fp0
  332.     fmoves fp0,a6@(-4)
  333.     movel a6@(-4),d0
  334.     jra L31
  335. L31:
  336.     unlk a6
  337.     rts
  338.     .even
  339. .globl __subsf3
  340. __subsf3:
  341.     link a6,#-4
  342.     fmoves a6@(8),fp0
  343.     fsubs a6@(12),fp0
  344.     fmoves fp0,a6@(-4)
  345.     movel a6@(-4),d0
  346.     jra L32
  347. L32:
  348.     unlk a6
  349.     rts
  350.     .even
  351. .globl __cmpsf2
  352. __cmpsf2:
  353.     link a6,#-4
  354.     fmoves a6@(8),fp0
  355.     fcmps a6@(12),fp0
  356.     fjngt L34
  357.     moveq #1,d0
  358.     jra L33
  359.     jra L35
  360. L34:
  361.     fmoves a6@(8),fp0
  362.     fcmps a6@(12),fp0
  363.     fjnlt L36
  364.     moveq #-1,d0
  365.     jra L33
  366. L36:
  367. L35:
  368.     clrl d0
  369.     jra L33
  370. L33:
  371.     unlk a6
  372.     rts
  373.     .even
  374. .globl __mulsf3
  375. __mulsf3:
  376.     link a6,#-4
  377.     fmoves a6@(8),fp0
  378.     fsglmuls a6@(12),fp0
  379.     fmoves fp0,a6@(-4)
  380.     movel a6@(-4),d0
  381.     jra L37
  382. L37:
  383.     unlk a6
  384.     rts
  385.     .even
  386. .globl __divsf3
  387. __divsf3:
  388.     link a6,#-4
  389.     fmoves a6@(8),fp0
  390.     fsgldivs a6@(12),fp0
  391.     fmoves fp0,a6@(-4)
  392.     movel a6@(-4),d0
  393.     jra L38
  394. L38:
  395.     unlk a6
  396.     rts
  397.     .even
  398. .globl __truncdfsf2
  399. __truncdfsf2:
  400.     link a6,#-4
  401.     fmoved a6@(8),fp0
  402.     fmoves fp0,a6@(-4)
  403.     movel a6@(-4),d0
  404.     jra L39
  405. L39:
  406.     unlk a6
  407.     rts
  408.     .even
  409. .globl __extendsfdf2
  410. __extendsfdf2:
  411.     link a6,#-4
  412.     fmoves a6@(8),fp0
  413.     fmoved fp0,sp@-
  414.     movel sp@+,d0
  415.     movel sp@+,d1
  416.     jra L40
  417. L40:
  418.     unlk a6
  419.     rts
  420.