From e453d16ddd6ef27c34a67390699ee8f5b44c526b Mon Sep 17 00:00:00 2001
From: Michael Trotter <spicydonuts@gmail.com>
Date: Thu, 21 Sep 2017 16:08:15 -0600
Subject: [PATCH] Fix `guard` example

---
 package.json               | 2 +-
 src/Control/MonadZero.purs | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/package.json b/package.json
index bf77170..c3124b2 100644
--- a/package.json
+++ b/package.json
@@ -6,7 +6,7 @@
     "test": "pulp test"
   },
   "devDependencies": {
-    "pulp": "^10.0.4",
+    "pulp": "^12.0.1",
     "purescript-psa": "^0.5.0-rc.1",
     "rimraf": "^2.6.1"
   }
diff --git a/src/Control/MonadZero.purs b/src/Control/MonadZero.purs
index a35295d..045f29d 100644
--- a/src/Control/MonadZero.purs
+++ b/src/Control/MonadZero.purs
@@ -47,9 +47,9 @@ instance monadZeroArray :: MonadZero Array
 -- | factors :: Int -> Array Int
 -- | factors n = do
 -- |   a <- 1..n
--- |   b <- a..n
+-- |   b <- 1..n
 -- |   guard $ a * b == n
--- |   pure [a, b]
+-- |   pure a
 -- | ```
 guard :: forall m. MonadZero m => Boolean -> m Unit
 guard true = pure unit