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,772ae8afc5db35f2 X-Google-Attributes: gid103376,public From: dennison@telepath.com Subject: Re: Can't export object of private type Date: 1999/03/11 Message-ID: <7c8ltu$34j$1@nnrp1.dejanews.com>#1/1 X-Deja-AN: 453797059 References: <7c6566$rps$1@nnrp1.dejanews.com> <7c6t83$isn$1@nnrp1.dejanews.com> X-Http-Proxy: 1.0 x11.dejanews.com:80 (Squid/1.1.22) for client 204.48.27.130 Organization: Deja News - The Leader in Internet Discussion X-Article-Creation-Date: Thu Mar 11 15:02:29 1999 GMT Newsgroups: comp.lang.ada X-Http-User-Agent: Mozilla/4.5 [en] (WinNT; I) Date: 1999-03-11T00:00:00+00:00 List-Id: In article <7c6t83$isn$1@nnrp1.dejanews.com>, dennison@telepath.com wrote: > In article , > Robert A Duff wrote: > > dennison@telepath.com writes: > > > > > procedure Main is > > > begin > > > null; -- The with's do all the work > > > end; > > > > > > I've seen it done. The problem is that any tasks that have terminate options > > > will immediately complete. ... > > > > No, that's not right. Such tasks will not complete until all the other > > tasks are done. > > Its been a while, but in Ada83 the way I remember it I would see any task that > was a child of the main unit go to a "completed" state when the main unit > completed and the task hit a terminate option, if it had no subtasks still > running. Of course the program itself won't complete until all other tasks > complete, but that didn't stop any one task from quitting. OK. I went back and dug out my old Ada83 LRM (I knew I kept that thing for some reason). It looks like one of three possible things was happening. 1) My memory is completely faulty. (Stranger things have happened) 2) My Ada83 compiler was buggy. I think it was DECAda, so I doubt it. 3) I had a situation where *every* task had a terminate option, and the main unit completed. I suspect it was #3. T.E.D. -----------== Posted via Deja News, The Discussion Network ==---------- http://www.dejanews.com/ Search, Read, Discuss, or Start Your Own