Re: Ada Java question => clarification

[stt@houdini.camb.inmet.com (Tucker Taft)]

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".

It would be helpful to identify on which line each error occurs.

However, in this case, the problem is as I suspected.  The identifier
"event" is not directly visible.  The full name "java.awt.event" is
usable (because you "with" ed it), and the entities declared
inside java.awt.event are directly visible (because you "use"d it),
but the name "event" itself is *not* directly visible.  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.


: ----------------
: with java.applet.applet; use java.applet.applet;

: with java.lang.runnable; use java.lang.runnable;

: with java.awt.event; use java.awt.event;

: with java.lang.thread; use java.lang.thread;

: with java.awt.component; use java.awt.component;

: with java.awt.color; use java.awt.color;

: with java.awt.graphics; use java.awt.graphics;

:   function keyDown(obj : access tank_obj;

:   		   e : event_ptr;

:   		   key : Integer) return boolean is

:   begin

:     CASE key IS

:       WHEN event.UP => return true;
:       WHEN event.DOWN => return true;
:       WHEN event.LEFT => return true;
:       WHEN event.RIGHT => return true;
:       WHEN Others => return true;
:     end CASE;  

:     return true;

:   end keyDown;
: ------------------

: Any ideas anyone?
: -- 
:     *.........................................*
:     .                |/                       .
:     .                |\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