paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-03 23:09:31 +01:00
Code Issues Packages Projects Releases Wiki Activity

* tls_index must be renamed everywhere, forgotten part of r17943.

Browse Source 
git-svn-id: trunk@17948 -
This commit is contained in:
sergei 2011-07-06 20:33:45 +00:00
parent 718fc1ccd1
commit cd94bb5edf
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/win32/system.pp
View File

@ -999,7 +999,7 @@ begin
when smartlinking is on } when smartlinking is on }
_tls_used.Index_pointer:=@FreePascal_TLS_callback; _tls_used.Index_pointer:=@FreePascal_TLS_callback;
_tls_used.Index_pointer:=@FreePascal_end_of_TLS_callback; _tls_used.Index_pointer:=@FreePascal_end_of_TLS_callback;
_tls_used.Index_pointer:=@tls_index; _tls_used.Index_pointer:=@_tls_index;
{$endif FPC_USE_TLS_DIRECTORY} {$endif FPC_USE_TLS_DIRECTORY}
end. end.

2
rtl/win64/system.pp
View File

@ -990,6 +990,6 @@ begin
when smartlinking is on } when smartlinking is on }
_tls_used.Index_pointer:=@FreePascal_TLS_callback; _tls_used.Index_pointer:=@FreePascal_TLS_callback;
_tls_used.Index_pointer:=@FreePascal_end_of_TLS_callback; _tls_used.Index_pointer:=@FreePascal_end_of_TLS_callback;
_tls_used.Index_pointer:=@tls_index; _tls_used.Index_pointer:=@_tls_index;
{$endif FPC_USE_TLS_DIRECTORY} {$endif FPC_USE_TLS_DIRECTORY}
end. end.