X-Git-Url: https://gerrit.simantics.org/r/gitweb?a=blobdiff_plain;f=bundles%2Forg.simantics.scl.compiler%2Ftests%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Ftests%2Fscl%2FSeq.scl;fp=bundles%2Forg.simantics.scl.compiler%2Ftests%2Forg%2Fsimantics%2Fscl%2Fcompiler%2Ftests%2Fscl%2FSeq.scl;h=0000000000000000000000000000000000000000;hb=9a175feb652b2b7bba7afa540831b9076be3c10e;hp=4b60e5298b0199ec3a5d9cdb7a930c7c952e9b61;hpb=0b72d3e4ec886838314ffeba0fa201e32c0aae3e;p=simantics%2Fplatform.git

diff --git a/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Seq.scl b/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Seq.scl
deleted file mode 100644
index 4b60e5298..000000000
--- a/bundles/org.simantics.scl.compiler/tests/org/simantics/scl/compiler/tests/scl/Seq.scl
+++ /dev/null
@@ -1,19 +0,0 @@
-import "Prelude"
-import "JavaBuiltin" as Java
-
-class Seq seq el where
-    myLength :: seq -> Integer
-    myGet :: seq -> Integer -> el
-
-instance (b ~ Character) => Seq String b where
-    myLength = Java.method "length"
-    myGet = Java.method "charAt"
-    
-instance (b ~ a) => Seq [a] b where
-    myLength = Java.method "size"
-    myGet = Java.method "get"
-
-//main :: (Character, String)
-main = (myGet "abc" 1, myGet ["a", "b", "c"] 1)
---
-(b,b)
\ No newline at end of file