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

* stab types was moved to interface part.

Browse Source 
git-svn-id: trunk@5248 -
This commit is contained in:
yury 2006-11-05 17:06:48 +00:00
parent a13d358f1e
commit 8827d8d628
1 changed files with 20 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

38
compiler/dbgstabs.pas
View File

@ -31,6 +31,26 @@ interface
symtype,symdef,symsym,symtable,symbase, symtype,symdef,symsym,symtable,symbase,
aasmtai,aasmdata; aasmtai,aasmdata;
const
{ stab types }
N_GSYM = $20;
N_STSYM = 38; { initialized const }
N_LCSYM = 40; { non initialized variable}
N_Function = $24; { function or const }
N_TextLine = $44;
N_DataLine = $46;
N_BssLine = $48;
N_RSYM = $40; { register variable }
N_LSYM = $80;
N_tsym = 160;
N_SourceFile = $64;
N_IncludeFile = $84;
N_BINCL = $82;
N_EINCL = $A2;
N_LBRAC = $C0;
N_EXCL = $C2;
N_RBRAC = $E0;
type type
TDebugInfoStabs=class(TDebugInfo) TDebugInfoStabs=class(TDebugInfo)
private private
@ -75,24 +95,6 @@ implementation
const const
memsizeinc = 512; memsizeinc = 512;
N_GSYM = $20;
N_STSYM = 38; { initialized const }
N_LCSYM = 40; { non initialized variable}
N_Function = $24; { function or const }
N_TextLine = $44;
N_DataLine = $46;
N_BssLine = $48;
N_RSYM = $40; { register variable }
N_LSYM = $80;
N_tsym = 160;
N_SourceFile = $64;
N_IncludeFile = $84;
N_BINCL = $82;
N_EINCL = $A2;
N_LBRAC = $C0;
N_EXCL = $C2;
N_RBRAC = $E0;
tagtypes = [ tagtypes = [
recorddef, recorddef,
enumdef, enumdef,