paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-29 13:21:35 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Warn only for go32v2 even for 2.7.1 version

Browse Source 
git-svn-id: trunk@18222 -
This commit is contained in:
pierre 2011-08-16 15:14:46 +00:00
parent 691ee3b881
commit 99393e6a5d
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
packages/fcl-process/src/dummy/process.inc
View File

@ -4,8 +4,14 @@
{
prevent compilation error for the versions mentioned below
}
}
{$if defined (go32v2) and defined(VER2_7_1)}
{$define WARN_ONLY}
{$endif}
{$if defined(VER2_4) or defined(VER2_5_1)}
{$define WARN_ONLY}
{$endif}
{$ifdef WARN_ONLY}
{$warning Temporary workaround - unit does nothing}
{$else}
{$fatal Proper implementation of TProcess for version of this target needed}