|
@@ -217,7 +217,7 @@ implementation
|
|
exit;
|
|
exit;
|
|
with tabstractnormalvarsym(p) do
|
|
with tabstractnormalvarsym(p) do
|
|
begin
|
|
begin
|
|
- if vo_is_default_var in varoptions then
|
|
|
|
|
|
+ if (vo_is_default_var in varoptions) and (vardef.size>0) then
|
|
begin
|
|
begin
|
|
b:=tblocknode(arg);
|
|
b:=tblocknode(arg);
|
|
b.left:=cstatementnode.create(
|
|
b.left:=cstatementnode.create(
|