hyung-hwan/moo
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

touched up mod/ffi.c

Browse Source
This commit is contained in:
hyunghwan.chung 2019-04-08 04:48:57 +00:00
parent c153b2d1ac
commit 8451098d34
1 changed files with 12 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
moo/mod/ffi.c
View File

@ -280,10 +280,12 @@ static moo_pfrc_t pf_call (moo_t* moo, moo_mod_t* mod, moo_ooi_t nargs)
moo_ooi_t v; moo_ooi_t v;
if (moo_inttoooi(moo, arg, &v) == 0) goto inval; if (moo_inttoooi(moo, arg, &v) == 0) goto inval;
# else # else
/* TODO: moo_intmax_t v; /* TODO: IMPLEMENT THIS moo_intmax_t v;
if (moo_inttointmax(moo, arg, &v) == 0) goto inval; */ if (moo_inttointmax(moo, arg, &v) == 0) goto inval; */
# error UNSUPPORTED MOO_SIZEOF_LONG_LONG. long long v;
goto arg_as_long;
# endif # endif
dcArgLongLong (ffi->dc, v); dcArgLongLong (ffi->dc, v);
j++; j++;
break; break;
@ -384,7 +386,7 @@ static moo_pfrc_t pf_call (moo_t* moo, moo_mod_t* mod, moo_ooi_t nargs)
# if (MOO_SIZEOF_LONG_LONG <= MOO_SIZEOF_OOI_T) # if (MOO_SIZEOF_LONG_LONG <= MOO_SIZEOF_OOI_T)
r = moo_ooitoint(moo, dcCallLongLong(ffi->dc, f)); r = moo_ooitoint(moo, dcCallLongLong(ffi->dc, f));
# else # else
# error UNSUPPORTED MOO_SIZEOF_LONG_LONG goto ret_as_long;
# endif # endif
if (!r) goto hardfail; if (!r) goto hardfail;
MOO_STACK_SETRET (moo, nargs, r); MOO_STACK_SETRET (moo, nargs, r);