From 187f2d2284c62081e90d95da16d1150ee3f554e3 Mon Sep 17 00:00:00 2001 From: Mackenzie Straight Date: Sat, 18 Dec 2004 05:41:31 +0000 Subject: [PATCH] Add dllexports --- native/bignum.h | 6 +++--- native/boolean.h | 4 ++-- native/ffi.h | 3 ++- native/fixnum.h | 8 ++++---- native/string.h | 4 ++-- 5 files changed, 13 insertions(+), 12 deletions(-) diff --git a/native/bignum.h b/native/bignum.h index f54ce1c6c3..4bbc7f21e9 100644 --- a/native/bignum.h +++ b/native/bignum.h @@ -9,10 +9,10 @@ INLINE F_ARRAY* untag_bignum(CELL tagged) } F_FIXNUM to_integer(CELL x); -void box_integer(F_FIXNUM integer); -void box_cell(CELL cell); +DLLEXPORT void box_integer(F_FIXNUM integer); +DLLEXPORT void box_cell(CELL cell); DLLEXPORT F_FIXNUM unbox_integer(void); -CELL unbox_cell(void); +DLLEXPORT CELL unbox_cell(void); F_ARRAY* to_bignum(CELL tagged); void primitive_to_bignum(void); void primitive_bignum_eq(void); diff --git a/native/boolean.h b/native/boolean.h index f2be6292ad..24452e8155 100644 --- a/native/boolean.h +++ b/native/boolean.h @@ -8,5 +8,5 @@ INLINE bool untag_boolean(CELL tagged) return (tagged == F ? false : true); } -void box_boolean(bool value); -bool unbox_boolean(void); +DLLEXPORT void box_boolean(bool value); +DLLEXPORT bool unbox_boolean(void); diff --git a/native/ffi.h b/native/ffi.h index 32a95cf9cd..1a2d11f86f 100644 --- a/native/ffi.h +++ b/native/ffi.h @@ -24,7 +24,8 @@ void primitive_dlsym_self(void); void primitive_dlclose(void); void primitive_alien(void); void primitive_local_alien(void); -CELL unbox_alien(void); +DLLEXPORT CELL unbox_alien(void); +DLLEXPORT void box_alien(CELL ptr); void primitive_alien_cell(void); void primitive_set_alien_cell(void); void primitive_alien_4(void); diff --git a/native/fixnum.h b/native/fixnum.h index 903ed07f08..d91602f096 100644 --- a/native/fixnum.h +++ b/native/fixnum.h @@ -28,7 +28,7 @@ void primitive_fixnum_lesseq(void); void primitive_fixnum_greater(void); void primitive_fixnum_greatereq(void); void primitive_fixnum_not(void); -void box_signed_1(signed char integer); -void box_signed_2(signed short integer); -signed char unbox_signed_1(void); -signed short unbox_signed_2(void); +DLLEXPORT void box_signed_1(signed char integer); +DLLEXPORT void box_signed_2(signed short integer); +DLLEXPORT signed char unbox_signed_1(void); +DLLEXPORT signed short unbox_signed_2(void); diff --git a/native/string.h b/native/string.h index e9f28d50d5..90e6f2dd8d 100644 --- a/native/string.h +++ b/native/string.h @@ -19,9 +19,9 @@ void rehash_string(F_STRING* str); F_STRING* grow_string(F_STRING* string, F_FIXNUM capacity, uint16_t fill); BYTE* to_c_string(F_STRING* s); BYTE* to_c_string_unchecked(F_STRING* s); -void box_c_string(const BYTE* c_string); +DLLEXPORT void box_c_string(const BYTE* c_string); F_STRING* from_c_string(const BYTE* c_string); -BYTE* unbox_c_string(void); +DLLEXPORT BYTE* unbox_c_string(void); #define SREF(string,index) ((CELL)string + sizeof(F_STRING) + index * CHARS)