1
Fork 0

fix website generation, update stack, a few small tweaks

This commit is contained in:
Jake Wheat 2024-10-07 12:17:25 +01:00
parent 6805383774
commit bd85f2ba74
7 changed files with 12 additions and 12 deletions

View file

@ -41,7 +41,8 @@ doc _ (LexTest d str _ _) =
doc _ (LexFails d str _) =
[Row (L.fromStrict str) (showResultL $ L.lexSQL d False "" Nothing str)]
doc _ (GeneralParseFailTest {}) = []
-- todo: find some way to render error message examples in a readable way
doc _ (GoldenErrorTest {}) = []
showResult :: Show a => Either P.ParseError a -> L.Text
showResult = either (("Left\n" <>) . L.fromStrict . P.prettyError) (L.pack . ppShow)

View file

@ -18,6 +18,8 @@ executable RenderTestCases
pretty-show,
hspec-expectations,
raw-strings-qq,
hspec-golden,
filepath,
default-language: Haskell2010
ghc-options: -Wall -O0
@ -38,6 +40,7 @@ executable RenderTestCases
Language.SQL.SimpleSQL.Pretty
Language.SQL.SimpleSQL.QueryExprComponents
Language.SQL.SimpleSQL.QueryExprs
Language.SQL.SimpleSQL.QueryExprParens
Language.SQL.SimpleSQL.SQL2011AccessControl
Language.SQL.SimpleSQL.SQL2011Bits
Language.SQL.SimpleSQL.SQL2011DataManipulation