Added tests for native modules (see ceylon/ceylon-spec#946)

ceylon · May 20, 2015 · d375e49 · d375e49
1 parent 60c7e3e
commit d375e49
Show file tree

Hide file tree

Showing 7 changed files with 59 additions and 0 deletions.
diff --git a/test/src/com/redhat/ceylon/compiler/java/test/nativecode/NativeTests.java b/test/src/com/redhat/ceylon/compiler/java/test/nativecode/NativeTests.java
@@ -52,6 +52,24 @@ private void testNativeErrors(String dir, String test, CompilerError... expected
         assertErrors(dir + "/" + test, expectedErrors);
     }
 
+    private void testNativeModule(String dir) {
+        boolean ok = false;
+        try {
+            compile(dir + "/test.ceylon", dir + "/module.ceylon");
+            run("com.redhat.ceylon.compiler.java.test.nativecode." + dir + ".test", new ModuleWithArtifact("com.redhat.ceylon.compiler.java.test.nativecode." + dir, "1.0"));
+        } catch (RuntimeException ex) {
+            assert(("ceylon.language.Exception \"" + dir + "-JVM\"").equals(ex.getMessage()));
+            ok = true;
+        }
+        if (!ok) {
+            Assert.fail("Test terminated incorrectly");
+        }
+    }
+
+    private void testNativeModuleErrors(String dir, CompilerError... expectedErrors) {
+        assertErrors(new String[] {dir + "/test.ceylon", dir + "/module.ceylon"}, defaultOptions, null, expectedErrors);
+    }
+
     // Methods
 
     @Test
@@ -188,6 +206,29 @@ public void testNativeClassMismatch() {
         );
     }
 
+    // Modules
+
+    @Test
+    public void testNativeModule() {
+        testNativeModule("modok");
+    }
+
+    @Test
+    public void testNativeModuleMissing() {
+        testNativeModuleErrors("modmissing",
+                new CompilerError(2, "Missing backend argument for native annotation on module: com.redhat.ceylon.compiler.java.test.nativecode.modmissing")
+        );
+    }
+
+    @Test
+    public void testNativeModuleWrong() {
+        testNativeModuleErrors("modwrong",
+                new CompilerError(2, "Module not meant for this backend: com.redhat.ceylon.compiler.java.test.nativecode.modwrong")
+        );
+    }
+
+    // Misc
+
     @Test
     public void testNativeInvalidTypes() {
         testNativeErrors("NativeInvalidTypes",

diff --git a/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modmissing/module.ceylon b/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modmissing/module.ceylon
@@ -0,0 +1,3 @@
+native
+module com.redhat.ceylon.compiler.java.test.nativecode.modmissing "1.0" {
+}
diff --git a/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modmissing/test.ceylon b/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modmissing/test.ceylon
@@ -0,0 +1,3 @@
+shared void test() {
+    throw Exception("modmissing-JVM");
+}
diff --git a/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modok/module.ceylon b/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modok/module.ceylon
@@ -0,0 +1,3 @@
+native("jvm")
+module com.redhat.ceylon.compiler.java.test.nativecode.modok "1.0" {
+}
diff --git a/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modok/test.ceylon b/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modok/test.ceylon
@@ -0,0 +1,3 @@
+shared void test() {
+    throw Exception("modok-JVM");
+}
diff --git a/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modwrong/module.ceylon b/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modwrong/module.ceylon
@@ -0,0 +1,3 @@
+native("js")
+module com.redhat.ceylon.compiler.java.test.nativecode.modwrong "1.0" {
+}
diff --git a/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modwrong/test.ceylon b/test/src/com/redhat/ceylon/compiler/java/test/nativecode/modwrong/test.ceylon
@@ -0,0 +1,3 @@
+shared void test() {
+    throw Exception("modmissing-JVM");
+}