Ver código fonte

* Call EndThread manually if thread function returns (mantis #11490)

git-svn-id: trunk@11671 -
michael 17 anos atrás
pai
commit
c179162028
1 arquivos alterados com 1 adições e 2 exclusões
  1. 1 2
      rtl/unix/cthreads.pp

+ 1 - 2
rtl/unix/cthreads.pp

@@ -242,8 +242,7 @@ Type  PINTRTLEvent = ^TINTRTLEvent;
         writeln('Jumping to thread function');
 {$endif DEBUG_MT}
         ThreadMain:=pointer(ti.f(ti.p));
-        DoneThread;
-        pthread_exit(ThreadMain);
+        EndThread(0);
       end;