comparison runtime/builtin.c @ 74:a844c623c7df

Add support for Worker type
author Mike Pavone <pavone@retrodev.com>
date Thu, 01 Jul 2010 21:32:08 -0400
parents f7bcf3db1342
children e09c2d1d6d5b
comparison
equal deleted inserted replaced
73:6a1a7d5cc2d9 74:a844c623c7df
115 t_Boolean * b = (t_Boolean *)new_object(TYPE_BOOLEAN); 115 t_Boolean * b = (t_Boolean *)new_object(TYPE_BOOLEAN);
116 b->Val = val != 0; 116 b->Val = val != 0;
117 return (object*)b; 117 return (object*)b;
118 } 118 }
119 119
120 object * make_Worker(int32_t index, int16_t initialsize, int16_t initialcount)
121 {
122 t_Worker * worker = (t_Worker *)_internal_worker_alloc(initialsize);
123 worker->payload.Index = index;
124 worker->payload.Count = initialcount;
125 return (object *)worker;
126 }
127