Sfoglia il codice sorgente

* fix copy & paste error (didn't influence the test as str3 isn't changed, but at least it's consistent that way...)

git-svn-id: trunk@33090 -
svenbarth 9 anni fa
parent
commit
8775897621
1 ha cambiato i file con 1 aggiunte e 1 eliminazioni
  1. 1 1
      tests/test/units/system/tstring.pp

+ 1 - 1
tests/test/units/system/tstring.pp

@@ -834,7 +834,7 @@ procedure test_insert;
   if position <> 7 then
     _result := 16;
 
-  str1:='Hello world';
+  str3:='Hello world';
   position:=Pos('world',str3,8);
   if position <> 0 then
     _result := 23;