git.iko.soy/squeal
on dev help sign in
1 line
e6d93ccEitan Chatav
squeal-postgresql/src/Squeal/PostgreSQL/Manipulation.hs+1−2
compare with dev
unifiedsplit
@@ -66,10 +66,9 @@ simple insert:
66
66
67>>> type Columns = '["col1" ::: 'NoDef :=> 'Null 'PGint4, "col2" ::: 'Def :=> 'NotNull 'PGint4]
67>>> type Columns = '["col1" ::: 'NoDef :=> 'Null 'PGint4, "col2" ::: 'Def :=> 'NotNull 'PGint4]
68>>> type Schema = '["tab" ::: 'Table ('[] :=> Columns)]
68>>> type Schema = '["tab" ::: 'Table ('[] :=> Columns)]
69−>>> type Schemas = (Public Schema)
70>>> :{
69>>> :{
71let
70let
72− manipulation :: Manipulation (DBof Schemas) '[] '[]
71+ manipulation :: Manipulation (DBof (Public Schemas)) '[] '[]
73 manipulation =
72 manipulation =
74 insertRow_ #tab (Set 2 `as` #col1 :* Default `as` #col2)
73 insertRow_ #tab (Set 2 `as` #col1 :* Default `as` #col2)
75in printSQL manipulation
74in printSQL manipulation