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=-0.8 required=5.0 tests=BAYES_00,INVALID_DATE autolearn=no autolearn_force=no version=3.4.4 Path: utzoo!utgpu!news-server.csri.toronto.edu!clyde.concordia.ca!uunet!inmet!stt From: stt@inmet.inmet.com Newsgroups: comp.lang.ada Subject: Re: test program for enumeration_IO Message-ID: <20600042@inmet> Date: 8 May 90 16:46:00 GMT References: <1847@sparko.gwu.edu> Nf-ID: #R:sparko.gwu.edu:1847:inmet:20600042:000:421 Nf-From: inmet.inmet.com!stt May 8 12:46:00 1990 List-Id: Re: Use of "SET=>LOWER_CASE" in Enumeration_IO. LOWER_CASE is an enumeral from the type TEXT_IO.TYPE_SET. This means that the enumeral is declared "within" TEXT_IO, and you must either "use" TEXT_IO, or specify the value for the "SET" parameter as "TEXT_IO.LOWER_CASE. I.e., this should work: French_Color_IO.Put(Item => Fr_Color, Set => Text_IO.Lower_Case); S. Tucker Taft Intermetrics, Inc. Cambridge, MA 02138