How do I end the program?

[David Starner <dvdeug@x8b4e53cd.dhcp.okstate.edu>]

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?

-- 
David Starner - starner@okstate.edu, dvdeug/jabber.com (Jabber)
Pointless website: http://dvdeug.dhis.org
What we've got is a blue-light special on truth. It's the hottest thing 
with the youth. -- Information Society, "Peace and Love, Inc."