🚀 go-pugleaf

In article <36699C17.8EE47C9C@eunet.at>,
  "Ing. Franz Glaser" <meg-glaser@eunet.at> wrote:
> Robert AH Prins wrote:
> >
> > Yes, it is!
> ....
> This was a doubtful idea only. Let me make a more professional
> suggestion:
>
> Open/create as many files as you need, and send the appropriate
> file to your procedures as a Var parameter or even berrer as a
> pointer to the file. This makes it unnecessary to open and
> close them so frequently.
>
> Var ProtFiles : Array[1..xxx] of Text;
>     PT     : ^Text;
>
> Procedure AnyProc;
> Begin
>   Writeln(PT^,...);
> End;
>
>   PT^ := @ProtFiles[3];
>   AnyProc;
>
> In case the file handles exhausted, look for the article in the
> TP-links site, FAQ-page, about >15 handles.

Thanks Franz,

As useful as this may be, it is unuseful in his particular case, as I don't
have enough heap left over to allocate buffers for both files at the same
time, unless I give them only 4K.

Robert
--
Robert AH Prins
prinsra@williscorroon.com

-----------== Posted via Deja News, The Discussion Network ==----------
http://www.dejanews.com/       Search, Read, Discuss, or Start Your Own