diff --git a/bower.json b/bower.json index 74255db..fa08ac9 100644 --- a/bower.json +++ b/bower.json @@ -31,5 +31,10 @@ "purescript-nullable": "^3.0.0", "purescript-prelude": "^3.0.0", "purescript-unsafe-coerce": "^3.0.0" + }, + "devDependencies": { + "purescript-test-unit": "^11.0.0", + "purescript-phantom": "^2.0.0", + "purescript-exitcodes": "^3.0.0" } } diff --git a/package.json b/package.json index 6a89f99..bbb47ef 100644 --- a/package.json +++ b/package.json @@ -2,7 +2,8 @@ "private": true, "scripts": { "clean": "rimraf output && rimraf .pulp-cache", - "build": "eslint src && pulp build -- --censor-lib --strict" + "build": "eslint src && pulp build -- --censor-lib --strict", + "test": "PHANTOM_TEST_PATH=$(pwd) pulp test --runtime phantomjs" }, "devDependencies": { "eslint": "^3.19.0", diff --git a/test/DOM/HTML/Window.purs b/test/DOM/HTML/Window.purs index 9bb6a11..12bdbe7 100644 --- a/test/DOM/HTML/Window.purs +++ b/test/DOM/HTML/Window.purs @@ -1,6 +1,6 @@ module Test.DOM.HTML.Window where -import Prelude (Unit, bind, (<<<)) +import Prelude (Unit, bind, (<<<), discard) import DOM (DOM) import DOM.HTML (window) import DOM.HTML.Types (WINDOW) diff --git a/test/Main.purs b/test/Main.purs index 83a4920..697b80d 100644 --- a/test/Main.purs +++ b/test/Main.purs @@ -1,6 +1,6 @@ module Test.Main where -import Prelude (($), bind) +import Prelude (($), discard) import DOM (DOM) import DOM.HTML.Types (WINDOW) import Data.Enum (fromEnum) @@ -24,7 +24,7 @@ liftEff = EffClass.liftEff main :: forall eff - . Eff (err :: EXCEPTION, console :: CONSOLE, avar :: AVAR, dom :: DOM, window :: WINDOW, phantomjs :: PHANTOMJS | eff) + . Eff (exception :: EXCEPTION, console :: CONSOLE, avar :: AVAR, dom :: DOM, window :: WINDOW, phantomjs :: PHANTOMJS | eff) (Canceler (console :: CONSOLE, avar :: AVAR, dom :: DOM, window :: WINDOW, phantomjs :: PHANTOMJS | eff)) main = launchAff $ runTest do domHtmlWindowTests