* fixed error that only really caused progblems if the total size

    of the messages text is a multiple of 240


git-svn-id: http://svn.freepascal.org/svn/fpc/branches/wpo@11894 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 2 insertions, 0 deletions

diff --git a/compiler/utils/msg2inc.pp b/compiler/utils/msg2inc.pp
index 905d530952..848d63769a 100644
--- a/compiler/utils/msg2inc.pp
+++ b/compiler/utils/msg2inc.pp
@@ -161,6 +161,8 @@ begin
      writeln('aborting');
      halt(1);
    end;
+{ no linebreak after last entry }
+  dec(msgsize);
 { alloc memory }
   getmem(msgtxt,msgsize);
   ptxt:=msgtxt;