Optimize test runner (#6)

This commit optimizes the test runner by doing two things:

1. Not copying the `node_modules` and `bower_components` directories but instead symlinking to them
2. Pre-compiling a fake purescript application and copying its `output` directory to the solution's directory. This prevents recompiling the core libraries for each solution

Author: ErikSchierboom

.gitignore

@@ -2,8 +2,8 @@
 .*.swp
 *.cabal
 stack.yaml
-tests/*/node_modules/
-tests/*/bower_components/
+tests/*/node_modules
+tests/*/bower_components
 tests/*/.pulp-cache/
 tests/*/output/
 tests/*/results.json

Dockerfile

@@ -8,14 +8,16 @@ RUN apt-get update && \
 
 WORKDIR /opt/test-runner
 
-# Pre-install packages
-COPY package.json package-lock.json ./
+ENV PATH="/opt/test-runner/node_modules/.bin:$PATH" 
+
+COPY pre-compiled/package.json pre-compiled/package-lock.json ./
 RUN npm install
 
-COPY bower.json .
-RUN ./node_modules/.bin/bower install --allow-root
+COPY pre-compiled/bower.json .
+RUN bower install --allow-root
 
-# TODO: pre-compile standard library and copy output directory in run.sh
+COPY pre-compiled/ .
+RUN pulp build
 
 COPY . .
 ENTRYPOINT ["/opt/test-runner/bin/run.sh"]

bin/run.sh

@@ -34,11 +34,9 @@ echo "${slug}: testing..."
 
 pushd "${input_dir}" > /dev/null
 
-cp -r "${root_dir}/node_modules" .
-cp -r "${root_dir}/bower_components" .
-
-# Required to have pulp find the `purs` executable
-export PATH="./node_modules/.bin:$PATH"
+ln -s "${root_dir}/node_modules"
+ln -s "${root_dir}/bower_components"
+cp -r "${root_dir}/output" . # We can't symlink this as pulp needs to write to it
 
 # Run the tests for the provided implementation file and redirect stdout and
 # stderr to capture it

bower.json renamed to pre-compiled/bower.json

@@ -0,0 +1,9 @@
+module Leap where
+
+import Prelude
+
+isLeapYear :: Int -> Boolean
+isLeapYear year =
+  mod year 4 == 0 &&
+  mod year 100 /= 0 ||
+  mod year 400 == 0

package-lock.json renamed to pre-compiled/package-lock.json

@@ -0,0 +1,30 @@
+module Test.Main where
+
+import Prelude
+
+import Effect (Effect)
+import Test.Unit (TestSuite, suite, test)
+import Test.Unit.Main (runTest)
+import Test.Unit.Assert as Assert
+import Leap as Leap
+
+main :: Effect Unit
+main = runTest suites
+
+suites :: TestSuite
+suites = do
+  suite "Leap.isLeapYear" do
+    test "leap year" do
+      Assert.equal true $ Leap.isLeapYear 1996
+    test "non-leap year" do
+      Assert.equal false $ Leap.isLeapYear 1997
+    test "non-leap even year" do
+      Assert.equal false $ Leap.isLeapYear 1998
+    test "century" do
+      Assert.equal false $ Leap.isLeapYear 1900
+    test "second century" do
+      Assert.equal false $ Leap.isLeapYear 1800
+    test "fourth century" do
+      Assert.equal true $ Leap.isLeapYear 2400
+    test "y2k" do
+      Assert.equal true $ Leap.isLeapYear 2000