From mboxrd@z Thu Jan 1 00:00:00 1970 X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me X-Spam-Level: X-Spam-Status: No, score=-1.3 required=5.0 tests=BAYES_00,INVALID_MSGID autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,13fd7bcbabaa9519 X-Google-Attributes: gid103376,public From: "Kevin J. Weise" Subject: Re: End of Line Question Date: 1996/07/12 Message-ID: <4s66so$ehr@michp1.redstone.army.mil>#1/1 X-Deja-AN: 168041303 references: <4s4tn7$po6@masala.cc.uh.edu> <4s5hdb$hmb@news3.digex.net> content-type: text/plain; charset=us-ascii organization: Redstone Arsenal, Alabama mime-version: 1.0 newsgroups: comp.lang.ada x-mailer: Mozilla 1.22 (Windows; I; 16bit) Date: 1996-07-12T00:00:00+00:00 List-Id: Mike Ibarra wrote: >You could test for this a couple of different ways. In Ada83, package ASCII >contains identifiers for all ASCII control characters. So you could test: >IF ch = ASCII.cr THEN ... Sorry, Michael, can't do this. The Ada83 LRM talks about line terminators and page terminators, but does not specify what they are (or should be). Text_IO will definitely *not* return them to you. > >Or you could just test for end of line: >WHILE ( not End_Of_Line ) LOOP... > This is the preferred method. It is a function in Text_IO (i.e., Text_IO.End_of_Line). There's also a version that accepts a file parameter, in case you're reading a real disk file and not from standard input. Check out Chapter 14 in the LRM. >Hope this helps >-- >Michael Ibarra > Kevin J. Weise email: kweise@sed.redstone.army.mil COLSA Corporation voice: (205)842-9680 .. standard disclaimers apply