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

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

信息检索与抽取

开发平台：

Unix_Linux

mframe.foot：源码内容
  2. inline static void*
  3. mframe_arg_addr(arglist_t argf, NSArgumentInfo *info)
  4. {
  5.   int offset = info->offset;
  6. #if WORDS_BIGENDIAN
  7.   if (info->size < sizeof (int))
  8.     {
  9.       offset += sizeof(int) - info->size;
  10.     }
  11. #endif
  12.   if (info->isReg)
  13.     {
  14.       return(argf->arg_regs + offset);
  15.     }
  16.   else
  17.     {
  18.       return(argf->arg_ptr + offset);
  19.     }
  20. }
  22. inline static void
  23. mframe_get_arg(arglist_t argf, NSArgumentInfo *info, void* buffer)
  24. {
  25. #if MFRAME_STRUCT_BYREF || MFRAME_FLT_IN_FRAME_AS_DBL
  26.   const char *typ = info->type;
  27. #endif
  29. #if MFRAME_STRUCT_BYREF
  30.   /*
  31.    * If structures are passed in the stack frame by reference - we need
  32.    * to copy the actual structure, rather than it's pointer.
  33.    */
  34.   if (*typ == _C_STRUCT_B || *typ == _C_UNION_B || *typ == _C_ARY_B)
  35.     {
  36.       memcpy(buffer, *(void**)mframe_arg_addr(argf, info), info->size);
  37.     }
  38.   else
  39. #endif
  40. #if MFRAME_FLT_IN_FRAME_AS_DBL
  41.   if (*typ == _C_FLT)
  42.     {
  43.       *(float*)buffer = (float)*(double*)mframe_arg_addr(argf, info);
  44.     }
  45.   else
  46. #endif
  47.   memcpy(buffer, mframe_arg_addr(argf, info), info->size);
  48. }
  50. inline static void
  51. mframe_set_arg(arglist_t argf, NSArgumentInfo *info, void* buffer)
  52. {
  53. #if MFRAME_STRUCT_BYREF || MFRAME_FLT_IN_FRAME_AS_DBL
  54.   const char *typ = info->type;
  55. #endif
  57. #if MFRAME_STRUCT_BYREF
  58.   /*
  59.    * If structures are passed in the stack frame by reference - we need
  60.    * to copy a pointer onto the stack rather than the actual structure.
  61.    */
  62.   if (*typ == _C_STRUCT_B || *typ == _C_UNION_B || *typ == _C_ARY_B)
  63.     {
  64.       memcpy(mframe_arg_addr(argf, info), &buffer, sizeof(void*));
  65.     }
  66.   else
  67. #endif
  68. #if MFRAME_FLT_IN_FRAME_AS_DBL
  69.   if (*typ == _C_FLT)
  70.     {
  71.       *(double*)mframe_arg_addr(argf, info) = *(float*)buffer;
  72.     }
  73.   else
  74. #endif
  75.   memcpy(mframe_arg_addr(argf, info), buffer, info->size);
  76. }
  78. inline static void
  79. mframe_cpy_arg(arglist_t dst, arglist_t src, NSArgumentInfo *info)
  80. {
  81. #if MFRAME_STRUCT_BYREF
  82.   const char *typ = info->type;
  84.   /*
  85.    * If structures are passed in the stack frame by reference - we need
  86.    * to copy a pointer onto the stack rather than the actual structure.
  87.    */
  88.   if (*typ == _C_STRUCT_B || *typ == _C_UNION_B || *typ == _C_ARY_B)
  89.     {
  90.       memcpy(mframe_arg_addr(dst, info), mframe_arg_addr(src, info), sizeof(void*));
  91.     }
  92.   else
  93. #endif
  94.     memcpy(mframe_arg_addr(dst, info), mframe_arg_addr(src, info), info->size);
  95. }
  97. #endif /* __mframe_h_GNUSTEP_BASE_INCLUDE */