This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(from parent 1:
b3f5669
)
Add $^E and $^O to special vars, and change run to runops
author
Perl 5 Porters
<perl5-porters@africa.nicoh.com>
Mon, 11 Mar 1996 08:02:40 +0000
(08:02 +0000)
committer
Charles Bailey
<bailey@genetics.upenn.edu>
Mon, 11 Mar 1996 08:02:40 +0000
(08:02 +0000)
gv.c
patch
|
blob
|
blame
|
history
diff --git
a/gv.c
b/gv.c
index
8cf552a
..
dc6d2e5
100644
(file)
--- a/
gv.c
+++ b/
gv.c
@@
-606,8
+606,10
@@
I32 sv_type;
case '|':
case '\001':
case '\004':
+ case '\005':
case '\006':
case '\010':
+ case '\017':
case '\t':
case '\020':
case '\024':
@@
-1144,7
+1146,7
@@
int flags;
PUTBACK;
if (op = pp_entersub())
- run();
+ run
ops
();
LEAVE;
SPAGAIN;