Re: Character vs. String comparisons (was: Re: How to implement a continue statement in Ada?)

[dvdeug@x8b4e53cd.dhcp.okstate.edu (David Starner)]

On Sat, 12 Feb 2000 21:50:33 GMT, Jeff Carter <jrcarter010@earthlink.net> wrote:
>David Starner wrote:
>> elsif char (1) = '(' and char (2) = '*' then
>
>Is there some reason you didn't write
>
>elsif char (1 .. 2) = "(*";

Yes. It actually looked like 
   elsif char (I + 1) = '(' and then char (I + 2) = '*' then ...
The way the buffer was set up, the trailing character would always be
a space. As long as anything didn't read past a space, I don't have
to take the extra code to check that I < EOL. char (I+1 .. I + 3) = 'for'
could potentially overflow the buffer, whereas char(I+1) = 'f' and then
char (I+2) = 'o' and then char (I + 3) = 'r' won't. Also, it looked like
elsif char (I+1) = '(' then
   if char (I+2) = '*' then
      -- Do comment things
   else
      -- Do open parenthesis things
   end if;
...
-- 
David Starner - dstarner98@aasaa.ofe.org
Only a nerd would worry about wrong parentheses with
square brackets. But that's what mathematicians are.
   -- Dr. Burchard, math professor at OSU