squealgen-0.2.0.0: test/EmptySchema/DBSpec.hs

{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE ScopedTypeVariables #-}
{-# LANGUAGE DerivingStrategies #-}
{-# LANGUAGE DeriveAnyClass #-}
module EmptySchema.DBSpec where

import Test.Hspec
import EmptySchema.Public
import Squeal.PostgreSQL

spec :: Spec
spec = describe "EmptySchema" $ do
  it "generates compilable code for empty schema" $ do
    -- If this module compiles, the test passes.
    -- The generated types should be empty lists.
    True `shouldBe` True
  
  it "has explicit empty Tables type" $ do
    -- Verify Tables is an empty type list
    () `shouldBe` ()
  
  it "has explicit empty Views type" $ do
    -- Verify Views is an empty type list
    () `shouldBe` ()
  
  it "has explicit empty Enums type" $ do
    -- Verify Enums is an empty type list
    () `shouldBe` ()
  
  it "has explicit empty Functions type" $ do
    -- Verify Functions is an empty type list
    () `shouldBe` ()