TEAM-ADA Archives

Team Ada: Ada Programming Language Advocacy

TEAM-ADA@LISTSERV.ACM.ORG

Options: Use Classic View

Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Topic: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Matthew Heaney <[log in to unmask]>
Mon, 7 Dec 1998 19:54:52 -0800
text/plain (16 lines)
Thomas W Moran <[log in to unmask]> writes:

> >float or integer coefficients
>   X := X+1;   or X := X+1.0;
> One will be illegal.  I think you'll have to use
>   X := X+This_Type(1);

If you import that type as a private, you'll have to import literals
too:

generic
  type T is private;
  One : in T;
  with function "+" (L, R : T) return T is <>;
...

ATOM RSS1 RSS2