Patch from Hugo for the 'printf' problem:

[perl5.git] / opcode.h

diff --git a/opcode.h b/opcode.h
index 01b89da..8556e1e 100644 (file)
--- a/opcode.h
+++ b/opcode.h
@@ -1744,7 +1744,7 @@ EXT U32 PL_opargs[] = {
        0x0001368c,     /* readlink */
        0x0012291c,     /* mkdir */
        0x0001379c,     /* rmdir */
-       0x0122c814,     /* open_dir */
+       0x0002c814,     /* open_dir */
        0x0000d600,     /* readdir */
        0x0000d60c,     /* telldir */
        0x0002c804,     /* seekdir */