From 50c3ba53108b6cbcba918e2f9688e0c48b5dea39 Mon Sep 17 00:00:00 2001
From: tom_at_work <tom_at_work@idefix.freepascal.org>
Date: Thu, 17 Aug 2006 21:22:10 +0000
Subject: [PATCH] * made sure that the enum tested in the test is of byte size,
 otherwise the test program does not compile

git-svn-id: trunk@4433 -
---
 tests/webtbs/tw4809.pp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/tests/webtbs/tw4809.pp b/tests/webtbs/tw4809.pp
index 2f320c658a..245e377702 100644
--- a/tests/webtbs/tw4809.pp
+++ b/tests/webtbs/tw4809.pp
@@ -1,6 +1,7 @@
 { %result=201 }
 
 {$r+}
+{$packenum 1}
 Type
   MySet = (msOne,msTwo,msThree,msFour,msFive);