vi/v_at.c: add missing string.h include for memmove
[nvi.git] / perl_scripts / forall.pl
blobb9f85013b17ded1b605eff4ef7857188f30835df
1 sub forall {
2 my ($code) = shift;
3 my ($i) = $VI::StartLine-1;
4 while (++$i <= $VI::StopLine) {
5 $_ = $curscr->GetLine($i);
6 VI::SetLine($VI::ScreenId, $i, $_) if(&$code);