graphql-engine/server/src-test/Data/Text/RawString.hs

module Data.Text.RawString (raw) where

import Hasura.Prelude
import Language.Haskell.TH
import Language.Haskell.TH.Quote

raw :: QuasiQuoter
raw =
  QuasiQuoter
    { quoteExp = pure . LitE . StringL,
      quotePat = const $ failWith "pattern",
      quoteType = const $ failWith "type",
      quoteDec = const $ failWith "declaration"
    }
  where
    failWith t = fail $ "illegal raw string quote location; expected expresion, got " <> t
server: rewrite remote input parsers to deal with partial variable expansion (fix hasura/graphql-engine#6656) GitOrigin-RevId: e0b197a0fd1e259d43e6152b726b350c4d527a4b 2021-05-24 23:12:53 +03:00			`module Data.Text.RawString (raw) where`

server, pro: actually reformat the code-base using ormolu This commit applies ormolu to the whole Haskell code base by running `make format`. For in-flight branches, simply merging changes from `main` will result in merge conflicts. To avoid this, update your branch using the following instructions. Replace `<format-commit>` by the hash of this commit. $ git checkout my-feature-branch $ git merge <format-commit>^ # and resolve conflicts normally $ make format $ git commit -a -m "reformat with ormolu" $ git merge -s ours post-ormolu https://github.com/hasura/graphql-engine-mono/pull/2404 GitOrigin-RevId: 75049f5c12f430c615eafb4c6b8e83e371e01c8e 2021-09-24 01:56:37 +03:00			`import Hasura.Prelude`
			`import Language.Haskell.TH`
			`import Language.Haskell.TH.Quote`
server: rewrite remote input parsers to deal with partial variable expansion (fix hasura/graphql-engine#6656) GitOrigin-RevId: e0b197a0fd1e259d43e6152b726b350c4d527a4b 2021-05-24 23:12:53 +03:00
			`raw :: QuasiQuoter`
server, pro: actually reformat the code-base using ormolu This commit applies ormolu to the whole Haskell code base by running `make format`. For in-flight branches, simply merging changes from `main` will result in merge conflicts. To avoid this, update your branch using the following instructions. Replace `<format-commit>` by the hash of this commit. $ git checkout my-feature-branch $ git merge <format-commit>^ # and resolve conflicts normally $ make format $ git commit -a -m "reformat with ormolu" $ git merge -s ours post-ormolu https://github.com/hasura/graphql-engine-mono/pull/2404 GitOrigin-RevId: 75049f5c12f430c615eafb4c6b8e83e371e01c8e 2021-09-24 01:56:37 +03:00			`raw =`
			`QuasiQuoter`
			`{ quoteExp = pure . LitE . StringL,`
			`quotePat = const $ failWith "pattern",`
			`quoteType = const $ failWith "type",`
			`quoteDec = const $ failWith "declaration"`
			`}`
server: rewrite remote input parsers to deal with partial variable expansion (fix hasura/graphql-engine#6656) GitOrigin-RevId: e0b197a0fd1e259d43e6152b726b350c4d527a4b 2021-05-24 23:12:53 +03:00			`where`
			`failWith t = fail $ "illegal raw string quote location; expected expresion, got " <> t`