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

* 8.3 fixes (short target name in paths)

Browse Source
This commit is contained in:
Tomas Hajny 2004-12-28 20:43:00 +00:00
parent 0d1a6fb4b2
commit f290fbb299
10 changed files with 63 additions and 20 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}
{$define shortasmprefix}
{$endif}
{$ifdef watcom}
{$define shortasmprefix}
{$endif}
{$ifdef tos}
{$define shortasmprefix}
{$endif}
@ -708,7 +711,10 @@ implementation
end.
{
$Log$
Revision 1.49 2004-11-04 23:59:13 peter
Revision 1.50 2004-12-28 20:43:01 hajny
* 8.3 fixes (short target name in paths)
Revision 1.49 2004/11/04 23:59:13 peter
use filepos of main when generating the module stabs
Revision 1.48 2004/10/14 18:16:17 mazen

8
compiler/globals.pas
View File

@ -476,6 +476,9 @@ implementation
Replace(s,'$FPCDATE',date_string);
Replace(s,'$FPCCPU',target_cpu_string);
Replace(s,'$FPCOS',target_os_string);
if tf_use_8_3 in Source_Info.Flags then
Replace(s,'$FPCTARGET',target_os_string)
else
Replace(s,'$FPCTARGET',target_full_string);
end;
@ -2145,7 +2148,10 @@ end;
end.
{
$Log$
Revision 1.154 2004-12-15 16:06:47 marco
Revision 1.155 2004-12-28 20:43:01 hajny
* 8.3 fixes (short target name in paths)
Revision 1.154 2004/12/15 16:06:47 marco
* introduction "cleanpath" (=fexpand), fixfilename(paramstr(0)) + search $PREFIX/etc/fpc.cfg
Revision 1.153 2004/11/05 13:14:30 florian

11
compiler/options.pas
View File

@ -2026,7 +2026,13 @@ begin
if not disable_configfile then
begin
if PathExists(FpcDir+'rtl') then
if tf_use_8_3 in Source_Info.Flags then
UnitSearchPath.AddPath(FpcDir+'rtl/'+target_os_string,false)
else
UnitSearchPath.AddPath(FpcDir+'rtl/'+target_full_string,false)
else
if tf_use_8_3 in Source_Info.Flags then
UnitSearchPath.AddPath(FpcDir+'units/'+target_os_string+'/rtl',false)
else
UnitSearchPath.AddPath(FpcDir+'units/'+target_full_string+'/rtl',false);
end;
@ -2095,7 +2101,10 @@ finalization
end.
{
$Log$
Revision 1.156 2004-12-16 08:06:42 marco
Revision 1.157 2004-12-28 20:43:01 hajny
* 8.3 fixes (short target name in paths)
Revision 1.156 2004/12/16 08:06:42 marco
* slash typo
Revision 1.155 2004/12/15 16:06:47 marco

8
compiler/systems.pas
View File

@ -228,7 +228,8 @@ interface
tf_code_small,tf_static_reg_based,
tf_needs_symbol_size,
tf_smartlink_sections,
tf_needs_dwarf_cfi
tf_needs_dwarf_cfi,
tf_use_8_3
);
psysteminfo = ^tsysteminfo;
@ -715,7 +716,10 @@ finalization
end.
{
$Log$
Revision 1.98 2004-12-12 00:35:19 florian
Revision 1.99 2004-12-28 20:43:00 hajny
* 8.3 fixes (short target name in paths)
Revision 1.98 2004/12/12 00:35:19 florian
* check if the selected assembler supports current target improved
Revision 1.97 2004/12/12 00:31:52 florian

7
compiler/systems/i_atari.pas
View File

@ -33,7 +33,7 @@ unit i_atari;
system : target_m68k_Atari;
name : 'Atari ST/STE';
shortname : 'atari';
flags : [];
flags : [tf_use_8_3];
cpu : cpu_m68k;
short_name : 'ATARI';
unit_env : '';
@ -84,7 +84,10 @@ initialization
end.
{
$Log$
Revision 1.4 2004-10-25 15:38:41 peter
Revision 1.5 2004-12-28 20:43:01 hajny
* 8.3 fixes (short target name in paths)
Revision 1.4 2004/10/25 15:38:41 peter
* heap and heapsize removed
* checkpointer fixes

7
compiler/systems/i_emx.pas
View File

@ -41,7 +41,7 @@ unit i_emx;
system : system_i386_EMX;
name : 'OS/2 via EMX';
shortname : 'EMX';
flags : [tf_need_export];
flags : [tf_need_export,tf_use_8_3];
cpu : cpu_i386;
unit_env : 'EMXUNITS';
extradefines : 'OS2';
@ -115,7 +115,10 @@ initialization
end.
{
$Log$
Revision 1.5 2004-10-25 15:38:41 peter
Revision 1.6 2004-12-28 20:43:01 hajny
* 8.3 fixes (short target name in paths)
Revision 1.5 2004/10/25 15:38:41 peter
* heap and heapsize removed
* checkpointer fixes

7
compiler/systems/i_go32v2.pas
View File

@ -33,7 +33,7 @@ unit i_go32v2;
system : system_i386_GO32V2;
name : 'GO32 V2 DOS extender';
shortname : 'Go32v2';
flags : [];
flags : [tf_use_8_3];
cpu : cpu_i386;
unit_env : 'GO32V2UNITS';
extradefines : 'DPMI';
@ -101,7 +101,10 @@ initialization
end.
{
$Log$
Revision 1.4 2004-10-25 15:38:41 peter
Revision 1.5 2004-12-28 20:43:01 hajny
* 8.3 fixes (short target name in paths)
Revision 1.4 2004/10/25 15:38:41 peter
* heap and heapsize removed
* checkpointer fixes

7
compiler/systems/i_os2.pas
View File

@ -41,7 +41,7 @@ unit i_os2;
system : system_i386_OS2;
name : 'OS/2';
shortname : 'OS2';
flags : [tf_need_export];
flags : [tf_need_export,tf_use_8_3];
cpu : cpu_i386;
unit_env : 'OS2UNITS';
extradefines : '';
@ -115,7 +115,10 @@ initialization
end.
{
$Log$
Revision 1.6 2004-10-25 15:38:41 peter
Revision 1.7 2004-12-28 20:43:01 hajny
* 8.3 fixes (short target name in paths)
Revision 1.6 2004/10/25 15:38:41 peter
* heap and heapsize removed
* checkpointer fixes

7
compiler/systems/i_watcom.pas
View File

@ -35,7 +35,7 @@ unit i_watcom;
system : system_i386_Watcom;
name : 'Watcom compatible DOS extenders';
shortname : 'WATCOM';
flags : [];
flags : [tf_use_8_3];
cpu : cpu_i386;
unit_env : 'WATCOMUNITS';
extradefines : 'DPMI';
@ -103,7 +103,10 @@ initialization
end.
{
$Log$
Revision 1.5 2004-10-25 15:38:41 peter
Revision 1.6 2004-12-28 20:43:01 hajny
* 8.3 fixes (short target name in paths)
Revision 1.5 2004/10/25 15:38:41 peter
* heap and heapsize removed
* checkpointer fixes

7
compiler/systems/i_wdosx.pas
View File

@ -33,7 +33,7 @@ unit i_wdosx;
system : system_i386_wdosx;
name : 'WDOSX DOS extender';
shortname : 'WDOSX';
flags : [];
flags : [tf_use_8_3];
cpu : cpu_i386;
unit_env : 'WDOSXUNITS';
extradefines : 'MSWINDOWS';
@ -103,7 +103,10 @@ initialization
end.
{
$Log$
Revision 1.7 2004-10-25 15:38:41 peter
Revision 1.8 2004-12-28 20:43:01 hajny
* 8.3 fixes (short target name in paths)
Revision 1.7 2004/10/25 15:38:41 peter
* heap and heapsize removed
* checkpointer fixes