|
@@ -21,7 +21,9 @@
|
|
* See the License for the specific language governing permissions and
|
|
* See the License for the specific language governing permissions and
|
|
* limitations under the License.
|
|
* limitations under the License.
|
|
}
|
|
}
|
|
|
|
+{$IFNDEF FPC_DOTTEDUNITS}
|
|
unit httpd;
|
|
unit httpd;
|
|
|
|
+{$ENDIF FPC_DOTTEDUNITS}
|
|
|
|
|
|
{$ifdef fpc}
|
|
{$ifdef fpc}
|
|
{$mode delphi}{$H+}
|
|
{$mode delphi}{$H+}
|
|
@@ -47,6 +49,15 @@ unit httpd;
|
|
|
|
|
|
interface
|
|
interface
|
|
|
|
|
|
|
|
+{$IFDEF FPC_DOTTEDUNITS}
|
|
|
|
+uses
|
|
|
|
+{$ifdef Windows}
|
|
|
|
+ WinApi.Windows,
|
|
|
|
+{$ELSE}
|
|
|
|
+ UnixApi.Types,
|
|
|
|
+{$ENDIF}
|
|
|
|
+ System.CTypes;
|
|
|
|
+{$ELSE FPC_DOTTEDUNITS}
|
|
uses
|
|
uses
|
|
{$ifdef WINDOWS}
|
|
{$ifdef WINDOWS}
|
|
Windows,
|
|
Windows,
|
|
@@ -54,6 +65,7 @@ uses
|
|
UnixType,
|
|
UnixType,
|
|
{$ENDIF}
|
|
{$ENDIF}
|
|
ctypes;
|
|
ctypes;
|
|
|
|
+{$ENDIF FPC_DOTTEDUNITS}
|
|
|
|
|
|
const
|
|
const
|
|
{$ifndef fpc}
|
|
{$ifndef fpc}
|