* fix test for case sensitive file system, resolves #31452

git-svn-id: trunk@35543 -
This commit is contained in:
florian 2017-03-08 20:18:25 +00:00
parent 6166215174
commit 5dd6232c0e

View File

@ -10,7 +10,7 @@ program test(input, output, testfile);
writeln(testfile,'Hello world');
close(testfile);
assign(testfile,'testfile.txt');
assign(testfile,'TESTFILE.txt');
reset(testfile);
readln(testfile,s);
if (s[1]<>'H') or (s[2]<>'e') then