test for obsolete KT-1093

compiler/testData/codegen/regressions/kt1093.kt

@@ -0,0 +1,8 @@
+val f : (Any) -> String = { it.toString() }
+
+fun box() : String {
+    if(!(f identityEquals f)) return "fail"
+    if(!(f == f)) return "fail"
+    if(!(f equals f)) return "fail"
+    return "OK"
+}

compiler/tests/org/jetbrains/jet/codegen/PrimitiveTypesTest.java

@@ -399,4 +399,8 @@ public class PrimitiveTypesTest extends CodegenTestCase {
     public void testKt1054 () {
         blackBoxFile("regressions/kt1054.kt");
     }
+
+    public void testKt1093 () {
+        blackBoxFile("regressions/kt1093.kt");
+    }
 }