Update of /cvsroot/nice/Nice/testsuite/compiler/enums
In directory sc8-pr-cvs1:/tmp/cvs-serv28036/F:/nice/testsuite/compiler/enums
Modified Files:
enum.testsuite
Log Message:
Enums can implement interfaces now.
Index: enum.testsuite
===================================================================
RCS file: /cvsroot/nice/Nice/testsuite/compiler/enums/enum.testsuite,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** enum.testsuite 15 Dec 2003 00:04:49 -0000 1.6
--- enum.testsuite 16 Jan 2004 00:14:07 -0000 1.7
***************
*** 99,100 ****
--- 99,114 ----
assert dime.value == 10;
assert quarter.value == 25;
+
+ /// PASS
+ /// package a
+ /// Toplevel
+ enum Coin(int value) implements Bar
+ {penny(1), nickel(5), dime(10), quarter(25)}
+ interface Bar {}
+ int foo(Bar x);
+ foo(Coin x) = x.value;
+ /// package b import a
+ assert penny.value == penny.foo();
+ assert nickel.value == nickel.foo();
+ assert dime.value == dime.foo();
+ assert quarter.value == quarter.foo();
|
