Mercurial > repos > rhope
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 |