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

* pprocsym defined earlier for use in tprocdef

Browse Source
This commit is contained in:
pierre 1999-08-10 12:33:36 +00:00
parent 4565d76c4e
commit a435c90fc8
2 changed files with 9 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/symsymh.inc
View File

@ -101,7 +101,6 @@
constructor init; constructor init;
end; end;
pprocsym = ^tprocsym;
tprocsym = object(tsym) tprocsym = object(tsym)
definition : pprocdef; definition : pprocdef;
{$ifdef CHAINPROCSYMS} {$ifdef CHAINPROCSYMS}
@ -331,7 +330,10 @@
{ {
$Log$ $Log$
Revision 1.30 1999-08-03 22:03:21 peter Revision 1.31 1999-08-10 12:33:38 pierre
* pprocsym defined earlier for use in tprocdef
Revision 1.30 1999/08/03 22:03:21 peter
* moved bitmask constants to sets * moved bitmask constants to sets
* some other type/const renamings * some other type/const renamings

6
compiler/symtable.pas
View File

@ -68,6 +68,7 @@ unit symtable;
{ needed for names by the definitions } { needed for names by the definitions }
ptypesym = ^ttypesym; ptypesym = ^ttypesym;
penumsym = ^tenumsym; penumsym = ^tenumsym;
pprocsym = ^tprocsym;
pref = ^tref; pref = ^tref;
tref = object tref = object
@ -2344,7 +2345,10 @@ implementation
end. end.
{ {
$Log$ $Log$
Revision 1.38 1999-08-05 16:53:18 peter Revision 1.39 1999-08-10 12:33:36 pierre
* pprocsym defined earlier for use in tprocdef
Revision 1.38 1999/08/05 16:53:18 peter
* V_Fatal=1, all other V_ are also increased * V_Fatal=1, all other V_ are also increased
* Check for local procedure when assigning procvar * Check for local procedure when assigning procvar
* fixed comment parsing because directives * fixed comment parsing because directives