Displaying 2 results from an estimated 2 matches for "5fa00a92d".
2018 Aug 10
2
[PATCH] Change wording from "twice" to "more than once" in error messages
...ntf (stderr, _(\"%%s: optional argument \\\"%%s\\\" given more than once\\n\"),\n";
pr " cmd, this_arg);\n";
pr " goto out;\n";
pr " }\n";
diff --git a/generator/perl.ml b/generator/perl.ml
index 5fa00a92d..cd0595640 100644
--- a/generator/perl.ml
+++ b/generator/perl.ml
@@ -496,7 +496,7 @@ PREINIT:
) optargs;
pr "croak (\"unknown optional argument '%%s'\", this_arg);\n";
pr " if (optargs_s.bitmask & this_mask)\n";
- p...
2018 Jan 22
1
[PATCH] perl: Free array on error path to avoid leak (RHBZ#1536765).
---
generator/perl.ml | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/generator/perl.ml b/generator/perl.ml
index 240bf3b54..5fa00a92d 100644
--- a/generator/perl.ml
+++ b/generator/perl.ml
@@ -122,8 +122,10 @@ XS_unpack_charPtrPtr (SV *arg) {
for (i = 0; i <= av_len (av); i++) {
SV **elem = av_fetch (av, i, 0);
- if (!elem || !*elem)
+ if (!elem || !*elem) {
+ free (ret);
croak (\"missing eleme...