mirror of
https://github.com/byteworksinc/ORCA-Pascal.git
synced 2024-06-09 18:29:27 +00:00
Merge pull request #3 from ksherlock/patch_1
Uninitialized object field
This commit is contained in:
commit
7d095d99f6
|
@ -1003,6 +1003,7 @@ end; {DoConstant}
|
||||||
objlevel := 1;
|
objlevel := 1;
|
||||||
objparent := nil;
|
objparent := nil;
|
||||||
size := ptrsize;
|
size := ptrsize;
|
||||||
|
hasSFile := false;
|
||||||
end; {with}
|
end; {with}
|
||||||
|
|
||||||
{handle inheritance}
|
{handle inheritance}
|
||||||
|
|
Loading…
Reference in New Issue
Block a user