Extract Hasura.Prelude from src-lib

PR-URL: https://github.com/hasura/graphql-engine-mono/pull/5776
GitOrigin-RevId: 0df263a4d800e694e68e31c189c360c88cf48abc

server/graphql-engine.cabal

@@ -159,6 +159,7 @@ common lib-depends
                      , free
                      , hashable
                      , hasura-error-message
+                     , hasura-prelude
                      , hasura-schema-parsers
                      , http-client-tls
                      , http-conduit
@@ -420,7 +421,6 @@ library
                      , Data.Text.Casing
                      , Data.Text.Extended
                      , Data.Text.NonEmpty
-                     , Data.Time.Clock.Units
                      , Data.Trie
                      , Data.URL.Template
                      , Database.MSSQL.Transaction
@@ -634,7 +634,6 @@ library
                      , Hasura.Server.Types
                      , Hasura.Server.Utils
                      , Hasura.Server.Version
-                     , Hasura.Prelude
 
                      , Hasura.EncJSON
                      , Hasura.GraphQL.Execute.Query
@@ -905,6 +904,7 @@ executable graphql-engine
                    , bytestring
                    , ekg-core
                    , ekg-prometheus
+                   , hasura-prelude
                    , kan-extensions
                    , pg-client
                    , text
@@ -1136,6 +1136,7 @@ test-suite tests-hspec
     , graphql-engine
     , graphql-parser
     , haskell-src-meta
+    , hasura-prelude
     , hedgehog
     , hspec
     , hspec >=2.8.3 && <3

server/lib/hasura-prelude/hasura-prelude.cabal

@@ -0,0 +1,30 @@
+cabal-version: 3.0
+name: hasura-prelude
+version: 0.1.0.0
+
+library
+    hs-source-dirs: src
+    build-depends:
+      aeson,
+      aeson-casing,
+      base,
+      base64-bytestring,
+      bytestring,
+      containers,
+      deepseq,
+      hashable,
+      insert-ordered-containers,
+      lens,
+      mtl,
+      nonempty-containers,
+      pretty-simple,
+      text,
+      time,
+      transformers,
+      transformers-base,
+      unordered-containers,
+      witherable
+    default-language: Haskell2010
+    exposed-modules:
+      Data.Time.Clock.Units
+      Hasura.Prelude

server/lib/hasura-prelude/src/Data/Time/Clock/Units.hs

@@ -1,4 +1,13 @@
+{-# LANGUAGE AllowAmbiguousTypes #-}
+{-# LANGUAGE DataKinds #-}
+{-# LANGUAGE DerivingVia #-}
+{-# LANGUAGE GeneralisedNewtypeDeriving #-}
+{-# LANGUAGE ImportQualifiedPost #-}
+{-# LANGUAGE KindSignatures #-}
 {-# LANGUAGE NumDecimals #-}
+{-# LANGUAGE ScopedTypeVariables #-}
+{-# LANGUAGE TypeApplications #-}
+{-# LANGUAGE TypeOperators #-}
 
 -- | Types for time intervals of various units. Each newtype wraps 'DiffTime',
 -- but they have different 'Num' instances. The intent is to use the record

server/lib/hasura-prelude/src/Hasura/Prelude.hs

@@ -1,3 +1,6 @@
+{-# LANGUAGE BangPatterns #-}
+{-# LANGUAGE ImportQualifiedPost #-}
+{-# LANGUAGE LambdaCase #-}
 {-# OPTIONS_GHC -fno-warn-orphans #-}
 {-# OPTIONS_GHC -fno-warn-redundant-constraints #-}