This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Update TOC for perl51310delta
[perl5.git] / lib / overload / numbers.pm
CommitLineData
e46c382e
YK
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 !!!!!!!
1de57daf 11# This file is built by regen/overload.pl
e46c382e
YK
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 (~~
9846fe22 83 (-X
d9151963 84 (qr
e46c382e
YK
85 DESTROY
86#;
87
88our @enums = qw#
89 fallback
90 to_sv
91 to_av
92 to_hv
93 to_gv
94 to_cv
95 inc
96 dec
97 bool_
98 numer
99 string
100 not
101 copy
102 abs
103 neg
104 iter
105 int
106 lt
107 le
108 gt
109 ge
110 eq
111 ne
112 slt
113 sle
114 sgt
115 sge
116 seq
117 sne
118 nomethod
119 add
120 add_ass
121 subtr
122 subtr_ass
123 mult
124 mult_ass
125 div
126 div_ass
127 modulo
128 modulo_ass
129 pow
130 pow_ass
131 lshift
132 lshift_ass
133 rshift
134 rshift_ass
135 band
136 band_ass
137 bor
138 bor_ass
139 bxor
140 bxor_ass
141 ncmp
142 scmp
143 compl
144 atan2
145 cos
146 sin
147 exp
148 log
149 sqrt
150 repeat
151 repeat_ass
152 concat
153 concat_ass
154 smart
9846fe22 155 ftest
d9151963 156 regexp
e46c382e
YK
157 DESTROY
158#;
159
d87d3eed 160{ my $i = 0; our %names = map { $_ => $i++ } @names }
e46c382e 161
d87d3eed 162{ my $i = 0; our %enums = map { $_ => $i++ } @enums }
e46c382e 163