paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-09 03:48:08 +02:00
Code Issues Packages Projects Releases Wiki Activity

test: fixed compilation of the examples on win64

Browse Source 
git-svn-id: trunk@10979 -
This commit is contained in:
vincents 2007-04-19 20:56:54 +00:00
parent dab74de8af
commit 38ea67c89e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
test/testlpi.pas
View File

@ -99,7 +99,7 @@ begin
if FileExists(AhkFileName) then
Result.AddTest(TLpiTest.Create(APath, 'TestRun'));
{$ELSE}
{$NOTE scripting is only available on windows}
{$NOTE scripting is only available on win32}
{$ENDIF}
end;
@ -141,7 +141,7 @@ begin
AssertTrue(LazBuildPath + ' does not exist', FileExists(LazBuildPath));
LazBuild := TProcess.Create(nil);
try
{$IFDEF win32}
{$IFDEF windows}
LazBuild.Options := [poNewConsole];
{$ELSE}
LazBuild.Options := [poNoConsole];