diff --git a/frontends/ParseOccam.hs b/frontends/ParseOccam.hs
index a0a2ef7..20a6190 100644
--- a/frontends/ParseOccam.hs
+++ b/frontends/ParseOccam.hs
@@ -1907,6 +1907,10 @@ guard
     =   do m <- md
            (c, im) <- input
            return $ A.Alternative m (A.True m) c im
+    <|> do m <- md
+           sSKIP
+           eol
+           return $ A.AlternativeSkip m (A.True m)
     <|> do m <- md
            b <- tryVX expression sAmp
            do { (c, im) <- input; return $ A.Alternative m b c im }