Re: User defined boolean

["DuckE" <nospam_steved94@home.com>]

You can certainly override the built in AND and OR operations to work for
your new type:

   type Pass_Flag is (Fail, Pass);

   function "AND" ( Left, Right : Pass_Flag ) return Boolean is
   begin
      return (Left = Pass) and (Right = Pass);
   end "AND";

   function "OR" ( Left, Right : Pass_Flag ) return Boolean is
   begin
      return (Left = Pass) or (Right = Pass);
   end "OR";

SteveD

"Daniel Allex" <dallex@erols.com> wrote in message
news:39FB723B.25D05446@erols.com...
> I created a type PASS_FLAG that is an enumeration type of FAIL and
> PASS.  I have seven funtions that each return PASS_FLAG, and I wanted to
> AND them together an print out the result.  My flag wont work with
> either AND or "+".  Can this be done or should I just use the predefined
> boolean.  I had reasons for defining my own enumeration type.
>