diff --git a/compiler/utils/ppudump.pp b/compiler/utils/ppudump.pp
index 9db5afd318..9fc197de45 100644
--- a/compiler/utils/ppudump.pp
+++ b/compiler/utils/ppudump.pp
@@ -1068,6 +1068,7 @@ begin
                    len:=getlongint;
                    getmem(pc,len+1);
                    getdata(pc^,len);
+                   (pc+len)^:= #0;
                    writeln(space,'      Length: ',len);
                    writeln(space,'       Value: "',pc,'"');
                    freemem(pc,len+1);
@@ -1983,7 +1984,10 @@ begin
 end.
 {
   $Log$
-  Revision 1.56  2004-09-27 18:04:11  olle
+  Revision 1.57  2004-11-02 22:17:25  olle
+    * fixed possible problem with null termination
+
+  Revision 1.56  2004/09/27 18:04:11  olle
     + added -h option to show help
 
   Revision 1.55  2004/09/04 21:11:49  armin