diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

support win32

Browse Source
This commit is contained in:
Vitor Santos Costa 2013-11-11 00:28:38 +00:00
parent bfee0cbea6
commit 153794e14b
2 changed files with 14 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
library/dialect/swi/fli/swi.c
View File

@ -2508,7 +2508,8 @@ PL_thread_raise(int tid, int sig)
if ( !REMOTE_ThreadHandle(tid).in_use ) if ( !REMOTE_ThreadHandle(tid).in_use )
goto error; goto error;
if ( !raiseSignal(tid, sig) ||
if ( !raiseSignal(REMOTE_PL_local_data_p(tid), sig) ||
!alertThread(tid) ) !alertThread(tid) )
goto error; goto error;
@ -2516,6 +2517,16 @@ PL_thread_raise(int tid, int sig)
return TRUE; return TRUE;
} }
#else
int
PL_thread_raise(int tid, int sig)
{
if ( !raiseSignal(NULL, sig) )
return FALSE;
return TRUE;
}
#endif #endif

2
library/system.yap Normal file → Executable file
View File

@ -48,8 +48,10 @@
:- use_module(library(lists), [append/3]). :- use_module(library(lists), [append/3]).
:- if(current_prolog_flag(windows, false)).
:- reexport(library(unix), [wait/2, :- reexport(library(unix), [wait/2,
kill/2]). kill/2]).
:- endif.
:- load_foreign_files([sys], [], init_sys). :- load_foreign_files([sys], [], init_sys).