From b8cfaeda08a34a08d8837d1b3e985389ca7f9eca Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Tue, 3 Apr 2018 09:13:19 +0000
Subject: [PATCH]  Fix compilation failure for Windows targets

git-svn-id: trunk@38666 -
---
 tests/webtbs/tw33548.pp | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/tests/webtbs/tw33548.pp b/tests/webtbs/tw33548.pp
index 19d2f594ac..45d4bbb8e4 100755
--- a/tests/webtbs/tw33548.pp
+++ b/tests/webtbs/tw33548.pp
@@ -1,11 +1,10 @@
 program app_test_core;
 
+{$H+}
 {$inline on}
 
 {$IFDEF MSWINDOWS}
   {$APPTYPE CONSOLE}
-{$ELSE !MSWINDOWS}
-  {$H+}
 {$ENDIF !MSWINDOWS}
 
 uses