From 0179fb503e300d42ffd46cd009036f680e2ec746 Mon Sep 17 00:00:00 2001
From: Tomas Hajny <hajny@freepascal.org>
Date: Tue, 3 Nov 2009 22:48:45 +0000
Subject: [PATCH]   * Fix by Giulio: Fix compilation of redir.pp for go32v2

git-svn-id: trunk@14026 -
---
 tests/utils/redir.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/utils/redir.pp b/tests/utils/redir.pp
index b84818200f..33b9b259d5 100644
--- a/tests/utils/redir.pp
+++ b/tests/utils/redir.pp
@@ -90,7 +90,7 @@ const
 
 Implementation
 
-{$if defined(macos) or defined(windows) or defined(shell_implemented)}
+{$if defined(macos) or defined(windows) or defined(shell_implemented) or defined(go32v2)}
 {$define usedos}
 {$endif}