[Nice-commit] Nice/testsuite/compiler/methods globalconstant.testsuite,1.3,1.4 implementations.testsuite,1.11,1.12 integer.testsuite,1.7,1.8

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

Update of /cvsroot/nice/Nice/testsuite/compiler/methods
In directory sc8-pr-cvs1:/tmp/cvs-serv29112/F:/nice/testsuite/compiler/methods

Modified Files:
	globalconstant.testsuite implementations.testsuite 
	integer.testsuite 
Log Message:
Stricter check for #type patterns.

Index: globalconstant.testsuite
===================================================================
RCS file: /cvsroot/nice/Nice/testsuite/compiler/methods/globalconstant.testsuite,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** globalconstant.testsuite	14 Jun 2003 16:21:26 -0000	1.3
--- globalconstant.testsuite	15 Jun 2003 13:05:46 -0000	1.4
***************
*** 84,94 ****
    let Color blue = new Color();
    let Color green = new Color();
!   String string(Color);
!   string(color) = "unknown color";
!   string(=red) = "red";
!   string(=blue) = "blue";
!   string(=green) = "green";
    /// package b import a
!   assert red.string().equals("red");
!   assert blue.string().equals("blue");
!   assert green.string().equals("green");
--- 84,94 ----
    let Color blue = new Color();
    let Color green = new Color();
!   String name(Color);
!   name(color) = "unknown color";
!   name(=red) = "red";
!   name(=blue) = "blue";
!   name(=green) = "green";
    /// package b import a
!   assert red.name().equals("red");
!   assert blue.name().equals("blue");
!   assert green.name().equals("green");

Index: implementations.testsuite
===================================================================
RCS file: /cvsroot/nice/Nice/testsuite/compiler/methods/implementations.testsuite,v
retrieving revision 1.11
retrieving revision 1.12
diff -C2 -d -r1.11 -r1.12
*** implementations.testsuite	24 May 2003 19:55:58 -0000	1.11
--- implementations.testsuite	15 Jun 2003 13:05:46 -0000	1.12
***************
*** 77,80 ****
--- 77,87 ----
  /// FAIL
    /// Toplevel
+   abstract class X {}
+  
+   void foo(X);
+   foo(#X){}
+ 
+ /// FAIL
+   /// Toplevel
  class A {}
  class B extends A{}

Index: integer.testsuite
===================================================================
RCS file: /cvsroot/nice/Nice/testsuite/compiler/methods/integer.testsuite,v
retrieving revision 1.7
retrieving revision 1.8
diff -C2 -d -r1.7 -r1.8
*** integer.testsuite	14 Jun 2003 17:43:45 -0000	1.7
--- integer.testsuite	15 Jun 2003 13:05:46 -0000	1.8
***************
*** 45,54 ****
    /// package a
    /// Toplevel
!   void foo(char);
!   foo(@char) {}
!   foo(='a') {}
! 
    /// package b import a
!   ;
  
  /// FAIL
--- 45,54 ----
    /// package a
    /// Toplevel
!   boolean foo(char);
!   foo(@char) = false;
!   foo(='\1') = true;
!   foo(='\3') = false;
    /// package b import a
!   assert foo('\1');
  
  /// FAIL