administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

#3152

Browse source
This commit is contained in:
Ivan Bondarev 2024-06-23 14:33:09 +02:00
parent 2007fd155c
commit a402b00144
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Compiler/PCU/PCUReader.cs
View file

@ -1850,7 +1850,7 @@ namespace PascalABCCompiler.PCU
int field_off = br.ReadInt32();
class_field cf = null;
if (field_off > 0)
cf = GetClassField(br.ReadInt32());
cf = GetClassField(field_off);
common_type_node cont = (common_type_node)GetTypeReference(br.ReadInt32());
if (name==null)
name = GetStringInClass(cont, name_ref);