typo.

2014-10-19 02:02:46 +01:00 · 2014-10-19 02:02:46 +01:00 · 4a2d6b9137
commit 4a2d6b9137
parent 53a8a8f7c9
1 changed files with 1 additions and 1 deletions
--- a/pl/threads.yap
+++ b/pl/threads.yap
@ -1079,7 +1079,7 @@ with_mutex(M, G) :-
    ( recorded('$mutex_alias',[Id|M],_) ->
    '$with_mutex'(Id, G )
    ;
-    '$atom'(M ) ->
+    atom(M ) ->
    mutex_create(Id, [alias(M)]),
    '$with_mutex'(M, G )
    ;