void deletechar() /**/
{
if (mult < 0) { mult = -mult; backwarddeletechar(); return; }
if (c == 4 && !ll)
{
eofsent = 1;
return;
}
if (!(cs+mult > ll || line[cs] == '\n'))
{
cs += mult;
backdel(mult);
}
else
feep();
}
int
deletechar(char **args)
{
int n;
if (zmult < 0) {
int ret;
zmult = -zmult;
ret = backwarddeletechar(args);
zmult = -zmult;
return ret;
}
n = zmult;
while (n--) {
if (zlecs == zlell)
return 1;
INCCS();
}
backdel(zmult, 0);
return 0;
}