paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-04 15:39:24 +01:00
Code Issues Packages Projects Releases Wiki Activity

+ tos also has short filenames

Browse Source
This commit is contained in:
carl 2002-11-24 18:19:56 +00:00
parent 3ae9d42f65
commit 3113922e0b
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/fmodule.pas
View File

@ -27,6 +27,9 @@ unit fmodule;
{$ifdef go32v2} {$ifdef go32v2}
{$define shortasmprefix} {$define shortasmprefix}
{$endif} {$endif}
{$ifdef tos}
{$define shortasmprefix}
{$endif}
{$ifdef OS2} {$ifdef OS2}
{ Allthough OS/2 supports long filenames I play it safe and { Allthough OS/2 supports long filenames I play it safe and
use 8.3 filenames, because this allows the compiler to run use 8.3 filenames, because this allows the compiler to run
@ -606,7 +609,10 @@ uses
end. end.
{ {
$Log$ $Log$
Revision 1.29 2002-11-20 12:36:23 mazen Revision 1.30 2002-11-24 18:19:56 carl
+ tos also has short filenames
Revision 1.29 2002/11/20 12:36:23 mazen
* $UNITPATH directive is now working * $UNITPATH directive is now working
Revision 1.28 2002/09/05 19:29:42 peter Revision 1.28 2002/09/05 19:29:42 peter