summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-05-03 22:01:41 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-05-03 22:01:41 +0000
commit712d05cf9bbf674929d5e38c5bb989d87c51f19b (patch)
tree2996ff933b30ab9796ddc54b982a3ec69d37de19 /toke.c
parent952306aca140c014b38ba5eb2ed71dffaa548f0f (diff)
downloadperl-712d05cf9bbf674929d5e38c5bb989d87c51f19b.tar.gz
Add "state" feature
p4raw-id: //depot/perl@28087
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index 3700e342ba..23f801e352 100644
--- a/toke.c
+++ b/toke.c
@@ -8144,7 +8144,7 @@ Perl_keyword (pTHX_ const char *name, I32 len)
if (name[3] == 't' &&
name[4] == 'e')
{ /* state */
- return KEY_state;
+ return (FEATURE_IS_ENABLED("state") ? KEY_state : 0);
}
goto unknown;