on dev help sign in
parens
commit9e69de7a721ee5b349bbe0f98cef52a13bb519e4 authorEitan Chatav <eitan@Eitans-MacBook-Pro.local> dateWed 20 Mar 2019, 19:46 (8 years ago) parentd5bfbf1
1 file changed+2−2
squeal-postgresql/src/Squeal/PostgreSQL/Expression.hs+2−2
squeal-postgresql/src/Squeal/PostgreSQL/Expression.hs+2−2
@@ -2552,7 +2552,7 @@ instance RenderSQL TimeUnit where
25522552 Millennia -> "millennia"
25532553
25542554-- | >>> printSQL $ interval_ 7 Days
2555−-- INTERVAL '7.0 days'
2555+-- (INTERVAL '7.0 days')
25562556interval_ :: Double -> TimeUnit -> Expr (null 'PGinterval)
2557−interval_ num unit = UnsafeExpression $ "INTERVAL" <+>
2557+interval_ num unit = UnsafeExpression . parenthesized $ "INTERVAL" <+>
25582558 "'" <> fromString (show num) <+> renderSQL unit <> "'"