summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-05-11 14:08:20 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-11 14:08:20 +0000
commit3a3c44472a318717ec0cdc0a7f768125ae0f001f (patch)
tree5e068b0d32d9904e2ad08658e1039a9e19088d72 /t
parentc80f55d1ea34dba13189e54d4f4e9bce7de39357 (diff)
downloadperl-3a3c44472a318717ec0cdc0a7f768125ae0f001f.tar.gz
Remove the 'asciir' re subpragma. Should instead implement
the 'physical vs logical' range scheme: \xAA-\xCC is a native physical range, you want that range of codepoints in your native encoding. In EBCDIC the codepoints in the gaps (between i-j and r-s) should be included. \x{AA}-\x{CC} is a physical Unicode range, you want that range of codepoints in Unicode. a-z is a logical range, you want that range of 'logical' codepoints in your native encoding. In EBCDIC the codepoints in the gaps (between i-j and r-s) should not be included. Mixed cases (a-\xAA, etc) should either be errors, or maybe the 'logical' endpoints should be converted to native/Unicode codepoints, and the range handled as a physical range. 'Logical endpoints' are to be recognized only in the A-Z, a-z, and 0-9 ranges. Probably a warning should be given for mixed cases like A-z or a-9 (since such expressions are encoding dependent), with a recommendation to use physical ranges. p4raw-id: //depot/perl@10085
Diffstat (limited to 't')
-rwxr-xr-xt/op/pat.t2
-rwxr-xr-xt/op/regexp.t2
2 files changed, 0 insertions, 4 deletions
diff --git a/t/op/pat.t b/t/op/pat.t
index 1be72346f8..0df4d786ee 100755
--- a/t/op/pat.t
+++ b/t/op/pat.t
@@ -13,8 +13,6 @@ BEGIN {
@INC = '../lib';
}
-use re 'asciirange'; # Compute ranges in ASCII space
-
eval 'use Config'; # Defaults assumed if this fails
$x = "abc\ndef\n";
diff --git a/t/op/regexp.t b/t/op/regexp.t
index 0b81e714a9..4a4d42fd98 100755
--- a/t/op/regexp.t
+++ b/t/op/regexp.t
@@ -36,8 +36,6 @@ BEGIN {
@INC = '../lib';
}
-use re 'asciirange'; # ranges are computed in ASCII
-
$iters = shift || 1; # Poor man performance suite, 10000 is OK.
open(TESTS,'op/re_tests') || open(TESTS,'t/op/re_tests') ||