1# -*- buffer-read-only: t -*- 2# 3# lib/overload/numbers.pm 4# 5# Copyright (C) 2008 by Larry Wall and others 6# 7# You may distribute under the terms of either the GNU General Public 8# License or the Artistic License, as specified in the README file. 9# 10# !!!!!!! DO NOT EDIT THIS FILE !!!!!!! 11# This file is built by regen/overload.pl. 12# Any changes made here will be lost! 13 14package overload::numbers; 15 16our @names = qw# 17 () 18 (${} 19 (@{} 20 (%{} 21 (*{} 22 (&{} 23 (++ 24 (-- 25 (bool 26 (0+ 27 ("" 28 (! 29 (= 30 (abs 31 (neg 32 (<> 33 (int 34 (< 35 (<= 36 (> 37 (>= 38 (== 39 (!= 40 (lt 41 (le 42 (gt 43 (ge 44 (eq 45 (ne 46 (nomethod 47 (+ 48 (+= 49 (- 50 (-= 51 (* 52 (*= 53 (/ 54 (/= 55 (% 56 (%= 57 (** 58 (**= 59 (<< 60 (<<= 61 (>> 62 (>>= 63 (& 64 (&= 65 (&. 66 (&.= 67 (| 68 (|= 69 (|. 70 (|.= 71 (^ 72 (^= 73 (^. 74 (^.= 75 (<=> 76 (cmp 77 (~ 78 (~. 79 (atan2 80 (cos 81 (sin 82 (exp 83 (log 84 (sqrt 85 (x 86 (x= 87 (. 88 (.= 89 (~~ 90 (-X 91 (qr 92#; 93 94our @enums = qw# 95 fallback 96 to_sv 97 to_av 98 to_hv 99 to_gv 100 to_cv 101 inc 102 dec 103 bool_ 104 numer 105 string 106 not 107 copy 108 abs 109 neg 110 iter 111 int 112 lt 113 le 114 gt 115 ge 116 eq 117 ne 118 slt 119 sle 120 sgt 121 sge 122 seq 123 sne 124 nomethod 125 add 126 add_ass 127 subtr 128 subtr_ass 129 mult 130 mult_ass 131 div 132 div_ass 133 modulo 134 modulo_ass 135 pow 136 pow_ass 137 lshift 138 lshift_ass 139 rshift 140 rshift_ass 141 band 142 band_ass 143 sband 144 sband_ass 145 bor 146 bor_ass 147 sbor 148 sbor_ass 149 bxor 150 bxor_ass 151 sbxor 152 sbxor_ass 153 ncmp 154 scmp 155 compl 156 scompl 157 atan2 158 cos 159 sin 160 exp 161 log 162 sqrt 163 repeat 164 repeat_ass 165 concat 166 concat_ass 167 smart 168 ftest 169 regexp 170#; 171 172{ my $i = 0; our %names = map { $_ => $i++ } @names } 173 174{ my $i = 0; our %enums = map { $_ => $i++ } @enums } 175 176# ex: set ro: 177