Correct zmq assertion failure for 64-bit TZMQPoller.Poll

#17
bvarga · Dec 10, 2018 · 49e05cf · 49e05cf
1 parent 8c4126a
commit 49e05cf
Showing 1 changed file with 5 additions and 1 deletion.
diff --git a/zmq.pas b/zmq.pas
@@ -382,7 +382,11 @@ function zmq_socket_monitor( s: Pointer; addr: PAnsiChar; events: Integer ): Int
 type
   pollitem_t = record
     socket: Pointer;
-    fd: Integer; // TSocket???
+    {$if Defined(UNIX) or Defined(WIN64)}
+    fd: QWord; // TSocket???
+    {$else}
+    fd: Cardinal;
+    {$endif}
     events: Word;
     revents: Word;
   end;