summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2013-06-21 11:26:26 -0700
committerFather Chrysostomos <sprout@cpan.org>2013-06-21 12:38:52 -0700
commit8922e4382e9c1488fdbe46a0f52493860dc897a6 (patch)
tree8d205f21057b634161797c5e5ff79e75e5ef79f2 /util.c
parent771cc755419212f6b1b78673650a3a2e499c2908 (diff)
downloadperl-8922e4382e9c1488fdbe46a0f52493860dc897a6.tar.gz
Remove BmRARE and BmPREVIOUS
These were only used by the study code, which was disabled in 5.16.0 and removed shortly thereafter.
Diffstat (limited to 'util.c')
-rw-r--r--util.c4
1 files changed, 1 insertions, 3 deletions
diff --git a/util.c b/util.c
index 01acc83bd3..d8b3d33b59 100644
--- a/util.c
+++ b/util.c
@@ -593,13 +593,11 @@ Perl_fbm_compile(pTHX_ SV *sv, U32 flags)
frequency = PL_freq[s[i]];
}
}
- BmRARE(sv) = s[rarest];
- BmPREVIOUS(sv) = rarest;
BmUSEFUL(sv) = 100; /* Initial value */
if (flags & FBMcf_TAIL)
SvTAIL_on(sv);
DEBUG_r(PerlIO_printf(Perl_debug_log, "rarest char %c at %"UVuf"\n",
- BmRARE(sv), BmPREVIOUS(sv)));
+ s[rarest], rarest));
}
/* If SvTAIL(littlestr), it has a fake '\n' at end. */