comparison perl-5.22.2/regen/opcodes @ 8045:a16537d2fe07

<xfix> tar xf perl-5.22.2.tar.gz # Ah, whatever, I\'m doing it anyway
author HackBot
date Sat, 14 May 2016 14:54:38 +0000
parents
children
comparison
equal deleted inserted replaced
8044:711c038a7dce 8045:a16537d2fe07
1 # New ops always go at the end
2 # The restriction on having custom as the last op has been removed
3
4 # A recapitulation of the format of this file:
5 # The file consists of five columns: the name of the op, an English
6 # description, the name of the "check" routine used to optimize this
7 # operation, some flags, and a description of the operands.
8
9 # The flags consist of options followed by a mandatory op class signifier
10
11 # The classes are:
12 # baseop - 0 unop - 1 binop - 2
13 # logop - | listop - @ pmop - /
14 # padop/svop - $ padop - # (unused) loop - {
15 # baseop/unop - % loopexop - } filestatop - -
16 # pvop/svop - " cop - ; methop - .
17 # unop_aux - +
18
19 # Other options are:
20 # needs stack mark - m (OA_MARK)
21 # needs constant folding - f (OA_FOLDCONST)
22 # produces a scalar - s (OA_RETSCALAR)
23 # produces an integer - i (unused)
24 # needs a target - t (OA_TARGET)
25 # target can be in a pad - T (OA_TARGET|OA_TARGLEX)
26 # has a corresponding integer version - I (OA_OTHERINT)
27 # make temp copy in list assignment - d (OA_DANGEROUS)
28 # uses $_ if no argument given - u (OA_DEFGV)
29
30 # Values for the operands are:
31 # scalar - S list - L array - A
32 # hash - H sub (CV) - C file - F
33 # socket - Fs filetest - F- filetest_access - F-+
34 # num-compare - S< dirhandle - DF infix bitwise - S|
35
36 # reference - R
37 # "?" denotes an optional operand.
38
39 # Nothing.
40
41 null null operation ck_null 0
42 stub stub ck_null 0
43 scalar scalar ck_fun s% S
44
45 # Pushy stuff.
46
47 pushmark pushmark ck_null s0
48 wantarray wantarray ck_null is0
49
50 const constant item ck_svconst s$
51
52 gvsv scalar variable ck_null ds$
53 gv glob value ck_null ds$
54 gelem glob elem ck_null ds2 S S
55 padsv private variable ck_null ds0
56 padav private array ck_null d0
57 padhv private hash ck_null d0
58 padany private value ck_null d0
59
60 pushre push regexp ck_null d/
61
62 # References and stuff.
63
64 rv2gv ref-to-glob cast ck_rvconst ds1
65 rv2sv scalar dereference ck_rvconst ds1
66 av2arylen array length ck_null is1
67 rv2cv subroutine dereference ck_rvconst d1
68 anoncode anonymous subroutine ck_anoncode s$
69 prototype subroutine prototype ck_prototype su% S?
70 refgen reference constructor ck_spair m1 L
71 srefgen single ref constructor ck_null fs1 S
72 ref reference-type operator ck_fun stu% S?
73 bless bless ck_fun s@ S S?
74
75 # Pushy I/O.
76
77 backtick quoted execution (``, qx) ck_backtick tu% S?
78 # glob defaults its first arg to $_
79 glob glob ck_glob t@ S?
80 readline <HANDLE> ck_readline t% F?
81 rcatline append I/O operator ck_null t$
82
83 # Bindable operators.
84
85 regcmaybe regexp internal guard ck_fun s1 S
86 regcreset regexp internal reset ck_fun s1 S
87 regcomp regexp compilation ck_null s| S
88 match pattern match (m//) ck_match /
89 qr pattern quote (qr//) ck_match s/
90 subst substitution (s///) ck_match is/ S
91 substcont substitution iterator ck_null is|
92 trans transliteration (tr///) ck_match is" S
93 # y///r
94 transr transliteration (tr///) ck_match is" S
95
96 # Lvalue operators.
97 # sassign is special-cased for op class
98
99 sassign scalar assignment ck_sassign s0
100 aassign list assignment ck_null t2 L L
101
102 chop chop ck_spair mts% L
103 schop scalar chop ck_null stu% S?
104 chomp chomp ck_spair mTs% L
105 schomp scalar chomp ck_null sTu% S?
106 defined defined operator ck_defined isu% S?
107 undef undef operator ck_fun s% R?
108 study study ck_fun su% S?
109 pos match position ck_fun stu% R?
110
111 preinc preincrement (++) ck_lfun dIs1 S
112 i_preinc integer preincrement (++) ck_lfun dis1 S
113 predec predecrement (--) ck_lfun dIs1 S
114 i_predec integer predecrement (--) ck_lfun dis1 S
115 postinc postincrement (++) ck_lfun Ist1 S
116 i_postinc integer postincrement (++) ck_lfun ist1 S
117 postdec postdecrement (--) ck_lfun Ist1 S
118 i_postdec integer postdecrement (--) ck_lfun ist1 S
119
120 # Ordinary operators.
121
122 pow exponentiation (**) ck_null fsT2 S S
123
124 multiply multiplication (*) ck_null IfsT2 S S
125 i_multiply integer multiplication (*) ck_null ifsT2 S S
126 divide division (/) ck_null IfsT2 S S
127 i_divide integer division (/) ck_null ifsT2 S S
128 modulo modulus (%) ck_null IifsT2 S S
129 i_modulo integer modulus (%) ck_null ifsT2 S S
130 repeat repeat (x) ck_repeat fmt2 L S
131
132 add addition (+) ck_null IfsT2 S S
133 i_add integer addition (+) ck_null ifsT2 S S
134 subtract subtraction (-) ck_null IfsT2 S S
135 i_subtract integer subtraction (-) ck_null ifsT2 S S
136 concat concatenation (.) or string ck_concat fsT2 S S
137 stringify string ck_stringify fsT@ S
138
139 left_shift left bitshift (<<) ck_bitop fsT2 S S
140 right_shift right bitshift (>>) ck_bitop fsT2 S S
141
142 lt numeric lt (<) ck_cmp Iifs2 S S<
143 i_lt integer lt (<) ck_cmp ifs2 S S<
144 gt numeric gt (>) ck_cmp Iifs2 S S<
145 i_gt integer gt (>) ck_cmp ifs2 S S<
146 le numeric le (<=) ck_cmp Iifs2 S S<
147 i_le integer le (<=) ck_cmp ifs2 S S<
148 ge numeric ge (>=) ck_cmp Iifs2 S S<
149 i_ge integer ge (>=) ck_cmp ifs2 S S<
150 eq numeric eq (==) ck_null Iifs2 S S<
151 i_eq integer eq (==) ck_null ifs2 S S<
152 ne numeric ne (!=) ck_null Iifs2 S S<
153 i_ne integer ne (!=) ck_null ifs2 S S<
154 ncmp numeric comparison (<=>) ck_null Iifst2 S S<
155 i_ncmp integer comparison (<=>) ck_null ifst2 S S<
156
157 slt string lt ck_null ifs2 S S
158 sgt string gt ck_null ifs2 S S
159 sle string le ck_null ifs2 S S
160 sge string ge ck_null ifs2 S S
161 seq string eq ck_null ifs2 S S
162 sne string ne ck_null ifs2 S S
163 scmp string comparison (cmp) ck_null ifst2 S S
164
165 bit_and bitwise and (&) ck_bitop fst2 S S|
166 bit_xor bitwise xor (^) ck_bitop fst2 S S|
167 bit_or bitwise or (|) ck_bitop fst2 S S|
168 nbit_and numeric bitiwse and (&) ck_bitop fsT2 S S|
169 nbit_xor numeric bitwise xor (^) ck_bitop fsT2 S S|
170 nbit_or numeric bitwise or (|) ck_bitop fsT2 S S|
171 sbit_and string bitiwse and (&) ck_bitop fst2 S S|
172 sbit_xor string bitwise xor (^) ck_bitop fst2 S S|
173 sbit_or string bitwise or (|) ck_bitop fst2 S S|
174
175 negate negation (-) ck_null Ifst1 S
176 i_negate integer negation (-) ck_null ifst1 S
177 not not ck_null ifs1 S
178 complement 1's complement (~) ck_bitop fst1 S
179 ncomplement numeric 1's complement (~) ck_bitop fsT1 S
180 # scomplement uses ck_bitop only for the experimental warning. Once the
181 # warning is gone, this can change to ck_null.
182 scomplement string 1's complement (~) ck_bitop fsT1 S
183
184 smartmatch smart match ck_smartmatch s2
185
186 # High falutin' math.
187
188 atan2 atan2 ck_fun fsT@ S S
189 sin sin ck_fun fsTu% S?
190 cos cos ck_fun fsTu% S?
191 rand rand ck_fun sT% S?
192 srand srand ck_fun sT% S?
193 exp exp ck_fun fsTu% S?
194 log log ck_fun fsTu% S?
195 sqrt sqrt ck_fun fsTu% S?
196
197 # Lowbrow math.
198
199 int int ck_fun fsTu% S?
200 hex hex ck_fun fsTu% S?
201 oct oct ck_fun fsTu% S?
202 abs abs ck_fun fsTu% S?
203
204 # String stuff.
205
206 length length ck_length ifsTu% S?
207 substr substr ck_substr st@ S S S? S?
208 vec vec ck_fun ist@ S S S
209
210 index index ck_index isT@ S S S?
211 rindex rindex ck_index isT@ S S S?
212
213 sprintf sprintf ck_lfun fmst@ S L
214 formline formline ck_fun ms@ S L
215 ord ord ck_fun ifsTu% S?
216 chr chr ck_fun fsTu% S?
217 crypt crypt ck_fun fsT@ S S
218 ucfirst ucfirst ck_fun fstu% S?
219 lcfirst lcfirst ck_fun fstu% S?
220 uc uc ck_fun fstu% S?
221 lc lc ck_fun fstu% S?
222 quotemeta quotemeta ck_fun fstu% S?
223
224 # Arrays.
225
226 rv2av array dereference ck_rvconst dt1
227 aelemfast constant array element ck_null ds$ A S
228 aelemfast_lex constant lexical array element ck_null d0 A S
229 aelem array element ck_null s2 A S
230 aslice array slice ck_null m@ A L
231 kvaslice index/value array slice ck_null m@ A L
232
233 aeach each on array ck_each d% A
234 akeys keys on array ck_each t% A
235 avalues values on array ck_each dt% A
236
237 # Hashes.
238
239 each each ck_each d% H
240 values values ck_each dt% H
241 keys keys ck_each t% H
242 delete delete ck_delete % S
243 exists exists ck_exists is% S
244 rv2hv hash dereference ck_rvconst d1
245 helem hash element ck_null s2 H S
246 hslice hash slice ck_null m@ H L
247 kvhslice key/value hash slice ck_null m@ H L
248
249 # mixed array and hash access
250
251 multideref array or hash lookup ck_null ds+
252
253 # Explosives and implosives.
254
255 unpack unpack ck_fun u@ S S?
256 pack pack ck_fun fmst@ S L
257 split split ck_split t@ S S S
258 join join or string ck_join fmst@ S L
259
260 # List operators.
261
262 list list ck_null m@ L
263 lslice list slice ck_null 2 H L L
264 anonlist anonymous array ([]) ck_fun ms@ L
265 anonhash anonymous hash ({}) ck_fun ms@ L
266
267 splice splice ck_fun m@ A S? S? L
268 push push ck_fun imsT@ A L
269 pop pop ck_shift s% A?
270 shift shift ck_shift s% A?
271 unshift unshift ck_fun imsT@ A L
272 sort sort ck_sort m@ C? L
273 reverse reverse ck_fun mt@ L
274
275 grepstart grep ck_grep m@ C L
276 grepwhile grep iterator ck_null t|
277
278 mapstart map ck_grep m@ C L
279 mapwhile map iterator ck_null t|
280
281 # Range stuff.
282
283 range flipflop ck_null | S S
284 flip range (or flip) ck_null 1 S S
285 flop range (or flop) ck_null 1
286
287 # Control.
288
289 and logical and (&&) ck_null |
290 or logical or (||) ck_null |
291 xor logical xor ck_null fs2 S S
292 dor defined or (//) ck_null |
293 cond_expr conditional expression ck_null |
294 andassign logical and assignment (&&=) ck_null s|
295 orassign logical or assignment (||=) ck_null s|
296 dorassign defined or assignment (//=) ck_null s|
297
298 method method lookup ck_method d.
299 entersub subroutine entry ck_subr dm1 L
300 leavesub subroutine exit ck_null 1
301 leavesublv lvalue subroutine return ck_null 1
302 caller caller ck_fun t% S?
303 warn warn ck_fun imst@ L
304 die die ck_fun imst@ L
305 reset symbol reset ck_fun is% S?
306
307 lineseq line sequence ck_null @
308 nextstate next statement ck_null s;
309 dbstate debug next statement ck_null s;
310 unstack iteration finalizer ck_null s0
311 enter block entry ck_null 0
312 leave block exit ck_null @
313 scope block ck_null @
314 enteriter foreach loop entry ck_null d{
315 iter foreach loop iterator ck_null 0
316 enterloop loop entry ck_null d{
317 leaveloop loop exit ck_null 2
318 return return ck_return m@ L
319 last last ck_null s}
320 next next ck_null s}
321 redo redo ck_null s}
322 dump dump ck_null ds}
323 goto goto ck_null s}
324 exit exit ck_fun s% S?
325 method_named method with known name ck_null d.
326 method_super super with known name ck_null d.
327 method_redir redirect method with known name ck_null d.
328 method_redir_super redirect super method with known name ck_null d.
329
330 entergiven given() ck_null d|
331 leavegiven leave given block ck_null 1
332 enterwhen when() ck_null d|
333 leavewhen leave when block ck_null 1
334 break break ck_null 0
335 continue continue ck_null 0
336
337 # I/O.
338
339 open open ck_open ismt@ F S? L
340 close close ck_fun is% F?
341 pipe_op pipe ck_fun is@ F F
342
343 fileno fileno ck_fun ist% F
344 umask umask ck_fun ist% S?
345 binmode binmode ck_fun s@ F S?
346
347 tie tie ck_fun idms@ R S L
348 untie untie ck_fun is% R
349 tied tied ck_fun ds% R
350 dbmopen dbmopen ck_fun is@ H S S
351 dbmclose dbmclose ck_fun is% H
352
353 sselect select system call ck_select t@ S S S S
354 select select ck_select st@ F?
355
356 getc getc ck_eof st% F?
357 read read ck_fun imst@ F R S S?
358 enterwrite write ck_fun is% F?
359 leavewrite write exit ck_null 1
360
361 prtf printf ck_listiob ims@ F? L
362 print print ck_listiob ims@ F? L
363 say say ck_listiob ims@ F? L
364
365 sysopen sysopen ck_fun s@ F S S S?
366 sysseek sysseek ck_fun s@ F S S
367 sysread sysread ck_fun imst@ F R S S?
368 syswrite syswrite ck_fun imst@ F S S? S?
369
370 eof eof ck_eof is% F?
371 tell tell ck_tell st% F?
372 seek seek ck_tell s@ F S S
373 # truncate really behaves as if it had both "S S" and "F S"
374 truncate truncate ck_trunc is@ S S
375
376 fcntl fcntl ck_fun st@ F S S
377 ioctl ioctl ck_fun st@ F S S
378 flock flock ck_fun isT@ F S
379
380 # Sockets. OP_IS_SOCKET wants them consecutive (so moved 1st 2)
381
382 send send ck_fun imst@ Fs S S S?
383 recv recv ck_fun imst@ Fs R S S
384
385 socket socket ck_fun is@ Fs S S S
386 sockpair socketpair ck_fun is@ Fs Fs S S S
387
388 bind bind ck_fun is@ Fs S
389 connect connect ck_fun is@ Fs S
390 listen listen ck_fun is@ Fs S
391 accept accept ck_fun ist@ Fs Fs
392 shutdown shutdown ck_fun ist@ Fs S
393
394 gsockopt getsockopt ck_fun is@ Fs S S
395 ssockopt setsockopt ck_fun is@ Fs S S S
396
397 getsockname getsockname ck_fun is% Fs
398 getpeername getpeername ck_fun is% Fs
399
400 # Stat calls. OP_IS_FILETEST wants them consecutive.
401
402 lstat lstat ck_ftst u- F?
403 stat stat ck_ftst u- F?
404 ftrread -R ck_ftst isu- F-+
405 ftrwrite -W ck_ftst isu- F-+
406 ftrexec -X ck_ftst isu- F-+
407 fteread -r ck_ftst isu- F-+
408 ftewrite -w ck_ftst isu- F-+
409 fteexec -x ck_ftst isu- F-+
410 ftis -e ck_ftst isu- F-
411 ftsize -s ck_ftst istu- F-
412 ftmtime -M ck_ftst stu- F-
413 ftatime -A ck_ftst stu- F-
414 ftctime -C ck_ftst stu- F-
415 ftrowned -O ck_ftst isu- F-
416 fteowned -o ck_ftst isu- F-
417 ftzero -z ck_ftst isu- F-
418 ftsock -S ck_ftst isu- F-
419 ftchr -c ck_ftst isu- F-
420 ftblk -b ck_ftst isu- F-
421 ftfile -f ck_ftst isu- F-
422 ftdir -d ck_ftst isu- F-
423 ftpipe -p ck_ftst isu- F-
424 ftsuid -u ck_ftst isu- F-
425 ftsgid -g ck_ftst isu- F-
426 ftsvtx -k ck_ftst isu- F-
427 ftlink -l ck_ftst isu- F-
428 fttty -t ck_ftst is- F-
429 fttext -T ck_ftst isu- F-
430 ftbinary -B ck_ftst isu- F-
431
432 # File calls.
433
434 # chdir really behaves as if it had both "S?" and "F?"
435 chdir chdir ck_trunc isT% S?
436 chown chown ck_fun imsT@ L
437 chroot chroot ck_fun isTu% S?
438 unlink unlink ck_fun imsTu@ L
439 chmod chmod ck_fun imsT@ L
440 utime utime ck_fun imsT@ L
441 rename rename ck_fun isT@ S S
442 link link ck_fun isT@ S S
443 symlink symlink ck_fun isT@ S S
444 readlink readlink ck_fun stu% S?
445 mkdir mkdir ck_fun isTu@ S? S?
446 rmdir rmdir ck_fun isTu% S?
447
448 # Directory calls.
449
450 open_dir opendir ck_fun is@ F S
451 readdir readdir ck_fun % DF
452 telldir telldir ck_fun st% DF
453 seekdir seekdir ck_fun s@ DF S
454 rewinddir rewinddir ck_fun s% DF
455 closedir closedir ck_fun is% DF
456
457 # Process control.
458
459 fork fork ck_null ist0
460 wait wait ck_null isT0
461 waitpid waitpid ck_fun isT@ S S
462 system system ck_exec imsT@ S? L
463 exec exec ck_exec imsT@ S? L
464 kill kill ck_fun imsT@ L
465 getppid getppid ck_null isT0
466 getpgrp getpgrp ck_fun isT% S?
467 setpgrp setpgrp ck_fun isT@ S? S?
468 getpriority getpriority ck_fun isT@ S S
469 setpriority setpriority ck_fun isT@ S S S
470
471 # Time calls.
472
473 time time ck_null isT0
474 tms times ck_null 0
475 localtime localtime ck_fun t% S?
476 gmtime gmtime ck_fun t% S?
477 alarm alarm ck_fun istu% S?
478 sleep sleep ck_fun isT% S?
479
480 # Shared memory.
481
482 shmget shmget ck_fun imst@ S S S
483 shmctl shmctl ck_fun imst@ S S S
484 shmread shmread ck_fun imst@ S S S S
485 shmwrite shmwrite ck_fun imst@ S S S S
486
487 # Message passing.
488
489 msgget msgget ck_fun imst@ S S
490 msgctl msgctl ck_fun imst@ S S S
491 msgsnd msgsnd ck_fun imst@ S S S
492 msgrcv msgrcv ck_fun imst@ S S S S S
493
494 # Semaphores.
495
496 semop semop ck_fun imst@ S S
497 semget semget ck_fun imst@ S S S
498 semctl semctl ck_fun imst@ S S S S
499
500 # Eval.
501
502 require require ck_require dsu% S?
503 dofile do "file" ck_fun d1 S
504 hintseval eval hints ck_svconst s$
505 entereval eval "string" ck_eval du% S?
506 leaveeval eval "string" exit ck_null 1 S
507 entertry eval {block} ck_eval d|
508 leavetry eval {block} exit ck_null @
509
510 # Get system info.
511
512 ghbyname gethostbyname ck_fun % S
513 ghbyaddr gethostbyaddr ck_fun @ S S
514 ghostent gethostent ck_null 0
515 gnbyname getnetbyname ck_fun % S
516 gnbyaddr getnetbyaddr ck_fun @ S S
517 gnetent getnetent ck_null 0
518 gpbyname getprotobyname ck_fun % S
519 gpbynumber getprotobynumber ck_fun @ S
520 gprotoent getprotoent ck_null 0
521 gsbyname getservbyname ck_fun @ S S
522 gsbyport getservbyport ck_fun @ S S
523 gservent getservent ck_null 0
524 shostent sethostent ck_fun is% S
525 snetent setnetent ck_fun is% S
526 sprotoent setprotoent ck_fun is% S
527 sservent setservent ck_fun is% S
528 ehostent endhostent ck_null is0
529 enetent endnetent ck_null is0
530 eprotoent endprotoent ck_null is0
531 eservent endservent ck_null is0
532 gpwnam getpwnam ck_fun % S
533 gpwuid getpwuid ck_fun % S
534 gpwent getpwent ck_null 0
535 spwent setpwent ck_null is0
536 epwent endpwent ck_null is0
537 ggrnam getgrnam ck_fun % S
538 ggrgid getgrgid ck_fun % S
539 ggrent getgrent ck_null 0
540 sgrent setgrent ck_null is0
541 egrent endgrent ck_null is0
542 getlogin getlogin ck_null st0
543
544 # Miscellaneous.
545
546 syscall syscall ck_fun imst@ S L
547
548 # For multi-threading
549 lock lock ck_rfun s% R
550
551 # For state support
552
553 once once ck_null |
554
555 custom unknown custom operator ck_null 0
556
557 # For smart dereference for each/keys/values
558 reach each on reference ck_each d% S
559 rkeys keys on reference ck_each t% S
560 rvalues values on reference ck_each dt% S
561
562 # For CORE:: subs
563 coreargs CORE:: subroutine ck_null $
564
565 runcv __SUB__ ck_null s0
566
567 # fc and \F
568 fc fc ck_fun fstu% S?
569
570 padcv private subroutine ck_null d0
571 introcv private subroutine ck_null d0
572 clonecv private subroutine ck_null d0
573 padrange list of private variables ck_null d0
574 refassign lvalue ref assignment ck_refassign ds2
575 lvref lvalue ref assignment ck_null d%
576 lvrefslice lvalue ref assignment ck_null d@
577 lvavref lvalue array reference ck_null d%
578 anonconst anonymous constant ck_null ds1