m = feof(id) Integer m; Integer id;
if ((id = fopen("afo", "r")) < 0) { error("Can't open %s", "afo"); } while (length(str = fgets(id))) { printf("%s", str); if (feof(id)) { break; } } fclose(id);