void _error_(byte *s,byte a) {
  printf("Error:%s\n",s);
  if (a) {
    printf("File:%d\n",buffn[ch]);
    printf("Line:%d\n",bufln[ch]);
  }
  flush();
  if (ho1on) close(ho1);
  unlink("c.tmp");
  exit(2);
}

void errorf(byte *s) {
  _error_(s,1);
}

void error(byte *s) {
  _error_(s,0);
}