]> gerrit.simantics Code Review - simantics/platform.git/blobdiff - bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/constants/UnsafeCoerce.java
Merged changes from feature/scl to master.
[simantics/platform.git] / bundles / org.simantics.scl.compiler / src / org / simantics / scl / compiler / constants / UnsafeCoerce.java
diff --git a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/constants/UnsafeCoerce.java b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/constants/UnsafeCoerce.java
deleted file mode 100644 (file)
index 0ac69c1..0000000
+++ /dev/null
@@ -1,24 +0,0 @@
-package org.simantics.scl.compiler.constants;\r
-\r
-import org.simantics.scl.compiler.internal.codegen.references.Val;\r
-import org.simantics.scl.compiler.internal.codegen.utils.MethodBuilder;\r
-import org.simantics.scl.compiler.types.TVar;\r
-import org.simantics.scl.compiler.types.Type;\r
-import org.simantics.scl.compiler.types.Types;\r
-import org.simantics.scl.compiler.types.kinds.Kinds;\r
-\r
-public class UnsafeCoerce extends FunctionValue {    \r
-    private static TVar A = Types.var(Kinds.STAR);\r
-    private static TVar B = Types.var(Kinds.STAR);\r
-    public static final UnsafeCoerce INSTANCE = new UnsafeCoerce();\r
-    \r
-    private UnsafeCoerce() {\r
-        super(new TVar[] {A, B}, Types.NO_EFFECTS, B, A);\r
-    }\r
-    \r
-    @Override\r
-    public Type applyExact(MethodBuilder mb, Val[] parameters) {\r
-        mb.pushBoxed(parameters[0]);\r
-        return getReturnType();\r
-    }\r
-}\r