From 3ba78988a2a64e1a8e9770cad11e27abaa424890 Mon Sep 17 00:00:00 2001 From: Nelson Ferreira Date: Wed, 10 Jun 2015 10:29:49 -0400 Subject: [PATCH] Signal error when callbacks are not supported in ffi --- src/effi.c | 7 +++++++ 1 file changed, 7 insertions(+) diff --git a/src/effi.c b/src/effi.c index 930d380..6baf2e6 100644 --- a/src/effi.c +++ b/src/effi.c @@ -1817,6 +1817,13 @@ Create dynamic callback and return pointer to it. ptr = Fmake_ffi_object(Qpointer, Qnil); #ifdef __i386__ XEFFIO(ptr)->fop.ptr = ffi_make_callback_x86(data, XINT(cctype)); +#else +#ifdef SXEMACS + error("FFI Callbacks not supported on this configuration"); +#else + signal_ferror(Qinternal_error, + "FFI Callbacks not supported on this configuration"); +#endif /* SXEMACS */ #endif /* __i386__ */ return ptr; } -- 2.34.1