on dev help sign in
scrap a Nil
5dd61abEitan Chatav
squeal-postgresql/src/Squeal/PostgreSQL/Definition.hs+1−1
@@ -1167,7 +1167,7 @@ languageSqlExpr
1167 -> FunctionDefinition schemas args ('Returns ret)
1167 -> FunctionDefinition schemas args ('Returns ret)
1168languageSqlExpr expr = UnsafeFunctionDefinition $
1168languageSqlExpr expr = UnsafeFunctionDefinition $
1169 "language sql as"
1169 "language sql as"
1170− <+> "$$" <+> renderSQL (values_ (expr `as` #ret :* Nil)) <+> "$$"
1170+ <+> "$$" <+> renderSQL (values_ (expr `as` #ret)) <+> "$$"
1171
1171
1172languageSqlQuery
1172languageSqlQuery
1173 :: Query '[] '[] schemas args rets
1173 :: Query '[] '[] schemas args rets