something

This commit is contained in:
crumbtoo
2024-01-02 08:04:49 -07:00
parent 0f04e2decf
commit c5c06fa6cb

View File

@@ -47,7 +47,7 @@ symbol :: Text -> Parser Text
symbol = L.symbol sc
sc :: Parser ()
sc = L.space space1 (void lineComment) (void blockComment)
sc = L.space hspace1 (void lineComment) (void blockComment)
-- TODO: return comment text
-- TODO: '---' should not start a comment
@@ -156,3 +156,7 @@ data Partial a = E (RlpExprF Name a)
type PartialExpr' = Y Partial
----------------------------------------------------------------------------------