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.9 required=5.0 tests=BAYES_00 autolearn=ham autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,bff0c2e09500f856 X-Google-Attributes: gid103376,public X-Google-ArrivalTime: 2002-02-06 13:12:00 PST Path: archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!dispose.news.demon.net!news.demon.co.uk!demon!pogner.demon.co.uk!zap!not-for-mail From: Simon Wright Newsgroups: comp.lang.ada Subject: Re: How do I end the program? Date: 05 Feb 2002 06:17:01 +0000 Organization: Pushface Message-ID: References: NNTP-Posting-Host: localhost X-NNTP-Posting-Host: pogner.demon.co.uk:158.152.70.98 X-Trace: news.demon.co.uk 1013029915 nnrp-13:7816 NO-IDENT pogner.demon.co.uk:158.152.70.98 X-Complaints-To: abuse@demon.net NNTP-Posting-Date: 5 Feb 2002 06:17:01 GMT X-Newsreader: Gnus v5.7/Emacs 20.7 Xref: archiver1.google.com comp.lang.ada:19680 Date: 2002-02-05T06:17:01+00:00 List-Id: dale writes: > starner@okstate.edu wrote: > > > How do I exit the program? It may seem like a silly question, but I'm > > trying to exit from a function called from a callback written in C, so I > > can't just return or raise an exception. glutMainLoop never returns, so > > I can't run off the end of the main function. I used > > GNAT.OS_Lib.OS_Exit. Is there a pure Ada alternative? > > > No not really. One way of doing it is to define an exception... There has been at least one thread on this on cla; it's particularly interesting when you have tasks you don't know about. The general idea is to abort the environment task.