Path: utzoo!utgpu!news-server.csri.toronto.edu!mailrus!iuvax!cica!tut.cis.ohio-state.edu!ucsd!usc!snorkelwacker!mintaka!ogicse!zephyr.ens.tek.com!tektronix!nosun!qiclab!m2xenix!puddle!p15.f42.n105.z1.fidonet.org!Jim.Long
From: Jim.Long@p15.f42.n105.z1.fidonet.org (Jim Long)
Newsgroups: comp.lang.modula2
Subject: Why are the loops so awkward?
Message-ID: <5379.26731965@puddle.fidonet.org>
Date: 10 Jun 90 16:44:35 GMT
Sender: ufgate@puddle.fidonet.org (newsout1.26)
Organization: FidoNet node 1:105/42.15 - Bink of an Aye, Portland OR
Lines: 23

In a message of <09 Jun 90  14:04:56>, cspw quagga (5:494/4) writes:

 > PROCEDURE P(VAR S : ARRAY OF CHAR);
 > VAR i,j   : INTEGER;
 >     k,n   : CARDINAL;
 > BEGIN
 >    n := Length(S);
 >    k := 0;
 >    WHILE (S[k] <> 0C) DO
 >       process(S[k]);
 >       INC(K);
 >    END;
 > END P;

WHILE k < n DO
  ...
  INC(k);
...


--  
uucp: uunet!m2xenix!puddle!42.15!Jim.Long
Internet: Jim.Long@p15.f42.n105.z1.fidonet.org