projects
/
p5sagit/p5-mst-13.2.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(parent:
6a1b87e
)
Always NUL-terminate opsets
Chip Salzenberg [Fri, 18 Apr 1997 16:37:00 +0000 (
04:37
+1200)]
ext/Opcode/Opcode.xs
patch
|
blob
|
blame
|
history
diff --git
a/ext/Opcode/Opcode.xs
b/ext/Opcode/Opcode.xs
index
538f0ec
..
9d4b726
100644
(file)
--- a/
ext/Opcode/Opcode.xs
+++ b/
ext/Opcode/Opcode.xs
@@
-117,7
+117,7
@@
new_opset(old_opset)
}
else {
opset = newSV(opset_len);
- Zero(SvPVX(opset), opset_len, char);
+ Zero(SvPVX(opset), opset_len + 1, char);
SvCUR_set(opset, opset_len);
(void)SvPOK_only(opset);
}