/[pspp]/pspp/src/pfm-read.c
ViewVC logotype

Diff of /pspp/src/pfm-read.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.14 by jmd, Tue Jan 18 11:31:45 2005 UTC revision 1.15 by jmd, Mon Jan 31 01:54:57 2005 UTC
# Line 101  corrupt_msg (struct pfm_reader *r, const Line 101  corrupt_msg (struct pfm_reader *r, const
101    return 0;    return 0;
102  }  }
103    
104    static unsigned char * read_string (struct pfm_reader *r);
105    
106  /* Closes a portable file after we're done with it. */  /* Closes a portable file after we're done with it. */
107  void  void
108  pfm_close_reader (struct pfm_reader *r)  pfm_close_reader (struct pfm_reader *r)
# Line 108  pfm_close_reader (struct pfm_reader *r) Line 110  pfm_close_reader (struct pfm_reader *r)
110    if (r == NULL)    if (r == NULL)
111      return;      return;
112    
113      read_string (NULL);
114    
115    if (r->fh != NULL)    if (r->fh != NULL)
116      fh_close (r->fh, "portable file", "rs");      fh_close (r->fh, "portable file", "rs");
117    if (fclose (r->file) == EOF)    if (fclose (r->file) == EOF)

Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26