* fixed building on win64

git-svn-id: trunk@3273 -

.gitattributes

@@ -1014,13 +1014,13 @@ fcl/unix/pipes.inc svneol=native#text/plain
 fcl/unix/process.inc svneol=native#text/plain
 fcl/unix/resolve.inc svneol=native#text/plain
 fcl/unix/simpleipc.inc svneol=native#text/plain
-fcl/win32/eventlog.inc svneol=native#text/plain
+fcl/win/eventlog.inc svneol=native#text/plain
+fcl/win/pipes.inc svneol=native#text/plain
 fcl/win32/fclel.mc -text
 fcl/win32/fclel.rc -text
 fcl/win32/fclel.res -text
 fcl/win32/fileinfo.pp svneol=native#text/plain
 fcl/win32/httpapp.pp svneol=native#text/plain
-fcl/win32/pipes.inc svneol=native#text/plain
 fcl/win32/process.inc svneol=native#text/plain
 fcl/win32/resolve.inc svneol=native#text/plain
 fcl/win32/simpleipc.inc svneol=native#text/plain

fcl/Makefile

@@ -1,5 +1,5 @@
 #
-# Don't edit, this file is generated by FPCMake Version 2.0.0 [2006/04/07]
+# Don't edit, this file is generated by FPCMake Version 2.0.0 [2006/04/18]
 #
 default: all
 MAKEFILETARGETS=i386-linux i386-go32v2 i386-win32 i386-os2 i386-freebsd i386-beos i386-netbsd i386-solaris i386-qnx i386-netware i386-openbsd i386-wdosx i386-darwin i386-emx i386-watcom i386-netwlibc i386-wince m68k-linux m68k-freebsd m68k-netbsd m68k-amiga m68k-atari m68k-openbsd m68k-palmos powerpc-linux powerpc-netbsd powerpc-macos powerpc-darwin powerpc-morphos sparc-linux sparc-netbsd sparc-solaris x86_64-linux x86_64-freebsd x86_64-win64 arm-linux arm-palmos arm-wince powerpc64-linux
@@ -942,7 +942,7 @@ ifeq ($(FULL_TARGET),i386-go32v2)
 override COMPILER_INCLUDEDIR+=$(OS_TARGET) inc
 endif
 ifeq ($(FULL_TARGET),i386-win32)
-override COMPILER_INCLUDEDIR+=$(OS_TARGET) inc
+override COMPILER_INCLUDEDIR+=$(OS_TARGET) inc  win
 endif
 ifeq ($(FULL_TARGET),i386-os2)
 override COMPILER_INCLUDEDIR+=$(OS_TARGET) inc
@@ -1038,7 +1038,7 @@ ifeq ($(FULL_TARGET),x86_64-freebsd)
 override COMPILER_INCLUDEDIR+=$(OS_TARGET) inc  unix
 endif
 ifeq ($(FULL_TARGET),x86_64-win64)
-override COMPILER_INCLUDEDIR+=$(OS_TARGET) inc
+override COMPILER_INCLUDEDIR+=$(OS_TARGET) inc  win
 endif
 ifeq ($(FULL_TARGET),arm-linux)
 override COMPILER_INCLUDEDIR+=$(OS_TARGET) inc  unix

fcl/Makefile.fpc

@@ -55,6 +55,8 @@ includedir_solaris=unix
 includedir_qnx=unix
 includedir_beos=unix
 includedir_emx=os2
+includedir_win32=win
+includedir_win64=win
 sourcedir=$(OS_TARGET) inc
 
 [install]

fcl/inc/pipes.pp

@@ -43,7 +43,7 @@ Type
       Function Read (Var Buffer; Count : Longint) : longint; Override;
     end;
 
-Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
+Function CreatePipeHandles (Var Inhandle,OutHandle : THandle) : Boolean;
 Procedure CreatePipeStreams (Var InPipe : TInputPipeStream;
                              Var OutPipe : TOutputPipeStream);
 
@@ -60,7 +60,7 @@ Implementation
 Procedure CreatePipeStreams (Var InPipe : TInputPipeStream;
                              Var OutPipe : TOutputPipeStream);
 
-Var InHandle,OutHandle : Longint;
+Var InHandle,OutHandle : THandle;
 
 begin
   if CreatePipeHandles (InHandle, OutHandle) then

fcl/win32/pipes.inc → fcl/win/pipes.inc

@@ -2,7 +2,7 @@
     This file is part of the Free Pascal run time library.
     Copyright (c) 1998 by Michael Van Canneyt
 
-    Win32 part of pipe stream.
+    Win part of pipe stream.
 
     See the file COPYING.FPC, included in this distribution,
     for details about the copyright.
@@ -28,7 +28,7 @@ Const piInheritablePipe : TSecurityAttributes = (
       PipeBufSize = 1024;
 
 
-Function CreatePipeHandles (Var Inhandle,OutHandle : Longint) : Boolean;
+Function CreatePipeHandles (Var Inhandle,OutHandle : THandle) : Boolean;
 
 begin
   Result := CreatePipe (@Inhandle,@OutHandle,@piInheritablePipe,PipeBufSize);