| Subject: | Insufficient testing for %^H population |
If I apply the attached patch, tests still fully pass :/ I was digging in this direction wondering if I can omit the entire shebang if ! keys %$hinthash. Not submitting that (trivial) work, as the test deficiency needs to be resolved first.
| Subject: | sq_nohint.patch |
diff --git a/lib/Sub/Quote.pm b/lib/Sub/Quote.pm
index 7036c70..7224baf 100644
--- a/lib/Sub/Quote.pm
+++ b/lib/Sub/Quote.pm
@@ -110,11 +110,6 @@ sub quote_sub {
."BEGIN {\n"
." \$^H = ".quotify($hints).";\n"
." \${^WARNING_BITS} = ".quotify($bitmask).";\n"
- ." \%^H = (\n"
- . join('', map
- " ".quotify($_)." => ".quotify($hintshash->{$_}).",",
- keys %$hintshash)
- ." );\n"
."}\n"
."# END quote_sub PRELUDE\n";
$code = "$context$code";