diff --git a/compiler/utils/msg2inc.pp b/compiler/utils/msg2inc.pp index a0434dfd02..f10171fb4a 100644 --- a/compiler/utils/msg2inc.pp +++ b/compiler/utils/msg2inc.pp @@ -102,7 +102,7 @@ begin begin if s=']' then multiline:=false - else if (s[1] <> '#') then + else if (s='') or (s[1] <> '#') then inc(msgsize,length(s)+1); { +1 for linebreak } end else @@ -191,7 +191,7 @@ begin ptxt^:=#0; inc(ptxt); end - else if (s[1] <> '#') then + else if (s='') or (s[1] <> '#') then begin move(s[1],ptxt^,length(s)); inc(ptxt,length(s));