2006-10-31 00:52:02 -05:00
|
|
|
CELL allot_alien(CELL delegate, CELL displacement);
|
2004-12-25 05:49:30 -05:00
|
|
|
|
2005-06-28 23:50:23 -04:00
|
|
|
void primitive_expired(void);
|
2005-04-09 18:30:46 -04:00
|
|
|
void primitive_displaced_alien(void);
|
|
|
|
|
void primitive_alien_address(void);
|
|
|
|
|
|
2019-10-18 09:05:06 -04:00
|
|
|
DLLEXPORT void *alien_offset(CELL object);
|
2005-09-03 14:48:25 -04:00
|
|
|
|
2006-10-31 23:20:34 -05:00
|
|
|
void fixup_alien(F_ALIEN* d);
|
2005-04-09 18:30:46 -04:00
|
|
|
|
2006-02-19 20:53:18 -05:00
|
|
|
DLLEXPORT void *unbox_alien(void);
|
2006-11-02 18:29:11 -05:00
|
|
|
DLLEXPORT void box_alien(void *ptr);
|
2005-04-09 18:30:46 -04:00
|
|
|
|
2005-03-28 23:45:13 -05:00
|
|
|
void primitive_alien_signed_cell(void);
|
|
|
|
|
void primitive_set_alien_signed_cell(void);
|
|
|
|
|
void primitive_alien_unsigned_cell(void);
|
|
|
|
|
void primitive_set_alien_unsigned_cell(void);
|
|
|
|
|
void primitive_alien_signed_8(void);
|
|
|
|
|
void primitive_set_alien_signed_8(void);
|
|
|
|
|
void primitive_alien_unsigned_8(void);
|
|
|
|
|
void primitive_set_alien_unsigned_8(void);
|
|
|
|
|
void primitive_alien_signed_4(void);
|
|
|
|
|
void primitive_set_alien_signed_4(void);
|
|
|
|
|
void primitive_alien_unsigned_4(void);
|
|
|
|
|
void primitive_set_alien_unsigned_4(void);
|
|
|
|
|
void primitive_alien_signed_2(void);
|
|
|
|
|
void primitive_set_alien_signed_2(void);
|
|
|
|
|
void primitive_alien_unsigned_2(void);
|
|
|
|
|
void primitive_set_alien_unsigned_2(void);
|
|
|
|
|
void primitive_alien_signed_1(void);
|
|
|
|
|
void primitive_set_alien_signed_1(void);
|
|
|
|
|
void primitive_alien_unsigned_1(void);
|
|
|
|
|
void primitive_set_alien_unsigned_1(void);
|
2005-05-05 03:12:37 -04:00
|
|
|
void primitive_alien_float(void);
|
|
|
|
|
void primitive_set_alien_float(void);
|
|
|
|
|
void primitive_alien_double(void);
|
|
|
|
|
void primitive_set_alien_double(void);
|
2019-10-18 09:05:11 -04:00
|
|
|
void primitive_alien_cell(void);
|
|
|
|
|
void primitive_set_alien_cell(void);
|
2006-02-06 01:43:59 -05:00
|
|
|
|
2019-10-18 09:05:06 -04:00
|
|
|
DLLEXPORT void to_value_struct(CELL src, void *dest, CELL size);
|
2006-03-10 22:16:46 -05:00
|
|
|
DLLEXPORT void box_value_struct(void *src, CELL size);
|
2019-10-18 09:05:11 -04:00
|
|
|
DLLEXPORT void box_small_struct(CELL x, CELL y, CELL size);
|
2006-07-07 00:07:18 -04:00
|
|
|
|
2006-10-31 23:20:34 -05:00
|
|
|
INLINE F_DLL *untag_dll(CELL tagged)
|
2006-07-07 00:07:18 -04:00
|
|
|
{
|
|
|
|
|
type_check(DLL_TYPE,tagged);
|
2006-10-31 23:20:34 -05:00
|
|
|
return (F_DLL*)UNTAG(tagged);
|
2006-07-07 00:07:18 -04:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
void primitive_dlopen(void);
|
|
|
|
|
void primitive_dlsym(void);
|
|
|
|
|
void primitive_dlclose(void);
|