factor/vm/mvm-windows.cpp

26 lines
410 B
C++

#include "master.hpp"
namespace factor
{
DWORD current_vm_tls_key;
void init_mvm()
{
if((current_vm_tls_key = TlsAlloc()) == TLS_OUT_OF_INDEXES)
fatal_error("TlsAlloc() failed",0);
}
void register_vm_with_thread(factor_vm *vm)
{
if(!TlsSetValue(current_vm_tls_key, vm))
fatal_error("TlsSetValue() failed",0);
}
factor_vm *current_vm_p()
{
return (factor_vm *)TlsGetValue(current_vm_tls_key);
}
}