From 52eeec05d021df5334934f50dfafff981cbca33b Mon Sep 17 00:00:00 2001 From: eddie-0815 Date: Mon, 29 Oct 2007 21:40:14 +0000 Subject: Just adding first MacOSX version. This does not compile yet. git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@540 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/MacOSX/Wrapper/zlportio.pas | 31 +++++++++++++++++++++++++++++++ 1 file changed, 31 insertions(+) create mode 100755 Game/Code/MacOSX/Wrapper/zlportio.pas (limited to 'Game/Code/MacOSX/Wrapper/zlportio.pas') diff --git a/Game/Code/MacOSX/Wrapper/zlportio.pas b/Game/Code/MacOSX/Wrapper/zlportio.pas new file mode 100755 index 00000000..4e6173bc --- /dev/null +++ b/Game/Code/MacOSX/Wrapper/zlportio.pas @@ -0,0 +1,31 @@ +unit zlportio; + +{$INCLUDE ../Platform.inc} + +interface + +uses GlueWindows; + + procedure zlioportwrite( const Port,DataType,Data:dword ); + procedure portwriteb( const Port:Dword;const Data:byte ); + function GetTime : Real; + +implementation + +uses SysUtils; + +procedure zlioportwrite( const Port,DataType,Data:dword ); +begin +end; + +procedure portwriteb( const Port:Dword;const Data:byte ); +begin +end; + +function GetTime : Real; +begin + Result := Now; +end; + +end. + -- cgit v1.2.3