aboutsummaryrefslogtreecommitdiff
path: root/src/integTest/groovy/frege/gradle/plugins/FregePluginIntegTest.groovy
blob: 72721132cc0fa668b903deb31f07664598c4466c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
package frege.gradle.plugins

import frege.gradle.integtest.fixtures.AbstractFregeIntegrationSpec
import org.gradle.testkit.runner.BuildResult
import spock.lang.Unroll
import static org.gradle.testkit.runner.TaskOutcome.*

class FregePluginIntegTest extends AbstractFregeIntegrationSpec {

    def setup() {
        buildFile << """
            plugins {
                id 'org.frege-lang'
            }

            repositories {
                jcenter()
            }
        """
    }

    def "can handle non existing source directories"() {
        given:
        buildFile << """
        dependencies {
            compile "org.frege-lang:frege:$DEFAULT_FREGE_VERSION"
        }
        """

        when:
        def result = run("classes")
        then:
        result.task(":compileFrege").outcome == UP_TO_DATE
    }

    @Unroll
    def "can compile and run frege code (gradle: #gradleVersion, frege: #fregeVersion)"() {
        given:
        buildFile << """
        dependencies {
            compile "org.frege-lang:frege:$fregeVersion"
        }
        ${sayHelloTask()}
        """

        fregeModule()

        when:
        def result = run(gradleVersion, "sayHello")

        then:
        result.output.contains("Hello Frege!")
        result.task(":sayHello").outcome == SUCCESS

        where:
        fregeVersion          | gradleVersion
        DEFAULT_FREGE_VERSION | "2.9"
        DEFAULT_FREGE_VERSION | "2.8"
        "3.22.367-g2737683"   | "2.9"
        "3.22.367-g2737683"   | "2.8"
    }

    private void fregeModule(String modulePath = "src/main/frege/org/frege/HelloFrege.fr") {
        def moduleFolder = new File(testProjectDir.root, modulePath).parentFile
        moduleFolder.mkdirs()
        def moduleSource = testProjectDir.newFile(modulePath)
        moduleSource << """
        module org.frege.HelloFrege where

        greeting = "Hello Frege!"

        main _ = do
            println greeting
        """
    }

    def "can reference java from frege"() {
        given:
        buildFile << """
        dependencies {
            compile "org.frege-lang:frege:$DEFAULT_FREGE_VERSION"
        }
        ${sayHelloTask()}
        """

        and:
        javaCode()
        fregeCallingJava()
        when:
        BuildResult result = run("sayHello")
        then:
        result.task(":compileJava").outcome == SUCCESS
        result.task(":compileFrege").outcome == SUCCESS
        result.output.contains("hello from java")
    }


    def "supports additional source sets"() {
        given:
        buildFile << """

        sourceSets {
            api
        }

        dependencies {
            apiCompile "org.frege-lang:frege:$DEFAULT_FREGE_VERSION"
        }


        """
        and:
        javaCode()
        fregeModule("src/api/frege/org/frege/HelloFrege.fr")
        when:
        BuildResult result = run("apiClasses")
        then:
        result.task(":compileApiJava").outcome == UP_TO_DATE
        result.task(":compileApiFrege").outcome == SUCCESS
        classFileExists("api/org/frege/HelloFrege.class")
    }

    def classFileExists(String relativeClasspath) {
        assert new File(testProjectDir.root, "build/classes/$relativeClasspath/").exists()
        true
    }

    def fregeCallingJava() {

        File fregeSourceFile = testProjectDir.newFile("src/main/frege/org/frege/HelloFrege.fr")
        fregeSourceFile << """
        module org.frege.HelloFrege where

        data StaticHello = pure native org.frege.StaticHello where
            pure native helloJava org.frege.StaticHello.helloJava:: () -> String


        main _ = do
            println(StaticHello.helloJava())

        """
    }

    def javaCode(String sourceRoot = "java") {
        def javaSourceFile = testProjectDir.newFile("src/main/$sourceRoot/org/frege/StaticHello.java")

        javaSourceFile << """
        package org.frege;

        public class StaticHello {
            public static String helloJava() {
                return "hello from java";
            }
        }
        """
    }

    def sayHelloTask() {
        return """ task sayHello(type: JavaExec) {
            classpath = sourceSets.main.runtimeClasspath
            main = 'org.frege.HelloFrege'
        } """
    }
}