@@ -56,7 +56,6 @@ module Squeal.PostgreSQL.Definition
5656 , addColumnDefault
5757 , addColumnNull
5858 , dropColumn
59− -- , dropColumnCascade
6059 , renameColumn
6160 , alterColumn
6261 , AlterColumn (UnsafeAlterColumn, renderAlterColumn)
@@ -130,9 +129,9 @@ createTable table columns constraints = UnsafeDefinition $
130129-- >>> :set -XOverloadedLabels
131130-- >>> :{
132131-- renderDefinition $
133−-- createTable #tab (int `As` #a :* real `As` #b :* Nil) Nil
132+-- createTableIfNotExists #tab (int `As` #a :* real `As` #b :* Nil) Nil
134133-- :}
135−-- "CREATE TABLE tab (a int, b real);"
134+-- "CREATE TABLE IF NOT EXISTS tab (a int, b real);"
136135createTableIfNotExists
137136 :: ( Has table schema (constraints :=> columns)
138137 , SOP.SListI columns