Modify example along with library update.

This commit is contained in:
Kei Hibino 2014-05-16 01:51:36 +09:00
parent 76f669e0a2
commit 0c4c58f786

View File

@ -38,7 +38,7 @@ pine = relation $ do
return $ StockGoods |$| value 6 |*| value "Pine" |*| value 300 |*| value 3
insertPine :: InsertQuery ()
insertPine = typedInsertQuery tableOfStockGoods pine
insertPine = derivedInsertQuery pine
fig :: Relation () StockGoods
fig = relation $ do