This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Various updates and fixes to some of the SysV IPC ops and their tests
[perl5.git] / overload.h
index adf1fea..50e7660 100644 (file)
  *
  *    overload.h
  *
- *    Copyright (C) 1997, 1998, 2000, 2001, 2005 and 2006 by Larry Wall and
- *    others
+ *    Copyright (C) 1997, 1998, 2000, 2001, 2005, 2006, 2007, 2011
+ *    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.
  *
- *  !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
- *  This file is built by overload.pl
+ * !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
+ * This file is built by regen/overload.pl.
+ * Any changes made here will be lost!
  */
 
 enum {
-    fallback_amg,
-    to_sv_amg,
-    to_av_amg,
-    to_hv_amg,
-    to_gv_amg,
-    to_cv_amg,
-    inc_amg,
-    dec_amg,
-    bool__amg,
-    numer_amg,
-    string_amg,
-    not_amg,
-    copy_amg,
-    abs_amg,
-    neg_amg,
-    iter_amg,
-    int_amg,
-    lt_amg,
-    le_amg,
-    gt_amg,
-    ge_amg,
-    eq_amg,
-    ne_amg,
-    slt_amg,
-    sle_amg,
-    sgt_amg,
-    sge_amg,
-    seq_amg,
-    sne_amg,
-    nomethod_amg,
-    add_amg,
-    add_ass_amg,
-    subtr_amg,
-    subtr_ass_amg,
-    mult_amg,
-    mult_ass_amg,
-    div_amg,
-    div_ass_amg,
-    modulo_amg,
-    modulo_ass_amg,
-    pow_amg,
-    pow_ass_amg,
-    lshift_amg,
-    lshift_ass_amg,
-    rshift_amg,
-    rshift_ass_amg,
-    band_amg,
-    band_ass_amg,
-    bor_amg,
-    bor_ass_amg,
-    bxor_amg,
-    bxor_ass_amg,
-    ncmp_amg,
-    scmp_amg,
-    compl_amg,
-    atan2_amg,
-    cos_amg,
-    sin_amg,
-    exp_amg,
-    log_amg,
-    sqrt_amg,
-    repeat_amg,
-    repeat_ass_amg,
-    concat_amg,
-    concat_ass_amg,
-    smart_amg,
-    DESTROY_amg,
+    fallback_amg,      /* 0x00 fallback */
+    to_sv_amg,         /* 0x01 ${}      */
+    to_av_amg,         /* 0x02 @{}      */
+    to_hv_amg,         /* 0x03 %{}      */
+    to_gv_amg,         /* 0x04 *{}      */
+    to_cv_amg,         /* 0x05 &{}      */
+    inc_amg,           /* 0x06 ++       */
+    dec_amg,           /* 0x07 --       */
+    bool__amg,         /* 0x08 bool     */
+    numer_amg,         /* 0x09 0+       */
+    string_amg,                /* 0x0a ""       */
+    not_amg,           /* 0x0b !        */
+    copy_amg,          /* 0x0c =        */
+    abs_amg,           /* 0x0d abs      */
+    neg_amg,           /* 0x0e neg      */
+    iter_amg,          /* 0x0f <>       */
+    int_amg,           /* 0x10 int      */
+    lt_amg,            /* 0x11 <        */
+    le_amg,            /* 0x12 <=       */
+    gt_amg,            /* 0x13 >        */
+    ge_amg,            /* 0x14 >=       */
+    eq_amg,            /* 0x15 ==       */
+    ne_amg,            /* 0x16 !=       */
+    slt_amg,           /* 0x17 lt       */
+    sle_amg,           /* 0x18 le       */
+    sgt_amg,           /* 0x19 gt       */
+    sge_amg,           /* 0x1a ge       */
+    seq_amg,           /* 0x1b eq       */
+    sne_amg,           /* 0x1c ne       */
+    nomethod_amg,      /* 0x1d nomethod */
+    add_amg,           /* 0x1e +        */
+    add_ass_amg,       /* 0x1f +=       */
+    subtr_amg,         /* 0x20 -        */
+    subtr_ass_amg,     /* 0x21 -=       */
+    mult_amg,          /* 0x22 *        */
+    mult_ass_amg,      /* 0x23 *=       */
+    div_amg,           /* 0x24 /        */
+    div_ass_amg,       /* 0x25 /=       */
+    modulo_amg,                /* 0x26 %        */
+    modulo_ass_amg,    /* 0x27 %=       */
+    pow_amg,           /* 0x28 **       */
+    pow_ass_amg,       /* 0x29 **=      */
+    lshift_amg,                /* 0x2a <<       */
+    lshift_ass_amg,    /* 0x2b <<=      */
+    rshift_amg,                /* 0x2c >>       */
+    rshift_ass_amg,    /* 0x2d >>=      */
+    band_amg,          /* 0x2e &        */
+    band_ass_amg,      /* 0x2f &=       */
+    sband_amg,         /* 0x30 &.       */
+    sband_ass_amg,     /* 0x31 &.=      */
+    bor_amg,           /* 0x32 |        */
+    bor_ass_amg,       /* 0x33 |=       */
+    sbor_amg,          /* 0x34 |.       */
+    sbor_ass_amg,      /* 0x35 |.=      */
+    bxor_amg,          /* 0x36 ^        */
+    bxor_ass_amg,      /* 0x37 ^=       */
+    sbxor_amg,         /* 0x38 ^.       */
+    sbxor_ass_amg,     /* 0x39 ^.=      */
+    ncmp_amg,          /* 0x3a <=>      */
+    scmp_amg,          /* 0x3b cmp      */
+    compl_amg,         /* 0x3c ~        */
+    scompl_amg,                /* 0x3d ~.       */
+    atan2_amg,         /* 0x3e atan2    */
+    cos_amg,           /* 0x3f cos      */
+    sin_amg,           /* 0x40 sin      */
+    exp_amg,           /* 0x41 exp      */
+    log_amg,           /* 0x42 log      */
+    sqrt_amg,          /* 0x43 sqrt     */
+    repeat_amg,                /* 0x44 x        */
+    repeat_ass_amg,    /* 0x45 x=       */
+    concat_amg,                /* 0x46 .        */
+    concat_ass_amg,    /* 0x47 .=       */
+    smart_amg,         /* 0x48 ~~       */
+    ftest_amg,         /* 0x49 -X       */
+    regexp_amg,                /* 0x4a qr       */
     max_amg_code
     /* Do not leave a trailing comma here.  C9X allows it, C89 doesn't. */
 };
 
-
 #define NofAMmeth max_amg_code
-#define AMG_id2name(id) (PL_AMG_names[id]+1)
 
-#ifdef DOINIT
-EXTCONST char * const PL_AMG_names[NofAMmeth] = {
-  /* Names kept in the symbol table.  fallback => "()", the rest has
-     "(" prepended.  The only other place in perl which knows about
-     this convention is AMG_id2name (used for debugging output and
-     'nomethod' only), the only other place which has it hardwired is
-     overload.pm.  */
-    "()",
-    "(${}",
-    "(@{}",
-    "(%{}",
-    "(*{}",
-    "(&{}",
-    "(++",
-    "(--",
-    "(bool",
-    "(0+",
-    "(\"\"",
-    "(!",
-    "(=",
-    "(abs",
-    "(neg",
-    "(<>",
-    "(int",
-    "(<",
-    "(<=",
-    "(>",
-    "(>=",
-    "(==",
-    "(!=",
-    "(lt",
-    "(le",
-    "(gt",
-    "(ge",
-    "(eq",
-    "(ne",
-    "(nomethod",
-    "(+",
-    "(+=",
-    "(-",
-    "(-=",
-    "(*",
-    "(*=",
-    "(/",
-    "(/=",
-    "(%",
-    "(%=",
-    "(**",
-    "(**=",
-    "(<<",
-    "(<<=",
-    "(>>",
-    "(>>=",
-    "(&",
-    "(&=",
-    "(|",
-    "(|=",
-    "(^",
-    "(^=",
-    "(<=>",
-    "(cmp",
-    "(~",
-    "(atan2",
-    "(cos",
-    "(sin",
-    "(exp",
-    "(log",
-    "(sqrt",
-    "(x",
-    "(x=",
-    "(.",
-    "(.=",
-    "(~~",
-    "DESTROY"
-};
-#else
-EXTCONST char * PL_AMG_names[NofAMmeth];
-#endif /* def INITAMAGIC */
+/* ex: set ro: */