Click above to get retro games delivered to your door ever month!

 fclose()            Close an open text file
------------------------------------------------------------------------------
 Declaration
   fileio.hdr

 Syntax
   proc fclose extern
   param file fStream

 Arguments
   fStream is the file stream to manipulate.

 Return
   None.

 Description
   The fclose() procedure closes the text file associated with fStream.
   All buffers are flushed to the file before closing.

 Example
   #define EXAMPLE_FILE
   #include example.hdr

   proc Test_fclose
   vardef
      file fTemp
      char cLine
   enddef
   if fopen( fTemp, "c:\autoexec.bat", F_READ, F_TEXT ) // open file
      do while .not. feof( fTemp )                      // to end of file
         fgetln( fTemp, cLine )                         // read a line
         ? cLine                                        // display line
      enddo
      fclose( fTemp )                                   // close file
   endif
   endproc

   proc main
   Test_fclose()
   endproc