From 135be09271613ae974a65b7c8d85fcc5f4ebed1e Mon Sep 17 00:00:00 2001
From: olle <olle>
Date: Tue, 2 Nov 2004 22:17:25 +0000
Subject: [PATCH] * fixed possible problem with null termination
---
compiler/utils/ppudump.pp | 6 +++++-
1 file changed, 5 insertions(+), 1 deletion(-)
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