fix no threads case.

This commit is contained in:
Vitor Santos Costa 2012-08-22 15:29:28 -05:00
parent 475face871
commit 55267cac34

View File

@ -53,6 +53,8 @@ volatile(P) :-
'$new_mutex'(Id),
assert_static(prolog:'$with_mutex_mutex'(Id)).
'$reinit_thread0' :-
'$no_threads', !.
'$reinit_thread0' :-
'$create_thread_mq'(0),
% abolish(prolog:'$with_mutex_mutex',1),