From 9005442652a5e6cc70dd710d6e80d053da9b6dca Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Wed, 8 Feb 2006 23:23:33 +0000
Subject: [PATCH] * fixed some data types

git-svn-id: trunk@2489 -
---
 rtl/solaris/ptypes.inc  | 6 +-----
 rtl/solaris/unxfunc.inc | 4 ++++
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/rtl/solaris/ptypes.inc b/rtl/solaris/ptypes.inc
index 20e802f094..2f3aee5220 100644
--- a/rtl/solaris/ptypes.inc
+++ b/rtl/solaris/ptypes.inc
@@ -33,11 +33,7 @@ introduction)
 
 Type
 
-{$ifndef VER_1_0}               // maybe wrong (kernel vs libc)
-    dev_t    = cuint64;         { used for device numbers      }
-{$else}
-    dev_t    = int64;
-{$endif}
+    dev_t    = cuint;          { used for device numbers      }
     TDev     = dev_t;
     pDev     = ^dev_t;
 
diff --git a/rtl/solaris/unxfunc.inc b/rtl/solaris/unxfunc.inc
index 5657a6036a..1fc9cff21e 100644
--- a/rtl/solaris/unxfunc.inc
+++ b/rtl/solaris/unxfunc.inc
@@ -68,3 +68,7 @@ begin
  AssignPipe:=ret;
 end;
 
+
+Function fpFlock (fd,mode : longint) : cint;
+  begin
+  end;
\ No newline at end of file