Mercurial > repos > rhope
diff runtime/builtin.c @ 141:f2cb85c53ced
Fix Pause/Resume and rewrite Call Async in Rhope rather than C
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Sat, 20 Nov 2010 17:48:22 -0500 |
parents | c14698c512f1 |
children | ba35ab624ec2 |
line wrap: on
line diff
--- a/runtime/builtin.c Sat Nov 20 20:03:25 2010 +0000 +++ b/runtime/builtin.c Sat Nov 20 17:48:22 2010 -0500 @@ -2,6 +2,7 @@ #include "object.h" #include "integer.h" #include "bool.h" +#include "context.h" #include <stddef.h> #include <stdio.h> #include <stdlib.h> @@ -121,6 +122,13 @@ return (object*)b; } +object * make_Context(context * ct) +{ + t_Context * c = (t_Context *)new_object(TYPE_CONTEXT); + c->ct = ct; + return (object *)c; +} + object * make_Worker(int32_t index, int16_t initialsize, int16_t initialcount) { t_Worker * worker = (t_Worker *)_internal_worker_alloc(initialsize);