builtin.cc

   1 BIStatus* simpleBuiltinExec(Node &it, VM &vm, UnstableNode* args[]){
   2   return ((BIStatus*(*)(VM &vm, UnstableNode*  args[]))(it.c.fptr))(vm, args);
   3 }
   4 void gcIntoSimpleBuiltin(Node& it, GC& gc, Node& dest){
   5   mkBuiltin(gc.vm, dest, (BIStatus*(*)(VM&,UnstableNode*[]))it.c.fptr);
   6 }
   7 const VTable simpleBuiltinVT={
   8   //PP_VTABLE_DEF(«vtUnimplemented»)
   9   //PP_VTABLE_SET(«gcInto»,«&gcIntoSimpleBuiltin»)
  10   //PP_VTABLE_SET(«gc»,«&gcDef<&gcIntoSimpleBuiltin>»)
  11   //PP_VTABLE_SET(«biProc»,&simpleBuiltinExec)
  12   //PP_VTABLE_PRODUCE
  13 };