This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add overload types for string-specifc bitops
[perl5.git] / lib / overload / numbers.pm
CommitLineData
e46c382e
YK
1# -*- buffer-read-only: t -*-
2#
78102347 3# lib/overload/numbers.pm
e46c382e 4#
78102347 5# Copyright (C) 2008 by Larry Wall and others
e46c382e 6#
78102347
NC
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.
e46c382e
YK
9#
10# !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
78102347
NC
11# This file is built by regen/overload.pl.
12# Any changes made here will be lost!
e46c382e
YK
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 (&=
7dd64841
FC
65 (&.
66 (&.=
e46c382e
YK
67 (|
68 (|=
7dd64841
FC
69 (|.
70 (|.=
e46c382e
YK
71 (^
72 (^=
7dd64841
FC
73 (^.
74 (^.=
e46c382e
YK
75 (<=>
76 (cmp
77 (~
7dd64841 78 (~.
e46c382e
YK
79 (atan2
80 (cos
81 (sin
82 (exp
83 (log
84 (sqrt
85 (x
86 (x=
87 (.
88 (.=
89 (~~
9846fe22 90 (-X
d9151963 91 (qr
e46c382e
YK
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
7dd64841
FC
143 sband
144 sband_ass
e46c382e
YK
145 bor
146 bor_ass
7dd64841
FC
147 sbor
148 sbor_ass
e46c382e
YK
149 bxor
150 bxor_ass
7dd64841
FC
151 sbxor
152 sbxor_ass
e46c382e
YK
153 ncmp
154 scmp
155 compl
7dd64841 156 scompl
e46c382e
YK
157 atan2
158 cos
159 sin
160 exp
161 log
162 sqrt
163 repeat
164 repeat_ass
165 concat
166 concat_ass
167 smart
9846fe22 168 ftest
d9151963 169 regexp
e46c382e
YK
170#;
171
d87d3eed 172{ my $i = 0; our %names = map { $_ => $i++ } @names }
e46c382e 173
d87d3eed 174{ my $i = 0; our %enums = map { $_ => $i++ } @enums }
e46c382e 175
ce716c52 176# ex: set ro: