Mercurial > repos > rhope

comparison runtime/func.h @ 101:f4fc0a98088a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Fixed some bugs that were preventing compiled compiler from working correctly. Need to address memory usage
author Mike Pavone <pavone@retrodev.com>
date Mon, 09 Aug 2010 23:53:20 -0400
parents f51c4c17457c
children 43cc42df26cc
comparison
equal deleted inserted replaced
100:f51c4c17457c 101:f4fc0a98088a
124 goto _exception;\ 124 goto _exception;\
125 } 125 }
126 126
127 #define CopiedParam(num,convtypeid) Param(num,convtypeid) cdata->params[num] = copy_object(cdata->params[num]); 127 #define CopiedParam(num,convtypeid) Param(num,convtypeid) cdata->params[num] = copy_object(cdata->params[num]);
128 #define Ret(num,val) cdata->params[num] = (object *)(val); 128 #define Ret(num,val) cdata->params[num] = (object *)(val);
129 #define NumRet(num) cdata->num_params = num; 129 #define NumRet(num) cdata->num_params = num;\
130 if (num == 1 && !cdata->params[0])\
131 {\
132 puts("Worker with only one output failed to produce data for that output!");\
133 goto _exception;\
134 }
130 #define Exception 135 #define Exception
131 #define FuncDef(name) lt_ ## name * lv_ ## name; 136 #define FuncDef(name) lt_ ## name * lv_ ## name;
132 #define MethodDef(name) lt_ ## name ## AT_ ## type_name * lv_ ## name ## AT_ ## type_name; 137 #define MethodDef(name) lt_ ## name ## AT_ ## type_name * lv_ ## name ## AT_ ## type_name;
133 138
134 139