@@ -0,0 +1,3 @@
+unit Api.Enet;
+{$DEFINE FPC_DOTTEDUNITS}
+{$i enet.pp}
+unit Api.Uenetclass;
+{$i uenetclass.pp}
@@ -0,0 +1,4 @@
+src/uenetclass.pp=namespaced/Api.Uenetclass.pp
+{s*:src/}=namespaced/
+{i+:src/}
+src/enet.pp=namespaced/Api.Enet.pp
@@ -4,7 +4,9 @@
{$LONGSTRINGS ON}
{$MACRO ON}
+{$IFNDEF FPC_DOTTEDUNITS}
unit ENet;
+{$ENDIF FPC_DOTTEDUNITS}
{
ENet - Reliable UDP networking library
@@ -35,6 +37,15 @@ unit ENet;
interface
+{$IFDEF FPC_DOTTEDUNITS}
+uses
+ System.CTypes,
+{$IFDEF Windows}
+ WinApi.Winsock2;
+{$ELSE}
+ UnixApi.Base, System.Net.Sockets;
+{$ENDIF}
+{$ELSE FPC_DOTTEDUNITS}
uses
ctypes,
{$IFDEF WINDOWS}
@@ -42,6 +53,7 @@ uses
{$ELSE}
BaseUnix, Sockets;
{$ENDIF}
////////////////////////////////////////////////////////////////////////////////
// types.h
@@ -1,7 +1,9 @@
{$MODE OBJFPC}
unit UENetClass;
ENet UDP Class for Free Pascal
@@ -33,8 +35,13 @@ unit UENetClass;
+ System.SysUtils, System.Classes, Api.Enet;
SysUtils, Classes, ENet;
type
TENetEventType = ( ENetEventNone, ENetEventConnect, ENetEventDisconnect,