Inicio Explorar Axuda
Iniciar sesión
pascal
/
fpc
réplica de https://gitlab.com/freepascal.org/fpc/source.git
2
0
Fork 0
Ficheiros Incidencias 0 Wiki
Explorar o código

* Fixed compilation on Linux after r15557

git-svn-id: trunk@15560 -
joost %!s(int64=15) %!d(string=hai) anos
pai
56d3739a03
achega
3e165e2dcf
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
Unificar vista Mostrar estatísticas de Diff
  1. 1 1
      rtl/linux/pthread.inc

+ 1 - 1
rtl/linux/pthread.inc
Ver ficheiro 

@@ -107,7 +107,7 @@ Type
 
 *)
 
 *)
 
 
 
      __start_routine_t = function (_para1:pointer):pointer;cdecl;
 
      __start_routine_t = function (_para1:pointer):pointer;cdecl;
 
-     __destr_function_t = procedure (_para1:pointer);
 
+     __destr_function_t = procedure (_para1:pointer);cdecl;
 
 {     t_pthread_cleanup_push_routine = procedure (_para1:pointer);
 
 {     t_pthread_cleanup_push_routine = procedure (_para1:pointer);
 
      t_pthread_cleanup_push_defer_routine = procedure (_para1:pointer);}
 
      t_pthread_cleanup_push_defer_routine = procedure (_para1:pointer);}