paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 03:06:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed typo

Browse Source
This commit is contained in:
Jonas Maebe 2004-12-23 18:45:23 +00:00
parent 5f0c8bd8b5
commit bbb95a65f7
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/systems/t_morph.pas
View File

@ -180,7 +180,7 @@ begin
{ Call linker } { Call linker }
SplitBinCmd(Info.ExeCmd[1],binstr,cmdstr); SplitBinCmd(Info.ExeCmd[1],binstr,cmdstr);
Replace(cmdstr,'$EXE',maybequoted(ScriptFixFileName(current_module.exefilename^)); Replace(cmdstr,'$EXE',maybequoted(ScriptFixFileName(current_module.exefilename^)));
Replace(cmdstr,'$OPT',Info.ExtraOptions); Replace(cmdstr,'$OPT',Info.ExtraOptions);
Replace(cmdstr,'$RES',maybequoted(ScriptFixFileName(outputexedir+Info.ResName))); Replace(cmdstr,'$RES',maybequoted(ScriptFixFileName(outputexedir+Info.ResName)));
success:=DoExec(FindUtil(BinStr),cmdstr,true,false); success:=DoExec(FindUtil(BinStr),cmdstr,true,false);
@ -215,7 +215,10 @@ initialization
end. end.
{ {
$Log$ $Log$
Revision 1.9 2004-12-22 16:32:46 peter Revision 1.10 2004-12-23 18:45:23 jonas
* fixed typo
Revision 1.9 2004/12/22 16:32:46 peter
* maybequoted() added * maybequoted() added
Revision 1.8 2004/10/25 15:38:41 peter Revision 1.8 2004/10/25 15:38:41 peter