diff --git a/ffi-tools/ffi-tools.h b/ffi-tools/ffi-tools.h index c4e5bfb..6120129 100644 --- a/ffi-tools/ffi-tools.h +++ b/ffi-tools/ffi-tools.h @@ -37,7 +37,7 @@ void ffit_init_hook(void); #define FFIT_CHECK_RECORD_TYPE(SCM_VAL, SCM_RECTYPE) \ if (!(S48_RECORD_P(SCM_VAL) && \ (S48_RECORD_TYPE(SCM_VAL) == SCM_RECTYPE))) \ - s48_raise_argument_type_error(SCM_VAL) + s48_raise_argument_type_error(SCM_VAL); #define FFIT_STRUCT_GET(FUNNAME, SCM_RECTYPE, C_RECTYPE, C_FIELD, FIELD_SCM_ENTER_FUN) \ s48_value FUNNAME(s48_value scm_rec) { \