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 overload.pl 12# 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 (cmp 71 (~ 72 (atan2 73 (cos 74 (sin 75 (exp 76 (log 77 (sqrt 78 (x 79 (x= 80 (. 81 (.= 82 (~~ 83 DESTROY 84#; 85 86our @enums = qw# 87 fallback 88 to_sv 89 to_av 90 to_hv 91 to_gv 92 to_cv 93 inc 94 dec 95 bool_ 96 numer 97 string 98 not 99 copy 100 abs 101 neg 102 iter 103 int 104 lt 105 le 106 gt 107 ge 108 eq 109 ne 110 slt 111 sle 112 sgt 113 sge 114 seq 115 sne 116 nomethod 117 add 118 add_ass 119 subtr 120 subtr_ass 121 mult 122 mult_ass 123 div 124 div_ass 125 modulo 126 modulo_ass 127 pow 128 pow_ass 129 lshift 130 lshift_ass 131 rshift 132 rshift_ass 133 band 134 band_ass 135 bor 136 bor_ass 137 bxor 138 bxor_ass 139 ncmp 140 scmp 141 compl 142 atan2 143 cos 144 sin 145 exp 146 log 147 sqrt 148 repeat 149 repeat_ass 150 concat 151 concat_ass 152 smart 153 DESTROY 154#; 155 156{ my $i = 0; our %names = map { $_ => $i++ } @names } 157 158{ my $i = 0; our %enums = map { $_ => $i++ } @enums } 159 160