moved os-windows-nt functions into the vm
parent
01ecb11635
commit
d48dffcfa0
|
@ -11,11 +11,6 @@ s64 factorvm::current_micros()
|
|||
- EPOCH_OFFSET) / 10;
|
||||
}
|
||||
|
||||
s64 current_micros()
|
||||
{
|
||||
return vm->current_micros();
|
||||
}
|
||||
|
||||
FACTOR_STDCALL LONG exception_handler(PEXCEPTION_POINTERS pe)
|
||||
{
|
||||
PEXCEPTION_RECORD e = (PEXCEPTION_RECORD)pe->ExceptionRecord;
|
||||
|
@ -71,17 +66,8 @@ void factorvm::c_to_factor_toplevel(cell quot)
|
|||
RemoveVectoredExceptionHandler((void *)exception_handler);
|
||||
}
|
||||
|
||||
void c_to_factor_toplevel(cell quot)
|
||||
{
|
||||
return vm->c_to_factor_toplevel(quot);
|
||||
}
|
||||
|
||||
void factorvm::open_console()
|
||||
{
|
||||
}
|
||||
|
||||
void open_console()
|
||||
{
|
||||
}
|
||||
|
||||
}
|
||||
|
|
|
@ -19,9 +19,7 @@ typedef char symbol_char;
|
|||
|
||||
#define FACTOR_STDCALL __attribute__((stdcall))
|
||||
|
||||
void c_to_factor_toplevel(cell quot);
|
||||
FACTOR_STDCALL LONG exception_handler(PEXCEPTION_POINTERS pe);
|
||||
void open_console();
|
||||
|
||||
// SSE traps raise these exception codes, which are defined in internal NT headers
|
||||
// but not winbase.h
|
||||
|
|
|
@ -664,18 +664,12 @@ struct factorvm {
|
|||
void windows_image_path(vm_char *full_path, vm_char *temp_path, unsigned int length);
|
||||
bool windows_stat(vm_char *path);
|
||||
|
||||
#if defined(WINCE)
|
||||
#else /* WINNT */
|
||||
#if defined(WINNT)
|
||||
s64 current_micros();
|
||||
void c_to_factor_toplevel(cell quot);
|
||||
void open_console();
|
||||
// next method here:
|
||||
#endif
|
||||
|
||||
|
||||
#ifdef FACTOR_X86
|
||||
#endif
|
||||
|
||||
#endif
|
||||
|
||||
};
|
||||
|
|
Loading…
Reference in New Issue