X-Git-Url: https://gerrit.simantics.org/r/gitweb?p=simantics%2Fplatform.git;a=blobdiff_plain;f=bundles%2Forg.simantics.scl.compiler%2Fsrc%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Fconstants%2FFailFunction.java;fp=bundles%2Forg.simantics.scl.compiler%2Fsrc%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Fconstants%2FFailFunction.java;h=0000000000000000000000000000000000000000;hp=2a47c39a642d162fcb328eefe9b7dd1e49663eb4;hb=fc2cb126576a7d0f3e6e1d4812992e4e69e481cd;hpb=593a73243a96baa551bb42f15fb6911aaa8f1e60

diff --git a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/constants/FailFunction.java b/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/constants/FailFunction.java
deleted file mode 100644
index 2a47c39a6..000000000
--- a/bundles/org.simantics.scl.compiler/src/org/simantics/scl/compiler/constants/FailFunction.java
+++ /dev/null
@@ -1,39 +0,0 @@
-package org.simantics.scl.compiler.constants;
-
-import org.cojen.classfile.TypeDesc;
-import org.simantics.scl.compiler.internal.codegen.references.Val;
-import org.simantics.scl.compiler.internal.codegen.utils.MethodBuilder;
-import org.simantics.scl.compiler.types.TVar;
-import org.simantics.scl.compiler.types.Type;
-import org.simantics.scl.compiler.types.Types;
-import org.simantics.scl.compiler.types.kinds.Kinds;
-
-public class FailFunction extends FunctionValue {
-
-    private static final TVar A = Types.var(Kinds.STAR);
-    public static final FailFunction INSTANCE = 
-            new FailFunction();
-    
-    private FailFunction() {
-        super(new TVar[] {A}, Types.NO_EFFECTS, A, Types.STRING);
-    }
-    
-    private static final TypeDesc RuntimeException = 
-            TypeDesc.forClass(RuntimeException.class);
-    
-    @Override
-    public Type applyExact(MethodBuilder mb, Val[] parameters) {
-        mb.newObject(RuntimeException);
-        mb.dup();
-        mb.push(parameters, parameterTypes);
-        mb.invokeConstructor(RuntimeException, 
-                new TypeDesc[] {TypeDesc.STRING});
-        mb.throwObject();
-        return getReturnType();
-    }
-
-    @Override
-    public String toString() {
-         return "fail";
-    }
-}