1. Forum
  2. Usenet
  3. COMP.LANG.PL1

  • Re: Dimensioned file constants

    From Robin Vowels@21:1/5 to bearlyabus...@gmail.com on Tue Sep 13 11:02:45 2022
    On Wednesday, September 14, 2022 at 3:51:09 AM UTC+10, bearlyabus...@gmail.com wrote:
    I have actually seen this used once. I tried to port a program that used constructs like:
    “ON ENDFILE <array expression> …”
    .
    What? You'd need to have a file name somewhere.
    .
    and just gave up and decided to keep compiling it with PL/I(F).

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From Peter Flass@21:1/5 to All on Tue Sep 13 10:51:07 2022
    I have actually seen this used once. I tried to port a program that used constructs like:
    “ON ENDFILE <array expression> …”
    and just gave up and decided to keep compiling it with PL/I(F).


    --
    Pete

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From Peter Flass@21:1/5 to Robin Vowels on Tue Sep 13 15:42:27 2022
    Robin Vowels <robin.vowels@gmail.com> wrote:
    On Wednesday, September 14, 2022 at 3:51:09 AM UTC+10, bearlyabus...@gmail.com wrote:
    I have actually seen this used once. I tried to port a program that used
    constructs like:
    “ON ENDFILE <array expression> …”
    .
    What? You'd need to have a file name somewhere.
    .
    and just gave up and decided to keep compiling it with PL/I(F).


    That’s the <array expression>, sorry. It’s an array of file constants, or maybe it was file variables, but in any case it stopped being supported by anything newer than “F”. I thought it was neat, though.

    --
    Pete

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From Robin Vowels@21:1/5 to bearlyabus...@gmail.com on Tue Sep 13 18:20:19 2022
    On Wednesday, September 14, 2022 at 8:42:29 AM UTC+10, bearlyabus...@gmail.com wrote:
    Robin Vowels <robin....@gmail.com> wrote:
    On Wednesday, September 14, 2022 at 3:51:09 AM UTC+10, bearlyabus...@gmail.com wrote:
    I have actually seen this used once. I tried to port a program that used >> constructs like:
    “ON ENDFILE <array expression> …”
    .
    What? You'd need to have a file name somewhere.
    .
    and just gave up and decided to keep compiling it with PL/I(F).

    That’s the <array expression>, sorry. It’s an array of file constants, or
    maybe it was file variables, but in any case it stopped being supported by anything newer than “F”. I thought it was neat, though.
    .
    I think that you are confusing it with
    OPEN FILE A, B, C;
    and
    CLOSE FILE D, E, F, G;
    .
    There was never anything like ON ENDFILE P, Q, R;
    .
    You would use ON ENDFILE (X) <<do something>> ;

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)
  • From Peter Flass@21:1/5 to Robin Vowels on Tue Sep 13 20:43:12 2022
    Robin Vowels <robin.vowels@gmail.com> wrote:
    On Wednesday, September 14, 2022 at 8:42:29 AM UTC+10, bearlyabus...@gmail.com wrote:
    Robin Vowels <robin....@gmail.com> wrote:
    On Wednesday, September 14, 2022 at 3:51:09 AM UTC+10, bearlyabus...@gmail.com wrote:
    I have actually seen this used once. I tried to port a program that used >>>> constructs like:
    “ON ENDFILE <array expression> …”
    .
    What? You'd need to have a file name somewhere.
    .
    and just gave up and decided to keep compiling it with PL/I(F).

    That’s the <array expression>, sorry. It’s an array of file constants, or
    maybe it was file variables, but in any case it stopped being supported by >> anything newer than “F”. I thought it was neat, though.
    .
    I think that you are confusing it with
    OPEN FILE A, B, C;
    and
    CLOSE FILE D, E, F, G;
    .
    There was never anything like ON ENDFILE P, Q, R;
    .
    You would use ON ENDFILE (X) <<do something>> ;


    DCL x (5j FILE;
    ON ENDFILE(x) do something…
    Crazy, but it worked.

    --
    Pete

    --- SoupGate-Win32 v1.05
    * Origin: fsxNet Usenet Gateway (21:1/5)