Changeset 4314 for trunk/compiler/logtalk.pl

Timestamp:

06/15/08 04:41:56 (6 months ago)

Author:

pmoura

Message:

Changed the thread cancellation process to not automatically releasing any locks, leaving that task to a catcher associated to the thread goal.

Files:

• trunk/compiler/logtalk.pl (modified) (2 diffs)

trunk/compiler/logtalk.pl

@@ -13374 +13374 @@
     (   catch(thread_peek_message(Id, '$lgt_master'), _, fail) ->
         catch(thread_send_message(Id, '$lgt_status'(_, terminate)), _, true)
-    ;   catch(thread_signal(Id, '$lgt_mt_thread_abort'), _, true)
+    ;   catch(thread_signal(Id, throw('$lgt_terminated')), _, true)
     ),
     '$lgt_mt_threaded_call_abort'(Ids).
@@ -13393 +13393 @@
     catch(thread_join(Id, _), _, true),
     '$lgt_mt_threaded_call_join'(Ids, Results).
-
-
-'$lgt_mt_thread_abort' :-
-    mutex_unlock_all,
-    throw('$lgt_terminated').