开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 多国语言处理 > 信息检索与抽取 > 查看源码
avcall-sparc64.c
资源名称：swarm-2.2.tar.gz　[点击查看]
上传用户：shenzhenrh
上传日期：2013-05-12
资源大小：2904k
文件大小：23k
源码类别：

信息检索与抽取

开发平台：

Unix_Linux

avcall-sparc64.c：源码内容
  1. #ifndef _avcall_sparc64_c /*-*- C -*-*/
  2. #define _avcall_sparc64_c
  3. /**
  4.   Copyright 1993 Bill Triggs, <Bill.Triggs@inrialpes.fr>
  5.   Copyright 1995-1999 Bruno Haible, <haible@clisp.cons.org>
  7.   This is free software distributed under the GNU General Public
  8.   Licence described in the file COPYING. Contact the author if
  9.   you don't have this or can't live with it. There is ABSOLUTELY
  10.   NO WARRANTY, explicit or implied, on this software.
  11. **/
  12. /*----------------------------------------------------------------------
  13.   !!! THIS ROUTINE MUST BE COMPILED gcc -O !!!
  15.   Foreign function interface for a Sparc v9 in 64-bit mode with gcc.
  17.   This calls a C function with an argument list built up using macros
  18.   defined in av_call.h.
  20.   Sparc 64-bit Argument Passing Conventions
  22.   The argument registers are laid out as an array of 16 elements
  23.   and arguments are added sequentially.  The first 6 int args and up to the
  24.   first 16 fp args (depending on size) are passed in regs.
  26.   Slot    Stack   Integral   Float   Float in structure   Double   Long Double
  27.   ----    -----   --------   -----   ------------------   ------   -----------
  28.    15   [SP+248]              %f31       %f30,%f31         %d30
  29.    14   [SP+240]              %f29       %f28,%f29         %d28       %q28
  30.    13   [SP+232]              %f27       %f26,%f27         %d26
  31.    12   [SP+224]              %f25       %f24,%f25         %d24       %q24
  32.    11   [SP+216]              %f23       %f22,%f23         %d22
  33.    10   [SP+208]              %f21       %f20,%f21         %d20       %q20
  34.     9   [SP+200]              %f19       %f18,%f19         %d18
  35.     8   [SP+192]              %f17       %f16,%f17         %d16       %q16
  36.     7   [SP+184]              %f15       %f14,%f15         %d14
  37.     6   [SP+176]              %f13       %f12,%f13         %d12       %q12
  38.     5   [SP+168]     %o5      %f11       %f10,%f11         %d10
  39.     4   [SP+160]     %o4       %f9        %f8,%f9           %d8        %q8
  40.     3   [SP+152]     %o3       %f7        %f6,%f7           %d6
  41.     2   [SP+144]     %o2       %f5        %f4,%f5           %d4        %q4
  42.     1   [SP+136]     %o1       %f3        %f2,%f3           %d2
  43.     0   [SP+128]     %o0       %f1        %f0,%f1           %d0        %q0
  45.   Here SP = %sp if -mno-stack-bias or %sp+stack_bias otherwise.
  47.   Integral arguments are always passed as 64 bit quantities appropriately
  48.   extended.
  50.   Passing of floating point values is handled as follows.
  51.   If a prototype is in scope:
  52.     If the value is in a named argument (i.e. not a stdarg function or a
  53.     value not part of the `...') then the value is passed in the appropriate
  54.     fp reg.
  55.     If the value is part of the `...' and is passed in one of the first 6
  56.     slots then the value is passed in the appropriate int reg.
  57.     If the value is part of the `...' and is not passed in one of the first 6
  58.     slots then the value is passed in memory.
  59.   If a prototype is not in scope:
  60.     If the value is one of the first 6 arguments the value is passed in the
  61.     appropriate integer reg and the appropriate fp reg.
  62.     If the value is not one of the first 6 arguments the value is passed in
  63.     the appropriate fp reg and in memory.
  65.   Remaining arguments are pushed onto the stack starting at a fixed offset
  66.   Space is left on the stack frame for temporary storage of the register
  67.   arguments as well.
  69.   Integers shorter than `long' are always promoted to word-length
  70.   (zero-extended or sign-extended, according to their type). Structures
  71.   <= 16 bytes are passed embedded in the argument sequence; bigger structures
  72.   are passed by reference.
  74.   Integers and pointers are returned in o0, floats in f0, doubles in
  75.   f0/f1.  If the function returns a structure a pointer to space
  76.   allocated by the caller is pushed onto the stack immediately
  77.   before the function arguments. Structures <= 32 bytes are returned in
  78.   registers (integer/float/double registers, as appropriate).
  80.   Long doubles are 16-byte aligned, but we don't deal with this here, so
  81.   we assume 8-byte alignment for everything.
  83.   ----------------------------------------------------------------------*/
  84. #include "avcall.h.in"
  86. #define RETURN(TYPE,VAL) (*(TYPE*)l->raddr = (TYPE)(VAL))
  87. #define OFFSETOF(struct,member) ((int)&(((struct*)0)->member))
  89. register void* callee __asm__("%g2");  /* any global or local register */
  90. register __avword o0 __asm__("%o0");
  91. register __avword o1 __asm__("%o1");
  92. register __avword o2 __asm__("%o2");
  93. register __avword o3 __asm__("%o3");
  94. register __avword o4 __asm__("%o4");
  95. register __avword o5 __asm__("%o5");
  97. int
  98. __builtin_avcall(av_alist* l)
  99. {
  100.   register __avword* sp __asm__("%sp");  /* C names for registers */
  101.   register float fret __asm__("%f0");  /* %f0 */
  102.   register double dret __asm__("%f0");  /* %f0,%f1 */
  104.   __avword trampoline[6]; /* room for a trampoline */
  105.   __avword space[__AV_ALIST_WORDS]; /* space for callee's stack frame */
  106.   __avword *argframe = sp + 17; /* stack offset for argument list */
  107.   int arglen = l->aptr - l->args;
  108.   __avword i;
  110.   if (l->farg_mask) {
  111.     /* push leading float args */
  112.     if (l->farg_mask & (1<<0))
  113.       __asm__("ld %1(%0),%%f1" : : "p" (l), "i" OFFSETOF(av_alist,args[0]));
  114.     if (l->farg_mask & (1<<1))
  115.       __asm__("ld %1(%0),%%f3" : : "p" (l), "i" OFFSETOF(av_alist,args[1]));
  116.     if (l->farg_mask & (1<<2))
  117.       __asm__("ld %1(%0),%%f5" : : "p" (l), "i" OFFSETOF(av_alist,args[2]));
  118.     if (l->farg_mask & (1<<3))
  119.       __asm__("ld %1(%0),%%f7" : : "p" (l), "i" OFFSETOF(av_alist,args[3]));
  120.     if (l->farg_mask & (1<<4))
  121.       __asm__("ld %1(%0),%%f9" : : "p" (l), "i" OFFSETOF(av_alist,args[4]));
  122.     if (l->farg_mask & (1<<5))
  123.       __asm__("ld %1(%0),%%f11" : : "p" (l), "i" OFFSETOF(av_alist,args[5]));
  124.     if (l->farg_mask & (1<<6))
  125.       __asm__("ld %1(%0),%%f13" : : "p" (l), "i" OFFSETOF(av_alist,args[6]));
  126.     if (l->farg_mask & (1<<7))
  127.       __asm__("ld %1(%0),%%f15" : : "p" (l), "i" OFFSETOF(av_alist,args[7]));
  128.     if (l->farg_mask & (1<<8))
  129.       __asm__("ld %1(%0),%%f17" : : "p" (l), "i" OFFSETOF(av_alist,args[8]));
  130.     if (l->farg_mask & (1<<9))
  131.       __asm__("ld %1(%0),%%f19" : : "p" (l), "i" OFFSETOF(av_alist,args[9]));
  132.     if (l->farg_mask & (1<<10))
  133.       __asm__("ld %1(%0),%%f21" : : "p" (l), "i" OFFSETOF(av_alist,args[10]));
  134.     if (l->farg_mask & (1<<11))
  135.       __asm__("ld %1(%0),%%f23" : : "p" (l), "i" OFFSETOF(av_alist,args[11]));
  136.     if (l->farg_mask & (1<<12))
  137.       __asm__("ld %1(%0),%%f25" : : "p" (l), "i" OFFSETOF(av_alist,args[12]));
  138.     if (l->farg_mask & (1<<13))
  139.       __asm__("ld %1(%0),%%f27" : : "p" (l), "i" OFFSETOF(av_alist,args[13]));
  140.     if (l->farg_mask & (1<<14))
  141.       __asm__("ld %1(%0),%%f29" : : "p" (l), "i" OFFSETOF(av_alist,args[14]));
  142.     if (l->farg_mask & (1<<15))
  143.       __asm__("ld %1(%0),%%f31" : : "p" (l), "i" OFFSETOF(av_alist,args[15]));
  144.   }
  145.   if (l->darg_mask) {
  146.     /* push leading double args */
  147.     if (l->darg_mask & (1<<0))
  148.       __asm__("ldd %1(%0),%%f0" : : "p" (l), "i" OFFSETOF(av_alist,args[0]));
  149.     if (l->darg_mask & (1<<1))
  150.       __asm__("ldd %1(%0),%%f2" : : "p" (l), "i" OFFSETOF(av_alist,args[1]));
  151.     if (l->darg_mask & (1<<2))
  152.       __asm__("ldd %1(%0),%%f4" : : "p" (l), "i" OFFSETOF(av_alist,args[2]));
  153.     if (l->darg_mask & (1<<3))
  154.       __asm__("ldd %1(%0),%%f6" : : "p" (l), "i" OFFSETOF(av_alist,args[3]));
  155.     if (l->darg_mask & (1<<4))
  156.       __asm__("ldd %1(%0),%%f8" : : "p" (l), "i" OFFSETOF(av_alist,args[4]));
  157.     if (l->darg_mask & (1<<5))
  158.       __asm__("ldd %1(%0),%%f10" : : "p" (l), "i" OFFSETOF(av_alist,args[5]));
  159.     if (l->darg_mask & (1<<6))
  160.       __asm__("ldd %1(%0),%%f12" : : "p" (l), "i" OFFSETOF(av_alist,args[6]));
  161.     if (l->darg_mask & (1<<7))
  162.       __asm__("ldd %1(%0),%%f14" : : "p" (l), "i" OFFSETOF(av_alist,args[7]));
  163.     if (l->darg_mask & (1<<8))
  164.       __asm__("ldd %1(%0),%%f16" : : "p" (l), "i" OFFSETOF(av_alist,args[8]));
  165.     if (l->darg_mask & (1<<9))
  166.       __asm__("ldd %1(%0),%%f18" : : "p" (l), "i" OFFSETOF(av_alist,args[9]));
  167.     if (l->darg_mask & (1<<10))
  168.       __asm__("ldd %1(%0),%%f20" : : "p" (l), "i" OFFSETOF(av_alist,args[10]));
  169.     if (l->darg_mask & (1<<11))
  170.       __asm__("ldd %1(%0),%%f22" : : "p" (l), "i" OFFSETOF(av_alist,args[11]));
  171.     if (l->darg_mask & (1<<12))
  172.       __asm__("ldd %1(%0),%%f24" : : "p" (l), "i" OFFSETOF(av_alist,args[12]));
  173.     if (l->darg_mask & (1<<13))
  174.       __asm__("ldd %1(%0),%%f26" : : "p" (l), "i" OFFSETOF(av_alist,args[13]));
  175.     if (l->darg_mask & (1<<14))
  176.       __asm__("ldd %1(%0),%%f28" : : "p" (l), "i" OFFSETOF(av_alist,args[14]));
  177.     if (l->darg_mask & (1<<15))
  178.       __asm__("ldd %1(%0),%%f30" : : "p" (l), "i" OFFSETOF(av_alist,args[15]));
  179.   }
  181.   {
  182.     int i;
  183.     for (i = 6; i < arglen; i++) /* push excess function args */
  184.       argframe[i] = l->args[i];
  185.   }
  187. /* call function with 1st 6 args */
  188.   i = ({ __avword iret; /* %o0 */
  189.          iret = (*l->func)(l->args[0], l->args[1], l->args[2],
  190.    l->args[3], l->args[4], l->args[5]);
  191.          asm ("nop"); /* struct returning functions skip this instruction */
  192.          iret;
  193.        });
  195.   /* save return value */
  196.   if (l->rtype == __AVvoid) {
  197.   } else
  198.   if (l->rtype == __AVword) {
  199.     RETURN(__avword, i);
  200.   } else
  201.   if (l->rtype == __AVchar) {
  202.     RETURN(char, i);
  203.   } else
  204.   if (l->rtype == __AVschar) {
  205.     RETURN(signed char, i);
  206.   } else
  207.   if (l->rtype == __AVuchar) {
  208.     RETURN(unsigned char, i);
  209.   } else
  210.   if (l->rtype == __AVshort) {
  211.     RETURN(short, i);
  212.   } else
  213.   if (l->rtype == __AVushort) {
  214.     RETURN(unsigned short, i);
  215.   } else
  216.   if (l->rtype == __AVint) {
  217.     RETURN(int, i);
  218.   } else
  219.   if (l->rtype == __AVuint) {
  220.     RETURN(unsigned int, i);
  221.   } else
  222.   if (l->rtype == __AVlong) {
  223.     RETURN(long, i);
  224.   } else
  225.   if (l->rtype == __AVulong) {
  226.     RETURN(unsigned long, i);
  227.   } else
  228.   if (l->rtype == __AVlonglong) {
  229.     RETURN(long long, i);
  230.   } else
  231.   if (l->rtype == __AVulonglong) {
  232.     RETURN(unsigned long long, i);
  233.   } else
  234.   if (l->rtype == __AVfloat) {
  235.     RETURN(float, fret);
  236.   } else
  237.   if (l->rtype == __AVdouble) {
  238.     RETURN(double, dret);
  239.   } else
  240.   if (l->rtype == __AVvoidp) {
  241.     RETURN(void*, i);
  242.   } else
  243.   if (l->rtype == __AVstruct) {
  244.     if (l->flags & __AV_PCC_STRUCT_RETURN) {
  245.       /* pcc struct return convention: need a  *(TYPE*)l->raddr = *(TYPE*)i;  */
  246.       if (l->rsize == sizeof(char)) {
  247.         RETURN(char, *(char*)i);
  248.       } else
  249.       if (l->rsize == sizeof(short)) {
  250.         RETURN(short, *(short*)i);
  251.       } else
  252.       if (l->rsize == sizeof(int)) {
  253.         RETURN(int, *(int*)i);
  254.       } else
  255.       if (l->rsize == sizeof(long)) {
  256.         RETURN(long, *(long*)i);
  257.       } else {
  258.         int n = (l->rsize + sizeof(__avword)-1)/sizeof(__avword);
  259.         while (--n >= 0)
  260.           ((__avword*)l->raddr)[n] = ((__avword*)i)[n];
  261.       }
  262.     } else {
  263.       /* normal struct return convention */
  264.       if (l->flags & __AV_REGISTER_STRUCT_RETURN) {
  265.         /* Return structs of size <= 32 in registers. */
  266.         if (l->rsize > 0 && l->rsize <= 32) {
  267.           if (l->rsize == 1) {
  268.             ((unsigned char *)l->raddr)[0] = (unsigned char)(i>>56);
  269.           } else
  270.           if (l->rsize == 2) {
  271.             ((unsigned char *)l->raddr)[0] = (unsigned char)(i>>56);
  272.             ((unsigned char *)l->raddr)[1] = (unsigned char)(i>>48);
  273.           } else
  274.           if (l->rsize == 3) {
  275.             ((unsigned char *)l->raddr)[0] = (unsigned char)(i>>56);
  276.             ((unsigned char *)l->raddr)[1] = (unsigned char)(i>>48);
  277.             ((unsigned char *)l->raddr)[2] = (unsigned char)(i>>40);
  278.           } else
  279.           if (l->rsize == 4) {
  280.             ((unsigned char *)l->raddr)[0] = (unsigned char)(i>>56);
  281.             ((unsigned char *)l->raddr)[1] = (unsigned char)(i>>48);
  282.             ((unsigned char *)l->raddr)[2] = (unsigned char)(i>>40);
  283.             ((unsigned char *)l->raddr)[3] = (unsigned char)(i>>32);
  284.           } else
  285.           if (l->rsize == 5) {
  286.             ((unsigned char *)l->raddr)[0] = (unsigned char)(i>>56);
  287.             ((unsigned char *)l->raddr)[1] = (unsigned char)(i>>48);
  288.             ((unsigned char *)l->raddr)[2] = (unsigned char)(i>>40);
  289.             ((unsigned char *)l->raddr)[3] = (unsigned char)(i>>32);
  290.             ((unsigned char *)l->raddr)[4] = (unsigned char)(i>>24);
  291.           } else
  292.           if (l->rsize == 6) {
  293.             ((unsigned char *)l->raddr)[0] = (unsigned char)(i>>56);
  294.             ((unsigned char *)l->raddr)[1] = (unsigned char)(i>>48);
  295.             ((unsigned char *)l->raddr)[2] = (unsigned char)(i>>40);
  296.             ((unsigned char *)l->raddr)[3] = (unsigned char)(i>>32);
  297.             ((unsigned char *)l->raddr)[4] = (unsigned char)(i>>24);
  298.             ((unsigned char *)l->raddr)[5] = (unsigned char)(i>>16);
  299.           } else
  300.           if (l->rsize == 7) {
  301.             ((unsigned char *)l->raddr)[0] = (unsigned char)(i>>56);
  302.             ((unsigned char *)l->raddr)[1] = (unsigned char)(i>>48);
  303.             ((unsigned char *)l->raddr)[2] = (unsigned char)(i>>40);
  304.             ((unsigned char *)l->raddr)[3] = (unsigned char)(i>>32);
  305.             ((unsigned char *)l->raddr)[4] = (unsigned char)(i>>24);
  306.             ((unsigned char *)l->raddr)[5] = (unsigned char)(i>>16);
  307.             ((unsigned char *)l->raddr)[6] = (unsigned char)(i>>8);
  308.           } else
  309.           if (l->rsize >= 8 && l->rsize <= 32) {
  310.             ((unsigned char *)l->raddr)[0] = (unsigned char)(i>>56);
  311.             ((unsigned char *)l->raddr)[1] = (unsigned char)(i>>48);
  312.             ((unsigned char *)l->raddr)[2] = (unsigned char)(i>>40);
  313.             ((unsigned char *)l->raddr)[3] = (unsigned char)(i>>32);
  314.             ((unsigned char *)l->raddr)[4] = (unsigned char)(i>>24);
  315.             ((unsigned char *)l->raddr)[5] = (unsigned char)(i>>16);
  316.             ((unsigned char *)l->raddr)[6] = (unsigned char)(i>>8);
  317.             ((unsigned char *)l->raddr)[7] = (unsigned char)(i);
  318.             if (l->rsize == 8) {
  319.             } else
  320.             if (l->rsize == 9) {
  321.               ((unsigned char *)l->raddr)[8+0] = (unsigned char)(o1>>56);
  322.             } else
  323.             if (l->rsize == 10) {
  324.               ((unsigned char *)l->raddr)[8+0] = (unsigned char)(o1>>56);
  325.               ((unsigned char *)l->raddr)[8+1] = (unsigned char)(o1>>48);
  326.             } else
  327.             if (l->rsize == 11) {
  328.               ((unsigned char *)l->raddr)[8+0] = (unsigned char)(o1>>56);
  329.               ((unsigned char *)l->raddr)[8+1] = (unsigned char)(o1>>48);
  330.               ((unsigned char *)l->raddr)[8+2] = (unsigned char)(o1>>40);
  331.             } else
  332.             if (l->rsize == 12) {
  333.               ((unsigned char *)l->raddr)[8+0] = (unsigned char)(o1>>56);
  334.               ((unsigned char *)l->raddr)[8+1] = (unsigned char)(o1>>48);
  335.               ((unsigned char *)l->raddr)[8+2] = (unsigned char)(o1>>40);
  336.               ((unsigned char *)l->raddr)[8+3] = (unsigned char)(o1>>32);
  337.             } else
  338.             if (l->rsize == 13) {
  339.               ((unsigned char *)l->raddr)[8+0] = (unsigned char)(o1>>56);
  340.               ((unsigned char *)l->raddr)[8+1] = (unsigned char)(o1>>48);
  341.               ((unsigned char *)l->raddr)[8+2] = (unsigned char)(o1>>40);
  342.               ((unsigned char *)l->raddr)[8+3] = (unsigned char)(o1>>32);
  343.               ((unsigned char *)l->raddr)[8+4] = (unsigned char)(o1>>24);
  344.             } else
  345.             if (l->rsize == 14) {
  346.               ((unsigned char *)l->raddr)[8+0] = (unsigned char)(o1>>56);
  347.               ((unsigned char *)l->raddr)[8+1] = (unsigned char)(o1>>48);
  348.               ((unsigned char *)l->raddr)[8+2] = (unsigned char)(o1>>40);
  349.               ((unsigned char *)l->raddr)[8+3] = (unsigned char)(o1>>32);
  350.               ((unsigned char *)l->raddr)[8+4] = (unsigned char)(o1>>24);
  351.               ((unsigned char *)l->raddr)[8+5] = (unsigned char)(o1>>16);
  352.             } else
  353.             if (l->rsize == 15) {
  354.               ((unsigned char *)l->raddr)[8+0] = (unsigned char)(o1>>56);
  355.               ((unsigned char *)l->raddr)[8+1] = (unsigned char)(o1>>48);
  356.               ((unsigned char *)l->raddr)[8+2] = (unsigned char)(o1>>40);
  357.               ((unsigned char *)l->raddr)[8+3] = (unsigned char)(o1>>32);
  358.               ((unsigned char *)l->raddr)[8+4] = (unsigned char)(o1>>24);
  359.               ((unsigned char *)l->raddr)[8+5] = (unsigned char)(o1>>16);
  360.               ((unsigned char *)l->raddr)[8+6] = (unsigned char)(o1>>8);
  361.             } else
  362.             if (l->rsize >= 16 && l->rsize <= 32) {
  363.               ((unsigned char *)l->raddr)[8+0] = (unsigned char)(o1>>56);
  364.               ((unsigned char *)l->raddr)[8+1] = (unsigned char)(o1>>48);
  365.               ((unsigned char *)l->raddr)[8+2] = (unsigned char)(o1>>40);
  366.               ((unsigned char *)l->raddr)[8+3] = (unsigned char)(o1>>32);
  367.               ((unsigned char *)l->raddr)[8+4] = (unsigned char)(o1>>24);
  368.               ((unsigned char *)l->raddr)[8+5] = (unsigned char)(o1>>16);
  369.               ((unsigned char *)l->raddr)[8+6] = (unsigned char)(o1>>8);
  370.               ((unsigned char *)l->raddr)[8+7] = (unsigned char)(o1);
  371.               if (l->rsize == 16) {
  372.               } else
  373.               if (l->rsize == 17) {
  374.                 ((unsigned char *)l->raddr)[16+0] = (unsigned char)(o2>>56);
  375.               } else
  376.               if (l->rsize == 18) {
  377.                 ((unsigned char *)l->raddr)[16+0] = (unsigned char)(o2>>56);
  378.                 ((unsigned char *)l->raddr)[16+1] = (unsigned char)(o2>>48);
  379.               } else
  380.               if (l->rsize == 19) {
  381.                 ((unsigned char *)l->raddr)[16+0] = (unsigned char)(o2>>56);
  382.                 ((unsigned char *)l->raddr)[16+1] = (unsigned char)(o2>>48);
  383.                 ((unsigned char *)l->raddr)[16+2] = (unsigned char)(o2>>40);
  384.               } else
  385.               if (l->rsize == 20) {
  386.                 ((unsigned char *)l->raddr)[16+0] = (unsigned char)(o2>>56);
  387.                 ((unsigned char *)l->raddr)[16+1] = (unsigned char)(o2>>48);
  388.                 ((unsigned char *)l->raddr)[16+2] = (unsigned char)(o2>>40);
  389.                 ((unsigned char *)l->raddr)[16+3] = (unsigned char)(o2>>32);
  390.               } else
  391.               if (l->rsize == 21) {
  392.                 ((unsigned char *)l->raddr)[16+0] = (unsigned char)(o2>>56);
  393.                 ((unsigned char *)l->raddr)[16+1] = (unsigned char)(o2>>48);
  394.                 ((unsigned char *)l->raddr)[16+2] = (unsigned char)(o2>>40);
  395.                 ((unsigned char *)l->raddr)[16+3] = (unsigned char)(o2>>32);
  396.                 ((unsigned char *)l->raddr)[16+4] = (unsigned char)(o2>>24);
  397.               } else
  398.               if (l->rsize == 22) {
  399.                 ((unsigned char *)l->raddr)[16+0] = (unsigned char)(o2>>56);
  400.                 ((unsigned char *)l->raddr)[16+1] = (unsigned char)(o2>>48);
  401.                 ((unsigned char *)l->raddr)[16+2] = (unsigned char)(o2>>40);
  402.                 ((unsigned char *)l->raddr)[16+3] = (unsigned char)(o2>>32);
  403.                 ((unsigned char *)l->raddr)[16+4] = (unsigned char)(o2>>24);
  404.                 ((unsigned char *)l->raddr)[16+5] = (unsigned char)(o2>>16);
  405.               } else
  406.               if (l->rsize == 23) {
  407.                 ((unsigned char *)l->raddr)[16+0] = (unsigned char)(o2>>56);
  408.                 ((unsigned char *)l->raddr)[16+1] = (unsigned char)(o2>>48);
  409.                 ((unsigned char *)l->raddr)[16+2] = (unsigned char)(o2>>40);
  410.                 ((unsigned char *)l->raddr)[16+3] = (unsigned char)(o2>>32);
  411.                 ((unsigned char *)l->raddr)[16+4] = (unsigned char)(o2>>24);
  412.                 ((unsigned char *)l->raddr)[16+5] = (unsigned char)(o2>>16);
  413.                 ((unsigned char *)l->raddr)[16+6] = (unsigned char)(o2>>8);
  414.               } else
  415.               if (l->rsize >= 24 && l->rsize <= 32) {
  416.                 ((unsigned char *)l->raddr)[16+0] = (unsigned char)(o2>>56);
  417.                 ((unsigned char *)l->raddr)[16+1] = (unsigned char)(o2>>48);
  418.                 ((unsigned char *)l->raddr)[16+2] = (unsigned char)(o2>>40);
  419.                 ((unsigned char *)l->raddr)[16+3] = (unsigned char)(o2>>32);
  420.                 ((unsigned char *)l->raddr)[16+4] = (unsigned char)(o2>>24);
  421.                 ((unsigned char *)l->raddr)[16+5] = (unsigned char)(o2>>16);
  422.                 ((unsigned char *)l->raddr)[16+6] = (unsigned char)(o2>>8);
  423.                 ((unsigned char *)l->raddr)[16+7] = (unsigned char)(o2);
  424.                 if (l->rsize == 24) {
  425.                 } else
  426.                 if (l->rsize == 25) {
  427.                   ((unsigned char *)l->raddr)[24+0] = (unsigned char)(o3>>56);
  428.                 } else
  429.                 if (l->rsize == 26) {
  430.                   ((unsigned char *)l->raddr)[24+0] = (unsigned char)(o3>>56);
  431.                   ((unsigned char *)l->raddr)[24+1] = (unsigned char)(o3>>48);
  432.                 } else
  433.                 if (l->rsize == 27) {
  434.                   ((unsigned char *)l->raddr)[24+0] = (unsigned char)(o3>>56);
  435.                   ((unsigned char *)l->raddr)[24+1] = (unsigned char)(o3>>48);
  436.                   ((unsigned char *)l->raddr)[24+2] = (unsigned char)(o3>>40);
  437.                 } else
  438.                 if (l->rsize == 28) {
  439.                   ((unsigned char *)l->raddr)[24+0] = (unsigned char)(o3>>56);
  440.                   ((unsigned char *)l->raddr)[24+1] = (unsigned char)(o3>>48);
  441.                   ((unsigned char *)l->raddr)[24+2] = (unsigned char)(o3>>40);
  442.                   ((unsigned char *)l->raddr)[24+3] = (unsigned char)(o3>>32);
  443.                 } else
  444.                 if (l->rsize == 29) {
  445.                   ((unsigned char *)l->raddr)[24+0] = (unsigned char)(o3>>56);
  446.                   ((unsigned char *)l->raddr)[24+1] = (unsigned char)(o3>>48);
  447.                   ((unsigned char *)l->raddr)[24+2] = (unsigned char)(o3>>40);
  448.                   ((unsigned char *)l->raddr)[24+3] = (unsigned char)(o3>>32);
  449.                   ((unsigned char *)l->raddr)[24+4] = (unsigned char)(o3>>24);
  450.                 } else
  451.                 if (l->rsize == 30) {
  452.                   ((unsigned char *)l->raddr)[24+0] = (unsigned char)(o3>>56);
  453.                   ((unsigned char *)l->raddr)[24+1] = (unsigned char)(o3>>48);
  454.                   ((unsigned char *)l->raddr)[24+2] = (unsigned char)(o3>>40);
  455.                   ((unsigned char *)l->raddr)[24+3] = (unsigned char)(o3>>32);
  456.                   ((unsigned char *)l->raddr)[24+4] = (unsigned char)(o3>>24);
  457.                   ((unsigned char *)l->raddr)[24+5] = (unsigned char)(o3>>16);
  458.                 } else
  459.                 if (l->rsize == 31) {
  460.                   ((unsigned char *)l->raddr)[24+0] = (unsigned char)(o3>>56);
  461.                   ((unsigned char *)l->raddr)[24+1] = (unsigned char)(o3>>48);
  462.                   ((unsigned char *)l->raddr)[24+2] = (unsigned char)(o3>>40);
  463.                   ((unsigned char *)l->raddr)[24+3] = (unsigned char)(o3>>32);
  464.                   ((unsigned char *)l->raddr)[24+4] = (unsigned char)(o3>>24);
  465.                   ((unsigned char *)l->raddr)[24+5] = (unsigned char)(o3>>16);
  466.                   ((unsigned char *)l->raddr)[24+6] = (unsigned char)(o3>>8);
  467.                 } else
  468.                 if (l->rsize == 32) {
  469.                   ((unsigned char *)l->raddr)[24+0] = (unsigned char)(o3>>56);
  470.                   ((unsigned char *)l->raddr)[24+1] = (unsigned char)(o3>>48);
  471.                   ((unsigned char *)l->raddr)[24+2] = (unsigned char)(o3>>40);
  472.                   ((unsigned char *)l->raddr)[24+3] = (unsigned char)(o3>>32);
  473.                   ((unsigned char *)l->raddr)[24+4] = (unsigned char)(o3>>24);
  474.                   ((unsigned char *)l->raddr)[24+5] = (unsigned char)(o3>>16);
  475.                   ((unsigned char *)l->raddr)[24+6] = (unsigned char)(o3>>8);
  476.                   ((unsigned char *)l->raddr)[24+7] = (unsigned char)(o3);
  477.                 }
  478.               }
  479.             }
  480.           }
  481.         }
  482.       }
  483.     }
  484.   }
  485.   return 0;
  486. }
  488. #endif /*_avcall_sparc64_c */