60 lines
		
	
	
		
			1.4 KiB
		
	
	
	
		
			C
		
	
	
		
			Executable File
		
	
			
		
		
	
	
			60 lines
		
	
	
		
			1.4 KiB
		
	
	
	
		
			C
		
	
	
		
			Executable File
		
	
| #include <dirent.h>
 | |
| #include <sys/mman.h>
 | |
| #include <sys/types.h>
 | |
| #include <sys/stat.h>
 | |
| #include <unistd.h>
 | |
| #include <sys/time.h>
 | |
| #include <dlfcn.h>
 | |
| #include <signal.h>
 | |
| #include <pthread.h>
 | |
| 
 | |
| typedef char F_CHAR;
 | |
| typedef char F_SYMBOL;
 | |
| 
 | |
| #define from_native_string from_char_string
 | |
| #define unbox_native_string unbox_char_string
 | |
| #define string_to_native_alien(string) string_to_char_alien(string,true)
 | |
| #define unbox_symbol_string unbox_char_string
 | |
| 
 | |
| #define STRING_LITERAL(string) string
 | |
| 
 | |
| #define SSCANF sscanf
 | |
| #define STRCMP strcmp
 | |
| #define STRNCMP strncmp
 | |
| #define STRDUP strdup
 | |
| 
 | |
| #define FSEEK fseeko
 | |
| 
 | |
| #define FIXNUM_FORMAT "%ld"
 | |
| #define CELL_FORMAT "%lu"
 | |
| #define CELL_HEX_FORMAT "%lx"
 | |
| 
 | |
| #ifdef FACTOR_64
 | |
| 	#define CELL_HEX_PAD_FORMAT "%016lx"
 | |
| #else
 | |
| 	#define CELL_HEX_PAD_FORMAT "%08lx"
 | |
| #endif
 | |
| 
 | |
| #define FIXNUM_FORMAT "%ld"
 | |
| 
 | |
| #define OPEN_READ(path) fopen(path,"rb")
 | |
| #define OPEN_WRITE(path) fopen(path,"wb")
 | |
| 
 | |
| #define print_native_string(string) print_string(string)
 | |
| 
 | |
| void start_thread(void *(*start_routine)(void *));
 | |
| 
 | |
| void init_ffi(void);
 | |
| void ffi_dlopen(F_DLL *dll);
 | |
| void *ffi_dlsym(F_DLL *dll, F_SYMBOL *symbol);
 | |
| void ffi_dlclose(F_DLL *dll);
 | |
| 
 | |
| void unix_init_signals(void);
 | |
| void signal_handler(int signal, siginfo_t* siginfo, void* uap);
 | |
| void dump_stack_signal(int signal, siginfo_t* siginfo, void* uap);
 | |
| 
 | |
| s64 current_micros(void);
 | |
| void sleep_micros(CELL usec);
 | |
| 
 | |
| void open_console(void);
 |