paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-24 11:29:22 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ Merged changes in fixbranch

Browse Source
This commit is contained in:
michael 2000-08-15 09:45:29 +00:00
parent c356a11ae4
commit 5eb17fe1c4
1 changed files with 8 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
compiler/cresstr.pas
View File

@ -222,7 +222,7 @@ Var
begin begin
If List.Empty then If List.Empty then
exit; exit;
FileName:=ForceExtension(lower(FileName),'.rst'); FileName:=current_module^.outputpath^+FixFileName(ForceExtension(FileName,'.rst'));
message1 (general_i_writingresourcefile,filename); message1 (general_i_writingresourcefile,filename);
Assign(F,Filename); Assign(F,Filename);
{$i-} {$i-}
@ -284,10 +284,13 @@ end;
end. end.
{ {
$Log$ $Log$
Revision 1.3 2000-07-13 12:08:25 michael Revision 1.4 2000-08-15 09:45:29 michael
+ patched to 1.1.0 with former 1.09patch from peter + Merged changes in fixbranch
Revision 1.2 2000/07/13 11:32:39 michael Revision 1.1.2.1 2000/08/15 09:41:56 michael
+ removed logs + Fix to write rst file in output directory of module
Revision 1.1 2000/07/13 06:29:48 michael
+ Initial import
} }