* terminate with an error when initializing a critical section and recursive

    mutexes are not available, since one of the expected properties of
    (Delphi/Windows-compatible) critical sections is that they ar
    re-entrant (mantis #23334)

git-svn-id: trunk@23011 -

rtl/unix/cthreads.pp

@@ -463,7 +463,7 @@ Type  PINTRTLEvent = ^TINTRTLEvent;
             res := pthread_mutex_init(@CS,@MAttr)
           else
             { No recursive mutex support :/ }
-            res := pthread_mutex_init(@CS,NIL);
+            fpc_threaderror
         end
       else
         res:= pthread_mutex_init(@CS,NIL);