Procházet zdrojové kódy

* fixed typo introduced while prettifying the test

git-svn-id: trunk@4435 -
tom_at_work před 19 roky
rodič
revize
054bc27aaa
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  1. 1 1
      tests/webtbs/tw7276.pp

+ 1 - 1
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.