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

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

信息检索与抽取

开发平台：

Unix_Linux

ActionHomogeneous.m：源码内容
  1. PHASE(Creating)
  2. + createBegin: aZone
  3. {
  4.   ACTION_HOMOGENEOUS_TYPE *obj = [super createBegin: aZone];
  6.   obj->targetCount = 0;
  7. #ifdef UPDATEJAVACALL
  8.   obj->javaTargets = NULL;
  9. #endif
  10.   obj->objcTargets = NULL;
  11.   return obj;
  12. }
  14. - (void)setTarget: theTarget
  15. {
  16.   target = theTarget;
  17. }
  19. - createEnd
  20. {
  21.   BOOL allSameFlag = [target allSameClass];
  23.   [super createEnd];
  24.   
  25.   if (allSameFlag)
  26.     {
  27.       id <Index> index = [target begin: getZone (self)];
  28.       
  29.       targetCount = [target getCount];
  30. #ifdef UPDATEJAVATARGET
  31.       if (SD_JAVA_FIND_OBJECT_JAVA ([target getFirst]))
  32.         {
  33.           size_t i;
  34.           id obj;
  35.           
  36.           javaTargets =
  37.             [scratchZone alloc: sizeof (jobject) * targetCount];
  38.           for (i = 0, obj = [index next];
  39.                [index getLoc] == Member;
  40.                obj = [index next], i++)
  41.             javaTargets[i] = SD_JAVA_FIND_OBJECT_JAVA (obj);
  42.         }
  43.       else
  44. #endif
  45.         {
  46.           size_t i;
  47.           id obj;
  48.           
  49.           objcTargets =
  50.             [scratchZone alloc: sizeof (id) * targetCount];
  51.           for (i = 0, obj = [index next];
  52.                [index getLoc] == Member;
  53.                obj = [index next], i++)
  54.             objcTargets[i] = obj;
  55. #ifdef SETUPCALL
  56.           SETUPCALL;
  57. #endif
  58.         }
  59.       
  60.     }
  61.   else
  62.     raiseEvent (InvalidArgument, "Collection not homogeneous");
  63.   return self;
  64. }
  66. PHASE(Setting)
  67. #ifdef SETUPCALL
  68. - (void)setMessageSelector: (SEL)aSel
  69. {
  70.   selector = aSel;
  72.   if (imp)
  73.     SETUPCALL;
  74. }
  75. #endif
  77. - setDefaultOrder: (id <Symbol>)aSymbol
  78. {
  79.   setDefaultOrder (&bits, aSymbol);
  80.   return self;
  81. }
  84. PHASE(Using)
  86. - (void)_performAction_: (id <Activity>)anActivity
  87. {
  88. #ifdef UPDATEJAVATARGET
  89.   if (javaTargets)
  90.     {
  91.       if (getDefaultOrder (bits) == Randomized)
  92.         {
  93.           size_t j = targetCount, k;
  95.           while (j > 1)
  96.             {
  97.               jobject kobj;
  99.               j--;
  100.               k = [uniformUnsRand getUnsignedWithMin: 0 withMax: j];
  101.               kobj = javaTargets[k];
  102.               javaTargets[k] = javaTargets[j];
  103.               javaTargets[j] = kobj;
  104.             }
  105.         }
  106.       {
  107.         size_t i;
  108.         
  109.         for (i = 0; i < targetCount; i++)
  110.           {
  111.             UPDATEJAVATARGET (javaTargets[i]);
  112.             PERFORMJAVACALL (javaTargets[i]);
  113.           }
  114.       }
  115.     }
  116.   else
  117. #endif
  118.   if (objcTargets)
  119.     {
  120.       if (getDefaultOrder (bits) == Randomized)
  121.         {
  122.           size_t j = targetCount, k;
  124.           while (j > 1)
  125.             {
  126.               id kobj;
  128.               j--;
  129.               k = [uniformUnsRand getUnsignedWithMin: 0 withMax: j];
  130.               kobj = objcTargets[k];
  131.               objcTargets[k] = objcTargets[j];
  132.               objcTargets[j] = kobj;
  133.             }
  134.         }
  135.       {
  136.         size_t i;
  137.         
  138.         for (i = 0; i < targetCount; i++)
  139.           {
  140.             UPDATEOBJCTARGET (objcTargets[i]);
  141.             PERFORMOBJCCALL (objcTargets[i]);
  142.           }
  143.       }
  144.     }
  145.   else
  146.     abort ();
  147. }
  149. - (id <Symbol>)getDefaultOrder
  150. {
  151.   return getDefaultOrder (bits);
  152. }
  154. - getTarget
  155. {
  156.   return target;
  157. }
  159. #ifdef SETUPCALL
  160. - (SEL)getMessageSelector
  161. {
  162.   return selector;
  163. }
  164. #endif
  166. - (void)describe: stream
  167. {
  168.   char buffer[100];
  170.   [stream catC: "[[foreach fixed: "];
  171.   _obj_formatIDString (buffer, target);
  172.   [stream catC: buffer];
  173.   [stream catC: "]"];
  174. }
  176. - (void)drop
  177. {
  178. #ifdef UPDATEJAVATARGET
  179.   if (javaTargets)
  180.     [scratchZone free: (void *) javaTargets];
  181.   else
  182. #endif
  183.    if (objcTargets)
  184.     [scratchZone free: (void *) objcTargets];
  185.   [super drop];
  186. }