mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-06 04:47:57 +02:00
bffd571f9d
Used to support TlsCallbacks.
Tls callback code added inside
ifdef FPC_USE_TLS_DIRECTORY.
NOTE: This code needs compiler changes also to work.
* win/systhread.inc:
Exec_Tls_callback: Callback for main executable.
Several new external variables:
FreePascal_TLS_callback, FreePascal_end_of_TLS_callback
need to be placed into .CRT$XL* section,
using name '.section .CRT$XLFPC __FPC_tls_callbacks'
extension to be provided by compiler change.
tls_callbacks : pointer; external name '___crt_xl_start__';
tls_data_start : pointer; external name '___tls_start__';
tls_data_end : pointer; external name '___tls_end__';
provided by linker script.
tls_index : DWord that will contain the automatic
TlsIndex generated by executable launch code (not used by
FPC code, but might be used by code from loaded objects).
_tls_used: TTlsdirectory record.
* win32/system.pp and win64/system.pp:
Code to force loading of _tls_used record.
git-svn-id: trunk@17893 -
|
||
|---|---|---|
| .. | ||
| wininc | ||
| crt.pp | ||
| dos.pp | ||
| dynlibs.inc | ||
| fpcmemdll.pp | ||
| fpwinsockh.inc | ||
| keyboard.pp | ||
| messages.pp | ||
| mouse.pp | ||
| printer.pp | ||
| sharemem.pp | ||
| sockets.pp | ||
| sysdir.inc | ||
| sysfile.inc | ||
| sysheap.inc | ||
| sysos.inc | ||
| sysosh.inc | ||
| systhrd.inc | ||
| sysutils.pp | ||
| syswin.inc | ||
| tthread.inc | ||
| varutils.pp | ||
| video.pp | ||
| windirs.pp | ||
| winevent.pp | ||
| winres.inc | ||
| winsock2.pp | ||
| winsock.pp | ||