Take into account a doc-comment may lack space before bar

Credits for finding solution to Anders Lindgren at
Lindydancer/font-lock-studio#10

Fixes: #16

Author: Hi-Angel

purescript-font-lock.el

@@ -326,7 +326,7 @@ that should be commented under LaTeX-style literate scripts."
     ("\\s_\\{3,\\}" (0 (cond ((numberp (nth 4 (syntax-ppss)))
                               ;; There are no such instances inside nestable comments
                               nil)
-                             ((string-match "\\`-*\\'" (match-string 0))
+                             ((string-match "\\`-*|?\\'" (match-string 0))
                               ;; Sequence of hyphens.  Do nothing in
                               ;; case of things like `{---'.
                               nil)
@@ -376,7 +376,7 @@ that should be commented under LaTeX-style literate scripts."
    ((and purescript-font-lock-docstrings
          (save-excursion
            (goto-char (nth 8 state))
-           (looking-at "\\(-- \\|{-\\)[ \\t]*[|^]")))
+           (looking-at "\\(--\\|{-\\)[ \\t]*[|^]")))
     'font-lock-doc-face)
    (t 'font-lock-comment-face)))
 

tests/purescript-font-lock-tests.el

@@ -101,10 +101,11 @@ this = \"still a string\"
 
 (ert-deftest docs-bar-comment-different-spacings ()
   (purescript-test-ranges
-   "-- | Docs comment 1 space
+   "--|  Docs comment 0 space
+-- | Docs comment 1 space
 --    | Docs comment many spaces
 "
-   '((1 57 font-lock-doc-face))))
+   '((1 85 font-lock-doc-face))))
 
 (ert-deftest docs-bar-comment-continuation ()
   "Acc. to