From 054bc27aaa76e9f2568857dd50f50583953993fe Mon Sep 17 00:00:00 2001
From: tom_at_work <tom_at_work@idefix.freepascal.org>
Date: Thu, 17 Aug 2006 21:43:52 +0000
Subject: [PATCH] * fixed typo introduced while prettifying the test

git-svn-id: trunk@4435 -
---
 tests/webtbs/tw7276.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tests/webtbs/tw7276.pp b/tests/webtbs/tw7276.pp
index 4112f6ef9b..a6cdf819be 100644
--- a/tests/webtbs/tw7276.pp
+++ b/tests/webtbs/tw7276.pp
@@ -12,7 +12,7 @@ begin
   Format('%*s', [Integer(length(s)), s]);
   // this is only seemingly equivalent to above, but on 64 bit
   // machines the default integer type is Int64
-  Format('%*s', [length(s), s])
+  Format('%*s', [length(s), s]);
   // also test QWord
   Format('%*s', [QWord(length(s)), s]);  
 end.
\ No newline at end of file