diff --git a/compiler/testData/codegen/regressions/kt1093.kt b/compiler/testData/codegen/regressions/kt1093.kt
new file mode 100644
index 00000000000..e265e99242f
--- /dev/null
+++ b/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"
+}
diff --git a/compiler/tests/org/jetbrains/jet/codegen/PrimitiveTypesTest.java b/compiler/tests/org/jetbrains/jet/codegen/PrimitiveTypesTest.java
index ccc2b7332bc..7afe73b6fe8 100644
--- a/compiler/tests/org/jetbrains/jet/codegen/PrimitiveTypesTest.java
+++ b/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");
+    }
 }