[Nice-commit] Nice/testsuite/compiler/enums enum.testsuite,1.8,1.9

[Arjan B. <ar...@us...>]

Update of /cvsroot/nice/Nice/testsuite/compiler/enums
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27827/F:/nice/testsuite/compiler/enums

Modified Files:
	enum.testsuite 
Log Message:
Fixed comparing of enum patterns.

Index: enum.testsuite
===================================================================
RCS file: /cvsroot/nice/Nice/testsuite/compiler/enums/enum.testsuite,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** enum.testsuite	5 Jul 2004 07:55:25 -0000	1.8
--- enum.testsuite	5 Jul 2004 08:22:25 -0000	1.9
***************
*** 119,120 ****
--- 119,130 ----
    Signal `&`(Signal x, Signal y) = x;
    `&`(Low, Low) = Low;
+ 
+ /// PASS
+   assert (Low & High) == Low;
+   /// Toplevel
+   enum Signal { High, Low, X }
+   Signal `&`(Signal, Signal);
+   `&`(High, x)    = x;
+   `&`(X, x)       = X;
+   `&`(Low, Low)   = Low;
+   `&`(Low, z)     = z & Low;