@@ -116,10 +116,10 @@ type CustomerColumns =
116type ShipperColumns =
116type ShipperColumns =
117 [ "shipperID" ::: 'PGInt4, "shipperVal" ::: 'PGBool ]
117 [ "shipperID" ::: 'PGInt4, "shipperVal" ::: 'PGBool ]
118type JoinTables =
118type JoinTables =
119− '[ "order" ::: OrderColumns
119+ [ "order" ::: OrderColumns
120− , "customer" ::: CustomerColumns
120+ , "customer" ::: CustomerColumns
121− , "shipper" ::: ShipperColumns
121+ , "shipper" ::: ShipperColumns
123type ValueColumns =
123type ValueColumns =
124 [ "orderVal" ::: 'PGText
124 [ "orderVal" ::: 'PGText
125 , "customerVal" ::: 'PGFloat4
125 , "customerVal" ::: 'PGFloat4