* fixed compilation with -Sew

This commit is contained in:
Nikolay Nikolov 2023-06-11 15:09:49 +03:00 committed by Pierre Muller
parent bd95252ae1
commit 389de7c65c

View File

@ -898,6 +898,8 @@ implementation
str:=str+'const ';
vs_value:
;
else
internalerror(2023061108);
end;
str:=str+currpara.realname;