Path: utzoo!attcan!uunet!nih-csl!lhc!adm!news
From: 20950709%VUVAXCOM.BITNET@pucc.princeton.edu
Newsgroups: comp.lang.pascal
Subject: Turning off the EOF flag in VAX Pascal
Message-ID: <24637@adm.BRL.MIL>
Date: 27 Sep 90 19:55:49 GMT
Sender: news@adm.BRL.MIL
Lines: 22


        I have run into an interesting little problem using standard input in
VAX Pascal.  The problem involves reading an End-Of-File from standard input
(ie. [Control][Z]) and then trying to read another command from standard input.
I realize that this goes against the definition of the EOF concept, but lots of
users go against many more definitions.  Consider the following code segment
(assume all variable-type declarations are appropriate):

        If (Not(EOF)) Then Read (First-Try);
        .
        .
        .
        If (Not(EOF)) Then Read (Second-Try);

The problem that I encounter is that if the user presses [Control][Z] when
trying to read "First-Try", there doesn't appear to be any chance of getting to
read "Second-Try".  Is there some way of setting EOF back to FALSE again?
Thanks for any help that you can provide to me.

                                                Have a good day,

                                                Jim.