Spaces to tabs

[perl5.git] / opcode.h

diff --git a/opcode.h b/opcode.h
index 8e52cf6..e7af19b 100644 (file)
--- a/opcode.h
+++ b/opcode.h
@@ -1,8 +1,9 @@
-/*
+/* -*- buffer-read-only: t -*-
+ *
  *    opcode.h
  *
  *    Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999,
- *    2000, 2001, 2002, 2003, 2004, by Larry Wall and others
+ *    2000, 2001, 2002, 2003, 2004, 2005 by Larry Wall and others
  *
  *    You may distribute under the terms of either the GNU General Public
  *    License or the Artistic License, as specified in the README file.
@@ -634,8 +635,8 @@ EXTCONST char* const PL_op_desc[] = {
        "-w",
        "-x",
        "-e",
-       "-O",
        "-o",
+       "-O",
        "-z",
        "-s",
        "-M",
@@ -752,7 +753,6 @@ END_EXTERN_C
 
 #endif /* !PERL_GLOBAL_STRUCT_INIT */
 
-
 START_EXTERN_C
 
 #ifdef PERL_GLOBAL_STRUCT_INIT
@@ -1767,7 +1767,7 @@ EXT const U32 PL_opargs[] = {
        0x0002291c,     /* link */
        0x0002291c,     /* symlink */
        0x0001368c,     /* readlink */
-       0x0012291c,     /* mkdir */
+       0x0013299c,     /* mkdir */
        0x0001379c,     /* rmdir */
        0x0002c814,     /* open_dir */
        0x0000d600,     /* readdir */
@@ -1854,3 +1854,4 @@ EXT const U32 PL_opargs[] = {
 END_EXTERN_C
 
 #endif /* !PERL_GLOBAL_STRUCT_INIT */
+/* ex: set ro: */