Enumerated types_(re)

Mon, 9 Jun 1997 09:50:02 -0700 (PDT)

>type TComparisonResult=(Less value -1, Equals, Greater, Strange value 10);
>
>i.e. Ord(Less)=-1, Ord(Equals)=0, Ord(Greater)=1, Ord(Strange)=10.

Another problem ... it will make pred() and succ() harder if they must
do succ(Greater) => Strange and pred(Strange) => Greater.  I think setting
the initial value would be reasonable, but not allowing a jump in the values.

-- 
Phil Nelson                       NetBSD: http://www.netbsd.org
e-mail: phil@cs.wwu.edu           LPF: http://www.lpf.org
http://www.cs.wwu.edu/~phil       !gifs: http://www.lpf.org/Patent/Gif/Gif.html

Phil Nelson (phil@cs.wwu.edu)