1#NO_APP 2gcc_compiled.: 3.text 4 .even 5.globl _frexp 6_frexp: 7 link a6,#0 8 moveml #0x3000,sp@- 9 fmoved a6@(8),fp0 10 movel a6@(16),a0 11 fjeq L2 12 fmoved fp0,sp@- 13 movel sp@+,d0 14 movel sp@+,d1 15 bfextu d0{#1:#11},d2 16 addl #-1022,d2 17 movel d2,a0@ 18 movel #1022,d3 19 bfins d3,d0{#1:#11} 20 jra L1 21L2: 22 clrl a0@ 23 clrl d0 24 clrl d1 25L1: 26 moveml a6@(-8),#0xc 27 unlk a6 28 rts 29