2007-09-20 18:09:08 -04:00
|
|
|
#define DLLEXPORT __attribute__((visibility("default")))
|
|
|
|
#define FACTOR_OS_STRING "macosx"
|
|
|
|
#define NULL_DLL "libfactor.dylib"
|
|
|
|
#define UNKNOWN_TYPE_P(file) ((file)->d_type == DT_UNKNOWN)
|
|
|
|
#define DIRECTORY_P(file) ((file)->d_type == DT_DIR)
|
|
|
|
|
|
|
|
void init_signals(void);
|
|
|
|
void early_init(void);
|
|
|
|
|
|
|
|
const char *vm_executable_path(void);
|
|
|
|
const char *default_image_path(void);
|
|
|
|
|
2007-11-12 23:18:29 -05:00
|
|
|
DLLEXPORT void c_to_factor_toplevel(CELL quot);
|
|
|
|
|
|
|
|
#ifndef environ
|
|
|
|
extern char ***_NSGetEnviron(void);
|
|
|
|
#define environ (*_NSGetEnviron())
|
2008-04-09 17:58:55 -04:00
|
|
|
#endif
|
|
|
|
|
|
|
|
INLINE void *ucontext_stack_pointer(void *uap)
|
|
|
|
{
|
|
|
|
ucontext_t *ucontext = (ucontext_t *)uap;
|
|
|
|
return ucontext->uc_stack.ss_sp;
|
|
|
|
}
|