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,4e180de737833224 X-Google-Attributes: gid103376,public From: bbalfour@std.caci.com (Brad Balfour) Subject: Re: Ada Java question => clarification Date: 1997/02/28 Message-ID: #1/1 X-Deja-AN: 222086507 References: <33167E7E.4351@fn3.freenet.tlh.fl.us> Organization: CACI, Inc. Newsgroups: comp.lang.ada Date: 1997-02-28T00:00:00+00:00 List-Id: In article , stt@houdini.camb.inmet.com (Tucker Taft) wrote: >Kendal Van Dyke (kendal@fn3.freenet.tlh.fl.us) wrote: > >: Ok, to provide more specific details as to my problem, here are the with >: and use clauses that accompany the package that contains this function. >: Again, when I try to compile it I get the error "Direct name, event, is >: not visible". [snip] >...You can >do any of the following: > 1) use the full name "java.awt.event" instead of "event"; > 2) drop the use of "event" in "event.UP" and say simply "UP"; > 3) add a "use" clause for "java.awt" which will make the package > names "event", "component", "color", and "graphics" directly visible. However, once you follow #1, you will get the following error for each case choice: WHEN java.awt.event.UP => return true; keydown.ada: Error: line 30 col 27 LRM:3.8.1(8) & 5.4(5), The expression in the discrete choice must be static Despite the two RM95 references quoted above, the real reason is found in 4.9(24) which let's us know that a static constant must be a full constant declaration or a renaming. java.awt.event.UP is a constant integer whose value is supplied via a pragma Import. This means that it is constant, but *not* a static constant. So, unfortunately, you need to change the case statement into an if statement. Brad >: . |/ . >: . |\ENDAL . >: . WWW => http://www.cs.fsu.edu/~vandyke . >: . EMail => vandyke@cs.fsu.edu . >: . Pager => (904) 297-6658 . >-Tucker Taft stt@inmet.com http://www.inmet.com/~stt/ >Intermetrics, Inc. Burlington, MA USA -- Brad Balfour SIGAda WWW Server CACI, Inc. http://www.acm.org/sigada/ (703) 277-6767 and also try: bbalfour@std.caci.com http://www.adahome.com/ 3930 Pender Drive Fairfax, VA 22030 "...they even have rules for exceptions" -- Dewar and Schonberg