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=3.8 required=5.0 tests=BAYES_00,INVALID_MSGID, RATWARE_MS_HASH,RATWARE_OUTLOOK_NONAME autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,a83380f8e1854bc2 X-Google-Attributes: gid103376,public From: "Nick Roberts" Subject: Re: Problems with records--IMPORTANT Date: 1998/02/04 Message-ID: <01bd31b5$2b3b7380$85f882c1@xhv46.dial.pipex.com>#1/1 X-Deja-AN: 322109548 Content-Transfer-Encoding: 7bit References: <6b2hom$jt7$2@talia.mad.ibernet.es> <01bd2fc3$8432eca0$0e2915c0@p5120> Content-Type: text/plain; charset=ISO-8859-1 Organization: UUNet UK server (post doesn't reflect views of UUNet UK) Mime-Version: 1.0 Newsgroups: comp.lang.ada Date: 1998-02-04T00:00:00+00:00 List-Id: But Bob: you don't appear to have changed anything _but_ the spacing! Do we infer that the reason for Damian's errors is a difference in GANT version (from your v3.09)? I cannot see anything wrong with the flagged code. -- == Nick Roberts ================================================ == Croydon, UK =========================== == ================ == Proprietor, ThoughtWing Software ========== == Independent Software Development Consultant ====== == Nick.Roberts@dial.pipex.com ==== == Voicemail & Fax +44 181-405 1124 === == == == I live not in myself, but I become == === Portion of that around me; and to me == ==== High mountains are a feeling, but the hum == ======= Of human cities torture. =========== -- Byron [Childe Harold] bklungle wrote in article <01bd2fc3$8432eca0$0e2915c0@p5120>... [...] > case nums is > when 1 => null; > when 2 => r.n := n; > r.d := d; > op := o(i); > when 3 =>null; > when 4 => s.n := n; > s.d := d; > when others => null; > end case; [...] > > 73. case nums is > > 74. when 1=>null; > > 75. when 2=>r.n:=n;r.d:=d;op:=o(i); > > 1 2 > > >>> invalid prefix in selected component "r" > > >>> invalid prefix in selected component "r" > > 76. when 3=>null; > > 77. when 4=>s.n:=n;s.d:=d; > > 1 2 > > >>> invalid prefix in selected component "s" > > >>> invalid prefix in selected component "s" > > 78. when others =>null; > > 79. end case;