Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

add *{$::{DUMMY}{IO}

  • Loading branch information...
commit df47f3838bb2f54d410355c6e861adff21cbeb0a 1 parent 0bfc1d0
@rurban authored
Showing with 6 additions and 0 deletions.
  1. +6 −0 dist/Data-Dumper/Dumper.xs
View
6 dist/Data-Dumper/Dumper.xs
@@ -813,6 +813,12 @@ DD_dump(pTHX_ SV *val, const char *name, STRLEN namelen, SV *retval, HV *seenhv,
if (purity)
warn("Encountered CODE ref, using dummy placeholder");
}
+ else if (realtype == SVt_PVIO) {
+ /* TODO should detect 1-3 STD handles and print the other handles numerically */
+ sv_catpvn(retval, "*{$::{DUMMY}{IO}}", 17);
+ if (purity)
+ warn("Encountered IO type, using dummy placeholder");
+ }
else {
warn("cannot handle ref type %d", (int)realtype);
}
Please sign in to comment.
Something went wrong with that request. Please try again.