summaryrefslogtreecommitdiff
path: root/packages/rtl-extra/src/amiga/sockets.pp
diff options
context:
space:
mode:
Diffstat (limited to 'packages/rtl-extra/src/amiga/sockets.pp')
-rw-r--r--packages/rtl-extra/src/amiga/sockets.pp4
1 files changed, 1 insertions, 3 deletions
diff --git a/packages/rtl-extra/src/amiga/sockets.pp b/packages/rtl-extra/src/amiga/sockets.pp
index 43d6a9facc..bebfe0f160 100644
--- a/packages/rtl-extra/src/amiga/sockets.pp
+++ b/packages/rtl-extra/src/amiga/sockets.pp
@@ -143,7 +143,7 @@ function ReleaseCopyOfSocket(s: LongInt location 'd0'; id: LongInt location 'd1'
{$else AMIGAOS4}
-var
+threadvar
SocketBase: PLibrary;
ISocket: PInterface;
@@ -339,10 +339,8 @@ begin
end;
initialization
- {$ifdef AMIGA68K}
AddThreadInitProc(@BSDSocketOpen);
AddThreadExitProc(@BSDSocketClose);
- {$endif}
BSDSocketOpen;
finalization