win32 patches

This commit is contained in:
Vítor Santos Costa
2014-10-28 12:56:26 +00:00
parent 6b93b8ee5a
commit 546af97345
9 changed files with 172 additions and 69 deletions

View File

@@ -276,7 +276,7 @@ Yap_InitSysPath(void) {
/* couldn't find it where it was supposed to be,
let's try using the executable */
if (!GetModuleFileName( GetCurrentProcess(), LOCAL_FileNameBuf, YAP_FILENAME_MAX)) {
if (!GetModuleFileName( NULL, LOCAL_FileNameBuf, YAP_FILENAME_MAX)) {
Yap_Error(OPERATING_SYSTEM_ERROR, TermNil, "could not find executable name");
/* do nothing */
return;
@@ -1438,7 +1438,7 @@ Yap_MathException__( USES_REGS1 )
return EVALUATION_ERROR_UNDEFINED;
}
}
#elif _WIN32
#elif _WIN32 && FALSE
unsigned int raised;
int err;