Lines Matching refs:SRC
419 set SRC, 0 # offsets within an
596 # fix_skewed_ops() - adjust src operand in fsave frame #
597 # set_tag_x() - determine optype of src/dst operands #
615 # - The fsave frame contains the adjusted src op for opclass 0,2 #
648 #$# sub.l &24,%sp # make room for src/dst
671 lea FP_SRC(%a6),%a0 # pass: ptr to src op
672 bsr.l fix_skewed_ops # fix src op
676 lea FP_SRC(%a6),%a0 # pass: ptr to src op
792 # the src operand is definitely a NORM(!), so tag it as such
793 mov.b &NORM,STAG(%a6) # set src optype tag
803 lea FP_SRC(%a6),%a0 # pass ptr to src operand
836 # fix_skewed_ops() - adjust src operand in fsave frame #
837 # set_tag_x() - determine optype of src/dst operands #
855 # - The fsave frame contains the adjusted src op for opclass 0,2 #
888 #$# sub.l &24,%sp # make room for src/dst
911 lea FP_SRC(%a6),%a0 # pass: ptr to src op
912 bsr.l fix_skewed_ops # fix src op
914 lea FP_SRC(%a6),%a0 # pass: ptr to src op
1066 # the src operand is definitely a NORM(!), so tag it as such
1067 mov.b &NORM,STAG(%a6) # set src optype tag
1077 lea FP_SRC(%a6),%a0 # pass ptr to src operand
1111 # fix_skewed_ops() - adjust src operand in fsave frame #
1112 # set_tag_x() - determine optype of src/dst operands #
1116 # load_fpn1() - load src operand from FP regfile #
1122 # funimp_skew() - adjust fsave src ops to "incorrect" value #
1154 # For UNNORM/DENORM opclass 0 and 2, the handler fetches the src #
1270 # precision format if the src format was single or double and the
1275 # we don't know whether the src operand or the dst operand (or both) is the
1278 lea FP_SRC(%a6),%a0 # pass: ptr to src op
1285 mov.b %d0,STAG(%a6) # save src optype tag
1406 # src operand.
1418 frestore FP_SRC(%a6) # restore src op
1441 bfextu EXC_CMDREG(%a6){&0:&6},%d0 # extract opclass,src fmt
1449 mov.w LOCAL_EX(%a0),%d0 # fetch src exponent
1479 mov.w LOCAL_EX(%a0),%d0 # fetch src exponent
1504 # the src operand is in FP_SRC. Call _fout() to write out the result and
1524 # the src can ONLY be a DENORM or an UNNORM! so, don't make any big subroutine
1543 lea FP_SRC(%a6),%a0 # pass ptr to src operand
1683 # for snan,operr,ovfl,unfl, src op is still in FP_SRC so just
1825 bsr.l get_packed # fetch packed src operand
1827 lea FP_SRC(%a6),%a0 # pass ptr to src
1828 bsr.l set_tag_x # set src optype tag
1830 mov.b %d0,STAG(%a6) # save src optype tag
1984 # src operand.
1986 # "non-skewed" operand for cases of sgl and dbl src INFs,NANs, and DENORMs.
2002 frestore FP_SRC(%a6) # restore src op
2033 frestore FP_SRC(%a6) # restore src op
2095 mov.b %d0,STAG(%a6) # save src optype tag
2100 lea FP_SRC(%a6),%a0 # pass ptr to src operand
2205 frestore FP_SRC(%a6) # restore src operand
2245 frestore FP_SRC(%a6) # restore src operand
2285 frestore FP_SRC(%a6) # restore src operand
2312 bfextu EXC_EXTWORD(%a6){&3:&3},%d0 # extract src specifier
2313 cmpi.b %d0,&0x1 # was src sgl?
2315 cmpi.b %d0,&0x5 # was src dbl?
2347 lea FP_SRC(%a6),%a0 # pass ptr to src op
2382 # fix_skewed_ops() - adjust src operand in fsave frame #
2383 # set_tag_x() - determine optype of src/dst operands #
2514 btst &0xa,%d0 # is src fmt x or p?
2560 # FP_SRC now holds the src operand.
2561 lea FP_SRC(%a6),%a0 # pass: ptr to src op
3082 # fix_skewed_ops() - adjust src operand in fsave frame #
3095 # - The fsave frame contains the adjusted src op for opclass 0,2 #
3144 lea FP_SRC(%a6),%a0 # pass: ptr to src op
3145 bsr.l fix_skewed_ops # fix src op
3165 # through here. we simply need to test the sign of the src
3271 # fix_skewed_ops() - adjust src operand in fsave frame #
3285 # - The fsave frame contains the adjusted src op for opclass 0,2 #
3340 lea FP_SRC(%a6),%a0 # pass: ptr to src op
3341 bsr.l fix_skewed_ops # fix src op
3363 # for byte, word, and long, we simply need to test the sign of the src
3570 # fix_skewed_ops() - adjust src operand in fsave frame #
3571 # set_tag_x() - determine optype of src/dst operands #
3586 # - The fsave frame contains the adjusted src op for opclass 0,2 #
3636 fmov.l FP_SRC_HI(%a6),%fp0 # load integer src
3641 lea FP_SRC(%a6),%a0 # pass: ptr to src op
3642 bsr.l fix_skewed_ops # fix src op
3658 lea FP_SRC(%a6),%a0 # pass: ptr to src op
3734 mov.b &NORM,STAG(%a6) # src is a NORM
3741 lea FP_SRC(%a6),%a0 # pass ptr to src operand
3802 lea FP_SRC(%a6),%a0 # pass: ptr to src op
3803 bsr.l fix_skewed_ops # fix src op
3943 # load_fop() - load src/dst ops from memory and/or FP regfile #
3950 # funimp_skew() - adjust fsave src ops to "incorrect" value #
4097 or.b STAG(%a6),%d1 # insert src optag bits
4100 lea FP_SRC(%a6),%a0 # pass src ptr in a0
4154 # "n" bytes where "n" is the size of the src operand type.
9596 mov.w SRC_EX(%a0),%d0 # check src bounds
9597 andi.w &0x7fff,%d0 # clr src sign bit
9598 cmpi.w %d0,&0x3fff # is src ~ ZERO?
9600 cmpi.w %d0,&0x400c # no; is src too big?
9607 fintrz.x SRC(%a0),%fp0 # calc int of src
9608 fmov.l %fp0,%d0 # int src to d0
9617 # the src value. then, jump to the norm part of the routine.
9619 mov.l %d0,-(%sp) # save src for now
9628 add.l (%sp)+,%d0 # add adjustment to src
9660 # the src will force the dst to a DENORM value or worse. so, let's
9663 fmovm.x DST(%a1),&0x80 # load fp0 with normalized src
9667 addi.w &0x3fff,%d0 # turn src amt into exp value
9685 exg %a0,%a1 # swap src,dst ptrs
9686 tst.b SRC_EX(%a1) # is src negative?
10142 tst.b SRC_EX(%a0) # no; is src negative?
10187 mov.l %a0,%a1 # make copy of src ptr
10241 # of the src operand. #
10275 # of the src operand. #
10488 # src_zero(): Return signed zero according to sign of src operand. #
10492 tst.b SRC_EX(%a0) # get sign of src operand
10521 # src_inf(): Return signed inf according to sign of src operand. #
10525 tst.b SRC_EX(%a0) # get sign of src operand
10557 # szr_inf(): Return +ZERO for a negative src operand or #
10558 # +INF for a positive src operand. #
10567 # sopr_inf(): Return +INF for a positive src operand or #
10568 # jump to operand error routine for a negative src operand. #
10578 # setoxm1i(): Return minus one for a negative src operand or #
10579 # positive infinity for a positive src operand. #
10589 # src_one(): Return signed one according to sign of src operand. #
10618 # spi_2(): Return signed PI/2 according to sign of src operand. #
10648 # ssincosz(): When the src operand is ZERO, store a one in the
10650 # as the src operand.
10666 # ssincosi(): When the src operand is INF, store a QNAN in the cosine
10668 # src operands.
10677 # ssincosqnan(): When the src operand is a QNAN, store the QNAN in the cosine
10678 # register and branch to the src QNAN routine.
10687 # ssincossnan(): When the src operand is an SNAN, store the SNAN w/ the SNAN bit set
10688 # in the cosine register and branch to the src SNAN routine.
10796 mov.b SRC_EX(%a0),%d1 # get src sign
10809 mov.b SRC_EX(%a0),%d1 # get src sign
10919 # sop_sqnan(): The src op for frem/fmod/fscale was a QNAN.
10931 # sop_ssnan(): The src op for frem/fmod/fscale was an SNAN.
10972 # src_snan(): Return the src SNAN w/ the SNAN bit set.
10976 fmov.x SRC(%a0),%fp0 # the fmove sets the SNAN bit
10982 # src_qnan(): Return the src QNAN.
10986 fmov.x SRC(%a0),%fp0 # return the non-signalling nan
11389 lea 0x4(%sp),%a0 # pass: ptr to src op
11537 # scale_to_zero_src() - scale src exponent to zero #
11593 or.b STAG(%a6),%d1 # combine src tags
11605 bsr.l scale_to_zero_src # scale src exponent
12019 fmovm.x SRC(%a0),&0x80 # return INF result in fp0
12034 # scale_to_zero_src() - scale src exponent to zero #
12075 mov.b STAG(%a6),%d1 # fetch src optype tag
12094 fmovm.x SRC(%a0),&0x80 # return result in fp0
12110 fmovm.x SRC(%a0),&0x80 # return result in fp0
12341 fmov.x SRC(%a0),%fp0 # do fmove in
12354 # scale_to_zero_src() - scale src exponent to zero #
12411 or.b STAG(%a6),%d1 # combine src tags
12427 bsr.l scale_to_zero_src # scale src exponent
13252 fint.x SRC(%a0),%fp0 # execute fint
13308 fmovm.x SRC(%a0),&0x80 # return result in fp0
13355 fintrz.x SRC(%a0),%fp0 # execute fintrz
13410 fmovm.x SRC(%a0),&0x80 # return result in fp0
13731 fabs.x SRC(%a0),%fp0 # force absolute value
13779 fcmp.x %fp0,SRC(%a0) # do compare
13870 # (2) signs are (-) and the DENORM is the src
13876 bset &31,%d0 # DENORM src; make into small norm
13885 bset &31,%d0 # DENORM src; make into small norm
13913 tst.b %d0 # is src op negative?
13927 tst.b %d0 # is src op negative?
13939 # scale_to_zero_src() - scale src exponent to zero #
14280 # scale_to_zero_src() - scale src exponent to zero #
14315 or.b STAG(%a6),%d1 # combine src tags
14623 # scale_to_zero_src() - set src operand exponent equal to zero #
14662 or.b STAG(%a6),%d1 # combine src tags
15037 # src INF since that's where the 881/882 gets the j-bit from...
15043 fmovm.x SRC(%a0),&0x80 # return src INF
15076 # scale_to_zero_src() - set src operand exponent equal to zero #
15115 or.b STAG(%a6),%d1 # combine src tags
15489 # the src INF since that's where the 881/882 gets the j-bit.
15492 fmovm.x SRC(%a0),&0x80 # return src INF
15841 fmovm.x SRC(%a0),&0x80 # return +INF in fp0
15856 # FP_SRC(a6) = fp op1(src) #
15860 # FP_SRC(a6) = fp op1 scaled(src) #
15865 # If the DST exponent is > the SRC exponent, set the DST exponent #
15866 # equal to 0x3fff and scale the SRC exponent by the value that the #
15867 # DST exponent was scaled by. If the SRC exponent is greater or equal, #
15888 mov.w %d0,L_SCR1(%a6) # store src exponent
15891 cmp.w %d0, %d1 # is src exp >= dst exp?
15894 # dst exp is > src exp; scale dst to exp = 0x3fff
15915 add.w 0x2(%sp),%d0 # scale src exponent by scale factor
15925 andi.w &0x8000,FP_SCR0_EX(%a6) # zero src exponent
15931 # src exp is >= dst exp; scale src to exp = 0x3fff
16014 lea FP_SCR0(%a6),%a0 # pass ptr to src op
16075 lea FP_SCR0(%a6),%a0 # pass ptr to src op
16159 # FP_SRC(a6) = pointer to extended precision src operand #
18075 andi.b &0x38,%d1 # extract src mode
18345 lea (%sp),%a0 # pass: supervisor src
19659 bfextu EXC_CMDREG(%a6){&3:&3}, %d0 # extract src field
19660 bsr.l load_fpn1 # fetch src fpreg into FP_SRC
19662 bsr.l set_tag_x # get src optype tag
19664 cmpi.b %d0, &UNNORM # is src fpreg an UNNORM?
19667 mov.b %d0, STAG(%a6) # store the src optype tag
19674 bsr.l unnorm_fix # fix the src UNNORM
19702 bfextu EXC_CMDREG(%a6){&3:&3}, %d0 # extract src type field
19705 bne.w fetch_from_mem # src op is in memory
19709 bfextu EXC_OPWORD(%a6){&13:&3}, %d1 # extract src reg field
19712 jmp (tbl_op010_dreg.b,%pc,%d0.w*1) # fetch src from dreg
19735 fmovm.x &0x80, FP_SRC(%a6) # return src op in FP_SRC
19748 fmovm.x &0x80, FP_SRC(%a6) # return src op in FP_SRC
19761 fmovm.x &0x80, FP_SRC(%a6) # return src op in FP_SRC
19780 mov.b %d0, STAG(%a6) # save the src tag
19789 fmovm.x &0x80, FP_SRC(%a6) # return src op in FP_SRC
19796 # - src is out in memory. must: #
19797 # (1) calc ea - must read AFTER you know the src type since #
19804 # %d0 : src type field #
19809 mov.w (tbl_fp_type.b,%pc,%d0.w*2), %d0 # index by src type field
19837 bsr.l _dmem_read_long # fetch src operand from memory
19844 fmovm.x &0x80, FP_SRC(%a6) # return src op in FP_SRC
19846 fbeq.w load_long_zero # src op is a ZERO
19853 bsr.l _imem_read_long # fetch src operand immed data
19873 bsr.l _dmem_read_word # fetch src operand from memory
19880 fmovm.x &0x80, FP_SRC(%a6) # return src op in FP_SRC
19882 fbeq.w load_word_zero # src op is a ZERO
19889 bsr.l _imem_read_word # fetch src operand immed data
19909 bsr.l _dmem_read_byte # fetch src operand from memory
19916 fmovm.x &0x80, FP_SRC(%a6) # return src op in FP_SRC
19918 fbeq.w load_byte_zero # src op is a ZERO
19925 bsr.l _imem_read_word # fetch src operand immed data
19945 bsr.l _dmem_read_long # fetch src operand from memory
19946 mov.l %d0, L_SCR1(%a6) # store src op on stack
19952 lea L_SCR1(%a6), %a0 # pass: ptr to sgl src op
19953 bsr.l set_tag_s # determine src type tag
19954 mov.b %d0, STAG(%a6) # save src optype tag on stack
19963 fmovm.x &0x80, FP_SRC(%a6) # return src op in FP_SRC
19967 bsr.l _imem_read_long # fetch src operand immed data
19995 mov.b &NORM, STAG(%a6) # fix src type tag
20029 bsr.l _dmem_read # fetch src operand from memory
20036 bsr.l set_tag_d # determine src type tag
20037 mov.b %d0, STAG(%a6) # set src optype tag
20046 fmovm.x &0x80, FP_SRC(%a6) # return src op in FP_SRC
20052 bsr.l _imem_read # fetch src operand from memory
20081 mov.b &NORM, STAG(%a6) # fix src type tag
20115 bsr.l _dmem_read # fetch src operand from memory
20120 lea FP_SRC(%a6), %a0 # pass: ptr to src op
20121 bsr.l set_tag_x # determine src type tag
20123 cmpi.b %d0, &UNNORM # is the src op an UNNORM?
20126 mov.b %d0, STAG(%a6) # store the src optype tag
20130 bsr.l unnorm_fix # fix the src UNNORM
20131 mov.b %d0, STAG(%a6) # store the src optype tag
20144 lea FP_SRC(%a6),%a0 # pass ptr to src op
20145 bsr.l set_tag_x # determine src type tag
20146 cmpi.b %d0,&UNNORM # is the src op an UNNORM ZERO?
20149 mov.b %d0,STAG(%a6) # store the src optype tag
20154 mov.b %d0,STAG(%a6) # store the src optype tag
20235 fmovm.x SRC(%a0),&0x80 # load value
20281 fmovm.x SRC(%a0),&0x80 # load value
20327 fmovm.x SRC(%a0),&0x80 # load value
20375 # what's at SRC(a0).
20381 fmovm.x SRC(%a0),&0x80 # return result
20386 lea FP_SCR0(%a6),%a0 # pass: src addr
20467 fmovm.x SRC(%a0),&0x80 # fetch fop from stack
20513 cmpi.b STAG(%a6),&DENORM # fetch src optype tag
20636 cmpi.b STAG(%a6),&DENORM # was src a DENORM?
20705 fmovm.x SRC(%a0),&0x80 # fetch fop from stack
20718 lea L_SCR1(%a6),%a0 # pass: src addr
20742 cmpi.b STAG(%a6),&DENORM # fetch src optype tag
20759 lea L_SCR1(%a6),%a0 # pass: src addr
20799 lea L_SCR1(%a6),%a0 # pass: src addr
21020 lea FP_SCR0(%a6),%a0 # pass: src addr
24054 # a0: ptr for original operand/src ptr for sintdo
Indexes created Sat Nov 01 21:09:44 GMT 2025