Fix warnings revealed by v0.14.1 PS release (#82)

Author: JordanMartinez

CHANGELOG.md

@@ -11,6 +11,8 @@ New features:
 Bugfixes:
 
 Other improvements:
+- Fixed warnings revealed by v0.14.1 PS release (#82 by @JordanMartinez)
+- Installed transitive dependencies used in source code (#82 by @JordanMartinez)
 
 ## [v10.0.0](https://github.com/purescript-contrib/purescript-routing/releases/tag/v10.0.0) - 2021-02-26
 

spago.dhall

@@ -1,24 +1,35 @@
 { name = "routing"
 , dependencies =
   [ "aff"
+  , "arrays"
   , "assert"
+  , "bifunctors"
   , "console"
   , "control"
   , "effect"
   , "either"
+  , "exceptions"
   , "foldable-traversable"
+  , "foreign"
   , "integers"
   , "js-uri"
   , "lists"
   , "maybe"
+  , "newtype"
   , "numbers"
+  , "ordered-collections"
   , "partial"
   , "prelude"
   , "psci-support"
   , "record"
+  , "refs"
   , "semirings"
+  , "strings"
+  , "transformers"
   , "tuples"
   , "validation"
+  , "web-dom"
+  , "web-events"
   , "web-html"
   ]
 , packages = ./packages.dhall

src/Routing/Match.purs

@@ -60,7 +60,7 @@ lit input = Match \route ->
   case route of
     Cons (Path i) rs | i == input ->
       pure $ Tuple rs unit
-    Cons (Path _) rs ->
+    Cons (Path _) _ ->
       invalid $ free $  UnexpectedPath input
     _ ->
       invalid $ free ExpectedPathPart

test/Test/Browser.purs

@@ -144,6 +144,8 @@ runPushStateTests = withTest \{ assert } -> do
         | Rec.equal old' loc5 && Rec.equal new' loc6 -> do
             assert "Locations: c/e -> c/e?f" true
             hist.pushState (unsafeToForeign 6) "/"
+        | Rec.equal old' loc6 && Rec.equal new' loc7 -> do
+            assert "Locations: c/e?f -> /" true
             done
       _, _ -> do
         done