Comment fix.

2024-01-31 05:24:16 +01:00 · 2024-01-31 05:24:16 +01:00 · 43d8ae9c0b
parent 2ef674e856
commit 43d8ae9c0b
1 changed files with 1 additions and 5 deletions
--- a/src/GenericParser/EmailAddress.purs
+++ b/src/GenericParser/EmailAddress.purs
@ -392,11 +392,7 @@ obs_dtext = CU.singleton <$> obs_no_ws_ctl <|> quoted_pair
 -- | obs-NO-WS-CTL: US-ASCII control characters without carriage return,
 -- | line feed and white space characters.
 -- |
-- | obs-NO-WS-CTL   =   `%d1-8 /            ; US-ASCII control`
-- |                     %d11 /             ;  characters that do not
-- |                     %d12 /             ;  include the carriage
-- |                     %d14-31 /          ;  return, line feed, and
-- |                     %d127              ;  white space characters
+-- | obs-NO-WS-CTL   =   `%d1-8 / %d11 / %d12 / %d14-31 / %d127`
 obs_no_ws_ctl :: forall e. Parser e Char
 obs_no_ws_ctl = sat cond
  where cond x = let charcode = C.toCharCode x