* 8.3 fixes (short target name in paths)

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

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

View File

@ -476,7 +476,10 @@ implementation
Replace(s,'$FPCDATE',date_string);
Replace(s,'$FPCCPU',target_cpu_string);
Replace(s,'$FPCOS',target_os_string);
Replace(s,'$FPCTARGET',target_full_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

View File

@ -2026,9 +2026,15 @@ begin
if not disable_configfile then
begin
if PathExists(FpcDir+'rtl') then
UnitSearchPath.AddPath(FpcDir+'rtl/'+target_full_string,false)
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
UnitSearchPath.AddPath(FpcDir+'units/'+target_full_string+'/rtl',false);
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;
{ Add exepath if the exe is not in the current dir, because that is always searched already.
Do not add it when linking on the target because then we can maybe already find
@ -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

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

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

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

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

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

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

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