add missing fclose()