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

* path to the include file is also written to the debug output

Browse Source
This commit is contained in:
peter 1998-08-10 09:56:04 +00:00
parent c3b8305ec1
commit b8f4c8f6b8
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/scandir.inc
View File

@ -497,7 +497,7 @@ const
current_scanner^.addfile(hp); current_scanner^.addfile(hp);
if not current_scanner^.open then if not current_scanner^.open then
Message1(scan_f_cannot_open_includefile,hs); Message1(scan_f_cannot_open_includefile,hs);
Message1(scan_u_start_include_file,current_scanner^.inputfile^.name^); Message1(scan_u_start_include_file,current_scanner^.inputfile^.path^+current_scanner^.inputfile^.name^);
current_scanner^.reload; current_scanner^.reload;
{ register for refs } { register for refs }
current_module^.sourcefiles.register_file(hp); current_module^.sourcefiles.register_file(hp);
@ -706,7 +706,10 @@ const
{ {
$Log$ $Log$
Revision 1.16 1998-08-04 22:03:44 michael Revision 1.17 1998-08-10 09:56:04 peter
* path to the include file is also written to the debug output
Revision 1.16 1998/08/04 22:03:44 michael
+ fixed dir_include search() call + fixed dir_include search() call
Revision 1.15 1998/07/14 21:46:55 peter Revision 1.15 1998/07/14 21:46:55 peter