paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-13 12:26:58 +02:00
Code Issues Packages Projects Releases Wiki Activity

* moved pbestrealtype from symdef to symcpu

Browse Source 
git-svn-id: trunk@27441 -
This commit is contained in:
Jonas Maebe 2014-04-01 21:41:37 +00:00
parent a251b270b6
commit d452686c39
23 changed files with 78 additions and 64 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/aarch64/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym;
symtype,symdef,symsym;
type
{ defs }
@ -131,6 +131,10 @@ type
end;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
begin

6
compiler/alpha/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym;
symtype,symdef,symsym;
type
{ defs }
@ -164,6 +164,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
begin

6
compiler/arm/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym,globtype;
symtype,symdef,symsym,globtype;
type
{ defs }
@ -168,6 +168,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
begin

6
compiler/avr/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym;
symtype,symdef,symsym;
type
{ defs }
@ -164,6 +164,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
begin

6
compiler/generic/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym;
symtype,symdef,symsym;
type
{ defs }
@ -164,6 +164,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @<somestandardfloattype>;
implementation
begin

6
compiler/i386/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym,symx86,symi86;
symtype,symdef,symsym,symx86,symi86;
type
{ defs }
@ -164,6 +164,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s80floattype;
implementation
begin

4
compiler/i8086/symcpu.pas
View File

@ -171,6 +171,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s80floattype;
implementation
uses

6
compiler/ia64/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym;
symtype,symdef,symsym;
type
{ defs }
@ -164,6 +164,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
begin

4
compiler/jvm/symcpu.pas
View File

@ -197,6 +197,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
uses

4
compiler/m68k/symcpu.pas
View File

@ -173,6 +173,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
{****************************************************************************

6
compiler/mips/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym;
symtype,symdef,symsym;
type
{ defs }
@ -166,6 +166,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
begin

2
compiler/nadd.pas
View File

@ -110,7 +110,7 @@ implementation
{$ENDIF}
globtype,systems,constexp,
cutils,verbose,globals,widestr,
symconst,symdef,symsym,symtable,defutil,defcmp,
symconst,symdef,symsym,symcpu,symtable,defutil,defcmp,
cgbase,
htypechk,pass_1,
nld,nbas,nmat,ncnv,ncon,nset,nopt,ncal,ninl,nmem,nutils,

2
compiler/ncnv.pas
View File

@ -293,7 +293,7 @@ implementation
uses
globtype,systems,constexp,
cutils,verbose,globals,widestr,
symconst,symdef,symsym,symtable,
symconst,symdef,symsym,symcpu,symtable,
ncon,ncal,nset,nadd,nmem,nmat,nbas,nutils,ninl,
cgbase,procinfo,
htypechk,pass_1,cpuinfo;

2
compiler/ninl.pas
View File

@ -108,7 +108,7 @@ implementation
uses
verbose,globals,systems,constexp,
globtype,cutils,fmodule,
symconst,symdef,symsym,symtable,paramgr,defutil,symbase,
symconst,symdef,symsym,symcpu,symtable,paramgr,defutil,symbase,
pass_1,
ncal,ncon,ncnv,nadd,nld,nbas,nflw,nmem,nmat,nutils,
nobjc,objcdef,

2
compiler/pexpr.pas
View File

@ -62,7 +62,7 @@ implementation
verbose,
systems,widestr,
{ symtable }
symconst,symtable,symsym,defutil,defcmp,
symconst,symtable,symsym,symcpu,defutil,defcmp,
{ module }
fmodule,ppu,
{ pass 1 }

2
compiler/powerpc/nppccnv.pas
View File

@ -58,7 +58,7 @@ implementation
uses
verbose,globtype,globals,systems,
symconst,symdef,aasmbase,aasmtai,aasmdata,
defutil,
defutil,symcpu,
cgbase,cgutils,pass_1,pass_2,
ncon,ncal,
ncgutil,procinfo,

4
compiler/powerpc/symcpu.pas
View File

@ -173,6 +173,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
{****************************************************************************

2
compiler/powerpc64/nppccnv.pas
View File

@ -58,7 +58,7 @@ implementation
uses
verbose, globtype, globals, systems,
symconst, symdef, aasmbase, aasmtai,aasmdata,
defutil,
defutil, symcpu,
cgbase, cgutils, pass_1, pass_2,
ncon, ncal,procinfo,
ncgutil,

6
compiler/powerpc64/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym;
symtype,symdef,symsym;
type
{ defs }
@ -164,6 +164,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
begin

6
compiler/sparc/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym;
symtype,symdef,symsym;
type
{ defs }
@ -164,6 +164,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s64floattype;
implementation
begin

46
compiler/symdef.pas
View File

@ -1047,52 +1047,6 @@ interface
{ FPC java procvar base class }
java_procvarbase : tobjectdef;
const
{$ifdef i8086}
pbestrealtype : ^tdef = @s80floattype;
{$endif}
{$ifdef i386}
pbestrealtype : ^tdef = @s80floattype;
{$endif}
{$ifdef x86_64}
pbestrealtype : ^tdef = @s80floattype;
{$endif}
{$ifdef m68k}
pbestrealtype : ^tdef = @s64floattype;
{$endif}
{$ifdef alpha}
pbestrealtype : ^tdef = @s64floattype;
{$endif}
{$ifdef powerpc}
pbestrealtype : ^tdef = @s64floattype;
{$endif}
{$ifdef POWERPC64}
pbestrealtype : ^tdef = @s64floattype;
{$endif}
{$ifdef ia64}
pbestrealtype : ^tdef = @s64floattype;
{$endif}
{$ifdef SPARC}
pbestrealtype : ^tdef = @s64floattype;
{$endif SPARC}
{$ifdef vis}
pbestrealtype : ^tdef = @s64floattype;
{$endif vis}
{$ifdef ARM}
pbestrealtype : ^tdef = @s64floattype;
{$endif ARM}
{$ifdef MIPS}
pbestrealtype : ^tdef = @s64floattype;
{$endif MIPS}
{$ifdef AVR}
pbestrealtype : ^tdef = @s64floattype;
{$endif AVR}
{$ifdef JVM}
pbestrealtype : ^tdef = @s64floattype;
{$endif JVM}
{$ifdef AARCH64}
pbestrealtype : ^tdef = @s64floattype;
{$endif AARCH64}
function make_mangledname(const typeprefix:TSymStr;st:TSymtable;const suffix:TSymStr):TSymStr;
function make_dllmangledname(const dllname,importname:TSymStr;

2
compiler/x86/nx86inl.pas
View File

@ -77,7 +77,7 @@ implementation
symconst,
defutil,
aasmbase,aasmtai,aasmdata,aasmcpu,
symtype,symdef,
symtype,symdef,symcpu,
cgbase,pass_2,
cpuinfo,cpubase,paramgr,
nbas,ncon,ncal,ncnv,nld,ncgutil,

6
compiler/x86_64/symcpu.pas
View File

@ -26,7 +26,7 @@ unit symcpu;
interface
uses
symdef,symsym,symx86;
symtype,symdef,symsym,symx86;
type
{ defs }
@ -164,6 +164,10 @@ type
tcpusyssymclass = class of tcpusyssym;
const
pbestrealtype : ^tdef = @s80floattype;
implementation
begin