Add executable tests for the edge case of unbound reference to optional method on AnyObject

Author: AnthonyLatsis

test/Interpreter/dynamic_lookup.swift

@@ -5,6 +5,10 @@
 
 import Foundation
 
+@objc protocol P {
+  @objc optional func e()
+}
+
 class X {
   init() {}
 
@@ -15,11 +19,15 @@ class X {
     return 17
   }
 }
+extension X: P {
+  @objc func e() { print("X.e()") }
+}
 
 class Y { 
   init() {}
   @objc class func g() { print("Y.g()") }
 }
+extension Y: P {}
 
 class Z {
    init() {}
@@ -44,7 +52,16 @@ func test_dynamic_lookup_f_unbound(_ obj: AnyObject) {
   if of != nil {
     of!()
   } else {
-    print("Object does not respond to the selector \"f\".\n", terminator: "")
+    print("\(type(of: obj)) does not respond to the selector \"f\"")
+  }
+}
+
+func test_dynamic_lookup_e_unbound(_ obj: AnyObject) {
+  var oe = AnyObject.e(obj)
+  if oe != nil {
+    oe!()
+  } else {
+    print("\(type(of: obj)) does not respond to the selector \"e\"")
   }
 }
 
@@ -77,11 +94,20 @@ test_dynamic_lookup_f(Z())
 print(type(of: AnyObject.f))
 // CHECK-NEXT: X.f()
 test_dynamic_lookup_f_unbound(X())
-// CHECK-NEXT: Object does not respond to the selector "f"
+// CHECK-NEXT: Y does not respond to the selector "f"
 test_dynamic_lookup_f_unbound(Y())
 // CHECK-NEXT: Z.f()
 test_dynamic_lookup_f_unbound(Z())
 
+// CHECK-NEXT: (AnyObject) -> Optional<() -> ()>
+print(type(of: AnyObject.e))
+// CHECK-NEXT: X.e()
+test_dynamic_lookup_e_unbound(X())
+// CHECK-NEXT: Y does not respond to the selector "e"
+test_dynamic_lookup_e_unbound(Y())
+// CHECK-NEXT: Z does not respond to the selector "e"
+test_dynamic_lookup_e_unbound(Z())
+
 // CHECK: Class does not respond to the selector "g"
 test_dynamic_lookup_g(X())
 // CHECK: Y.g()