moved os-windows-nt functions into the vm

db4
Phil Dawes 2009-08-18 20:22:11 +01:00
parent 01ecb11635
commit d48dffcfa0
3 changed files with 2 additions and 24 deletions

View File

@ -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()
{
}
}

View File

@ -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

View File

@ -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
};