Re: DECAda/VMS - calling GETJPI

[George Haddad <haddad#m#_george@mmac.is.lmsc.lockheed.com>]

Robert Dewar wrote:
> Consider the following example: 
>     type x is mod 10;
>     subtype y is x range 0 .. 5;

   [snip]

> Actually to be strict, the constraint error is raised by the
> conversion because -1 is not in the set of values for
> modular type x (0 .. 10).

   At last!  An opportunity to nitpick one of the comp.lang.ada 
greats.  (Or embarrass myself horribly -- you be the judge.  :-))  I 
would certainly hope that the allowable range of values for type x
is 0..9.  ;-)  Otherwise, what about this:

   V1 : constant x := 0;
   V2 : constant x := 10;
   if (V1 = V2) then Text_IO.Put_Line("Zero equals Ten."); end if;
-- 
I found these opinions on my doorstep, would you please give them a 
good home?