is_fortfile
int is_fortfile(char *, char **, int);
!is_fortfile(path, &fp->datfile, (parent != NULL))))
if (!is_fortfile(offensive, &datfile, 0))