Concurrent Schedules

[donalson]

Marcus (or maybe Vladimir),

I believe that I have isoloated the code that is causing the crashes in
my program.  The following two code fragments 1.) creates the schedule
and 2.) Is the first use of the code, where it fails.

1.)
  concGroupType = [ConcurrentSchedule customizeBegin: [self getZone]];
  [concGroupType setAutoDrop: 1];
  concGroupType  = [concGroupType customizeEnd];

  eventSchedule = [Schedule createBegin: [self getZone]];
  [eventSchedule setAutoDrop: 1];
  [eventSchedule setConcurrentGroupType: concGroupType];
  eventSchedule = [eventSchedule createEnd];

2.)
     redScaleList=[anAphytisCell getJuvenileRedScaleList];
     index2=[redScaleList begin: [self getZone]];
     while( (aRedScale = [index2 next]) )
     {
        [aRedScale  setEventSchedule: eventSchedule];
//******** uncomment this line and error occurs***********/
       // subSchedId=[eventSchedule insertGroup: (id) 10];
        //if( !restart )
          // [subSchedId at: 0 createActionTo: aRedScale message:
M(firstEvent)];
        //else
          // [subSchedId at: 0 createActionTo: aRedScale message:
M(firstRestartEvent)];
     }

Here is the equivelent Grid Turtle example:
1.)
  subschedType = [ConcurrentSchedule customizeBegin: aZone];
   [subschedType setAutoDrop: 1];
   subschedType = [subschedType customizeEnd];

   worldSchedule = [Schedule createBegin: aZone];
   [worldSchedule setAutoDrop: 1];
   [worldSchedule setConcurrentGroupType: subschedType];
   worldSchedule = [worldSchedule createEnd];

2.)
   subgroup = [worldSchedule insertGroup: (id)0];
   [subgroup at: 0 createActionTo: aMousetrap message: M(trigger)];

The only difference between these two code fragments that I can see is
that I insert at 10 instead of 0 which shouldn't make a difference.  Was
this Grid Turtle code tried for 1.4?

Is there a chance that this is broken in 1.4?

Cheers,

   D3
--
*********************************************************************
* Doug Donalson                 Office: (805) 893-2962
* Ecology, Evolution,           Home:   (805) 961-4447
* and Marine Biology            email address@hidden
* UC Santa Barbara
* Santa Barbara Ca. 93106
*********************************************************************
*
*   The most exciting phrase to hear in science, the one that
*   heralds new discoveries, is not "EUREKA" (I have found it) but
*   "That's funny ...?"
*
*       Isaac Asimov
*
*********************************************************************



                  ==================================
   Swarm-Support is for discussion of the technical details of the day
   to day usage of Swarm.  For list administration needs (esp.
   [un]subscribing), please send a message to <address@hidden>
   with "help" in the body of the message.