From 9820ea04ccfd5e188afb5759c0a3b51f7181fb5a Mon Sep 17 00:00:00 2001
From: florian <florian@freepascal.org>
Date: Sun, 25 Feb 2007 16:21:22 +0000
Subject: [PATCH] * fixed test

git-svn-id: trunk@6642 -
---
 tests/webtbs/tw8180.pp | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/tests/webtbs/tw8180.pp b/tests/webtbs/tw8180.pp
index 0c9f6653d1..40934cdd45 100644
--- a/tests/webtbs/tw8180.pp
+++ b/tests/webtbs/tw8180.pp
@@ -1,5 +1,7 @@
 { %recompile }
 
+{$mode objfpc}
+
 uses uw8180;
 
 type