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=-0.3 required=5.0 tests=BAYES_00, REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,7d2851c9924bb432 X-Google-Attributes: gid103376,public X-Google-ArrivalTime: 2000-10-29 17:02:57 PST Path: supernews.google.com!sn-xit-02!sn-xit-03!supernews.com!newsswitch.lcs.mit.edu!howland.erols.net!newshub2.home.com!news.home.com!news1.sttls1.wa.home.com.POSTED!not-for-mail Reply-To: "DuckE" From: "DuckE" Newsgroups: comp.lang.ada References: <39FB723B.25D05446@erols.com> Subject: Re: User defined boolean X-Priority: 3 X-MSMail-Priority: Normal X-Newsreader: Microsoft Outlook Express 5.00.2919.6700 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2919.6700 Message-ID: <3N3L5.30691$E85.782438@news1.sttls1.wa.home.com> Date: Mon, 30 Oct 2000 01:02:55 GMT NNTP-Posting-Host: 24.6.221.63 X-Complaints-To: abuse@home.net X-Trace: news1.sttls1.wa.home.com 972867775 24.6.221.63 (Sun, 29 Oct 2000 17:02:55 PST) NNTP-Posting-Date: Sun, 29 Oct 2000 17:02:55 PST Organization: @Home Network Xref: supernews.google.com comp.lang.ada:1620 Date: 2000-10-30T01:02:55+00:00 List-Id: 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" 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. >