summaryrefslogtreecommitdiff
path: root/regcomp.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2012-02-04 17:49:10 -0700
committerKarl Williamson <public@khwilliamson.com>2012-02-09 10:13:58 -0700
commitf905da72477ede522be53c2e945a47d46ea80a82 (patch)
tree8c976782ca7321e66651992bb6543db054f254ce /regcomp.c
parent6e80eb23173ade6bdf9d6da43c067fa77e9162a5 (diff)
downloadperl-f905da72477ede522be53c2e945a47d46ea80a82.tar.gz
regcomp.c: Rmv no-longer used variables and code
Diffstat (limited to 'regcomp.c')
-rw-r--r--regcomp.c6
1 files changed, 0 insertions, 6 deletions
diff --git a/regcomp.c b/regcomp.c
index 157e06ed1c..fb10fc3468 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -10784,8 +10784,6 @@ parseit:
}
if (!SIZE_ONLY) {
- const char *what = NULL;
- char yesno = 0;
/* Possible truncation here but in some 64-bit environments
* the compiler gets heartburn about switch on 64-bit values.
@@ -10994,10 +10992,6 @@ parseit:
vFAIL("Invalid [::] class");
break;
}
- if (what && ! (AT_LEAST_ASCII_RESTRICTED)) {
- /* Strings such as "+utf8::isWord\n" */
- Perl_sv_catpvf(aTHX_ listsv, "%cutf8::%s\n", yesno, what);
- }
continue;
}