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

* fixed array of const writing instead of array of tvarrec (merged)

Browse Source
This commit is contained in:
peter 2000-09-10 20:13:37 +00:00
parent 3b46bdb72d
commit 07219f9cb8
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/symdef.inc
View File

@ -2004,7 +2004,7 @@
begin
if isarrayofconst or isConstructor then
begin
if isvariant then
if isvariant or ((highrange=-1) and (lowrange=0)) then
gettypename:='Array Of Const'
else
gettypename:='Array Of '+elementtype.def^.typename;
@ -4260,7 +4260,10 @@ Const local_symtable_index : longint = $8001;
{
$Log$
Revision 1.15 2000-09-09 18:36:40 peter
Revision 1.16 2000-09-10 20:13:37 peter
* fixed array of const writing instead of array of tvarrec (merged)
Revision 1.15 2000/09/09 18:36:40 peter
* fixed C alignment of array of record (merged)
Revision 1.14 2000/08/27 20:19:39 peter