paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-03 16:29:27 +01:00
Code Issues Packages Projects Releases Wiki Activity

* fixed two bugs to get make cycle work, but it's not enough

Browse Source
This commit is contained in:
florian 2000-11-06 15:54:15 +00:00
parent fb6d6792f3
commit d5a2d64cf5
2 changed files with 13 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
compiler/ptconst.pas
View File

@ -739,7 +739,10 @@ implementation
else break;
end;
end;
end;
for i:=1 to def^.size-aktpos do
curconstsegment^.concat(new(pai_const,init_8bit(0)));
consume(_RKLAMMER);
end;
end;
{ reads a typed object }
objectdef:
@ -835,7 +838,10 @@ implementation
end.
{
$Log$
Revision 1.11 2000-11-04 14:25:21 florian
Revision 1.12 2000-11-06 15:54:15 florian
* fixed two bugs to get make cycle work, but it's not enough
Revision 1.11 2000/11/04 14:25:21 florian
+ merged Attila's changes for interfaces, not tested yet
Revision 1.10 2000/10/31 22:02:51 peter

21
compiler/symtable.pas
View File

@ -124,20 +124,6 @@ interface
systemunit : punitsymtable; { pointer to the system unit }
read_member : boolean; { reading members of an symtable }
aktprocsym : pprocsym; { pointer to the symbol for the
currently be parsed procedure }
aktcallprocsym : pprocsym; { pointer to the symbol for the
currently be called procedure,
only set/unset in firstcall }
aktvarsym : pvarsym; { pointer to the symbol for the
currently read var, only used
for variable directives }
procprefix : string; { eindeutige Namen bei geschachtel- }
{ ten Unterprogrammen erzeugen }
lexlevel : longint; { level of code }
{ 1 for main procedure }
{ 2 for normal function or proc }
@ -2366,7 +2352,10 @@ implementation
end.
{
$Log$
Revision 1.14 2000-11-04 14:25:22 florian
Revision 1.15 2000-11-06 15:54:15 florian
* fixed two bugs to get make cycle work, but it's not enough
Revision 1.14 2000/11/04 14:25:22 florian
+ merged Attila's changes for interfaces, not tested yet
Revision 1.13 2000/11/01 23:04:38 peter
@ -2409,4 +2398,4 @@ end.
Revision 1.2 2000/07/13 11:32:50 michael
+ removed logs
}
}