Sfoglia il codice sorgente

* fixed typo introduced while prettifying the test

git-svn-id: trunk@4435 -
tom_at_work 19 anni fa
parent
commit
054bc27aaa
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      tests/webtbs/tw7276.pp

+ 1 - 1
tests/webtbs/tw7276.pp

@@ -12,7 +12,7 @@ begin
   Format('%*s', [Integer(length(s)), s]);
   Format('%*s', [Integer(length(s)), s]);
   // this is only seemingly equivalent to above, but on 64 bit
   // this is only seemingly equivalent to above, but on 64 bit
   // machines the default integer type is Int64
   // machines the default integer type is Int64
-  Format('%*s', [length(s), s])
+  Format('%*s', [length(s), s]);
   // also test QWord
   // also test QWord
   Format('%*s', [QWord(length(s)), s]);  
   Format('%*s', [QWord(length(s)), s]);  
 end.
 end.