summaryrefslogtreecommitdiff
path: root/test/files/run/t1500.scala
blob: 5a2735fbf1ab3b513a212e42c430dd97f6f924d9 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
import scala.tools.nsc._

object Test {
  
  /**
   *  Type inference overlooks constraints posed by type parameters in annotations on types.
   */
  
  val testCode = """
  
    class posingAs[A] extends annotation.TypeConstraint
    
    def resolve[A,B](x: A @posingAs[B]): B = x.asInstanceOf[B]
    
    val x = resolve(7: @posingAs[Any])
  
  """
  
  def main(args: Array[String]) {
    
    val settings = new Settings()
    settings.classpath.value = System.getProperty("java.class.path")
    val tool = interpreter.IMain(settings)
    val global = tool.global

    import global._
    import definitions._

    object checker extends AnnotationChecker {

      /** Check annotations to decide whether tpe1 <:< tpe2 */
      def annotationsConform(tpe1: Type, tpe2: Type): Boolean = {

        tpe1.annotations.forall(a1 => tpe2.annotations.forall(a2 => a1.atp <:< a2.atp))

      }
    }
    
    global.addAnnotationChecker(checker)
    
    tool.interpret(testCode)
    
  }

}