tie array changes to core and tests

p4raw-id: //depot/ansiperl@418

1 files changed, 4 insertions, 4 deletions

diff --git a/toke.c b/toke.c
index 6773f3f13c..42da6a9b2e 100644
--- a/toke.c
+++ b/toke.c
@@ -1120,10 +1120,10 @@ filter_del(filter_t funcp)
 {
     if (filter_debug)
 	warn("filter_del func %p", funcp);
-    if (!rsfp_filters || AvFILL(rsfp_filters)<0)
+    if (!rsfp_filters || AvFILLp(rsfp_filters)<0)
 	return;
     /* if filter is on top of stack (usual case) just pop it off */
-    if (IoDIRP(FILTER_DATA(AvFILL(rsfp_filters))) == (void*)funcp){
+    if (IoDIRP(FILTER_DATA(AvFILLp(rsfp_filters))) == (void*)funcp){
 	sv_free(av_pop(rsfp_filters));
 
         return;
@@ -1145,7 +1145,7 @@ filter_read(int idx, SV *buf_sv, int maxlen)
 
     if (!rsfp_filters)
 	return -1;
-    if (idx > AvFILL(rsfp_filters)){       /* Any more filters?	*/
+    if (idx > AvFILLp(rsfp_filters)){       /* Any more filters?	*/
 	/* Provide a default input filter to make life easy.	*/
 	/* Note that we append to the line. This is handy.	*/
 	if (filter_debug)
@@ -1503,7 +1503,7 @@ yylex(void)
 	    if (SvCUR(linestr))
 		sv_catpv(linestr,";");
 	    if (preambleav){
-		while(AvFILL(preambleav) >= 0) {
+		while(AvFILLp(preambleav) >= 0) {
 		    SV *tmpsv = av_shift(preambleav);
 		    sv_catsv(linestr, tmpsv);
 		    sv_catpv(linestr, ";");