🚀 go-pugleaf

Hi

I am in the process of writing a module that reads an external data file (which
is in a non-AVS format) and outputs data in the AVS field format. The input 
file name is specified with a file name browser. The file is opened, and the
data read into memory with a parser (the data is in the form of a formal grammar).
The user then selects a subset of the data, which is then output in the AVS
field format.

Everything works fine, until the filename parameter is changed. The parser tries
to continue parsing at the end of previous file!? It is as if the previous file
is never closed.

Here is the code. Could some guru please point out my mistake. Please E-mail me
directly.  Oh yes, the module is written as a subroutine.

-----
int read_mbpo_compute( output, infilename, extract)
  AVSfield  **output;
  char       *infilename;
  char       *extract;
{
  FILE *infile=NULL;

  if (!infilename)                     /* if no infilename             */
    return(1);

  if (!(infile = fopen(infilename, "r")))  /* open the input file      */
    {
      AVSerror("Cannot open input file %s", infilename);
      return(0);
    }
  mbpo_read( infile);                  /* parse the input file         */
  fclose( infile);                     /* close the input file         */

  check_extracted_select( extract);    /* mark data to be extracted    */
  write_output( output);               /* write extracted data         */
  return(1);
}
-----

Etienne  

\_\_\_ \_    \_ \_\_\_  \_\_\_\_\_\_\_           Department of Computer Science
 \_     \_    \_ \_   \_ \_\_\_\_\_\_\_\_\_\_\_   University of Stellenbosch
  \_\_   \_    \_ \_\_\_  \_\_\_\_\_\_\_\_         Stellenbosch 7600
   \_      \_ \_   \_      \_\_\_\_\_\_\_\_\_\_\_\_ South Africa
    \_\_\_   \_     \_      \_\_\_\_\_\_\_\_\_\_     Internet: evp@cs.sun.ac.za