fix a stupid threads bug

2008-09-04 16:58:45 +01:00 · 2008-09-04 16:58:45 +01:00 · 65ccd336b2
commit 65ccd336b2
parent 6046f9f913
2 changed files with 2 additions and 2 deletions
--- a/library/lineutils.yap
+++ b/library/lineutils.yap
@ -8,7 +8,7 @@
 	   copy_line/2,
 	   filter/3,
 	   file_filter/3,
-	   process/2,
+	   process/2
 	  ]).

 :- meta_predicate filter(+,+,:), file_filter(+,+,:), process(+,:).
--- a/pl/threads.yap
+++ b/pl/threads.yap
@ -26,7 +26,7 @@
 :- initialization('$init_thread0').

 '$init_thread0' :-
-	no_threads, !,
+	'$no_threads', !,
 	recorda('$thread_alias', [0|main], _).
 '$init_thread0' :-
 	recorda('$thread_defaults', [0, 0, 0, false, true], _),