Lines Matching refs:skip
2098 my @skip = ();
2112 if (! @skip || $skip[$#skip] > 0) {
2113 push @skip, !! $expand_variables->($+{COND});
2115 push @skip, -1;
2119 => sub { die "ELSIF out of scope" if ! @skip;
2120 die "ELSIF following ELSE" if abs($skip[$#skip]) == 2;
2121 $skip[$#skip] = -1 if $skip[$#skip] != 0;
2122 $skip[$#skip] = !! $expand_variables->($+{COND})
2123 if $skip[$#skip] == 0; },
2125 => sub { die "ELSE out of scope" if ! @skip;
2126 $skip[$#skip] = -2 if $skip[$#skip] != 0;
2127 $skip[$#skip] = 2 if $skip[$#skip] == 0; },
2129 => sub { die "ENDIF out of scope" if ! @skip;
2130 pop @skip; },
2133 if (!@skip || $skip[$#skip] > 0) {
2139 if (!@skip || $skip[$#skip] > 0) {
2149 if !@skip || $skip[$#skip] > 0; },
2154 if !@skip || $skip[$#skip] > 0; },
2159 if !@skip || $skip[$#skip] > 0; },
2164 if !@skip || $skip[$#skip] > 0; },
2169 if !@skip || $skip[$#skip] > 0; },
2174 if !@skip || $skip[$#skip] > 0; },
2179 if !@skip || $skip[$#skip] > 0; },
2184 if !@skip || $skip[$#skip] > 0; },
2189 if !@skip || $skip[$#skip] > 0; },
2194 if !@skip || $skip[$#skip] > 0; },
2199 if !@skip || $skip[$#skip] > 0; },
2204 if !@skip || $skip[$#skip] > 0; },
2209 if !@skip || $skip[$#skip] > 0; },
2215 … print STDERR "DEBUG: ... before parsing, skip stack is ",join(" ", map { int($_) } @skip),"\n";
2220 … print STDERR "DEBUG: .... after parsing, skip stack is ",join(" ", map { int($_) } @skip),"\n";
2224 die "runaway IF?" if (@skip);