changed the prototype of hcl_pfimpl_t to accept a hcl_mod_t* pointer

2018-02-28 04:52:01 +00:00
parent eaf7f9243d
commit c865de4d61
10 changed files with 47 additions and 37 deletions
--- a/lib/exec.c
+++ b/lib/exec.c
@ -972,7 +972,7 @@ static HCL_INLINE int call_primitive (hcl_t* hcl, hcl_ooi_t nargs)
 		return -1;
 	}

-	return ((hcl_pfimpl_t)rcv->slot[0]) (hcl, nargs);
+	return ((hcl_pfimpl_t)rcv->slot[0]) (hcl, (hcl_mod_t*)rcv->slot[4], nargs);
 }

 /* ------------------------------------------------------------------------- */