diff --git a/src/core/capi.c b/src/core/capi.c index 4532b435..0c7d342a 100644 --- a/src/core/capi.c +++ b/src/core/capi.c @@ -96,6 +96,7 @@ DEFINE_GETTER(fiber, FIBER, JanetFiber *) DEFINE_GETTER(function, FUNCTION, JanetFunction *) DEFINE_GETTER(cfunction, CFUNCTION, JanetCFunction) DEFINE_GETTER(boolean, BOOLEAN, int) +DEFINE_GETTER(pointer, POINTER, void *) int32_t janet_getinteger(const Janet *argv, int32_t n) { Janet x = argv[n]; diff --git a/src/include/janet.h b/src/include/janet.h index f4dd0da6..ec497372 100644 --- a/src/include/janet.h +++ b/src/include/janet.h @@ -1247,6 +1247,7 @@ JANET_API JanetFiber *janet_getfiber(const Janet *argv, int32_t n); JANET_API JanetFunction *janet_getfunction(const Janet *argv, int32_t n); JANET_API JanetCFunction janet_getcfunction(const Janet *argv, int32_t n); JANET_API int janet_getboolean(const Janet *argv, int32_t n); +JANET_API void *janet_getpointer(const Janet *argv, int32_t n); JANET_API int32_t janet_getinteger(const Janet *argv, int32_t n); JANET_API int64_t janet_getinteger64(const Janet *argv, int32_t n);