Resolving dependencies... Configuring dlist-0.8.0.2... Configuring mtl-2.2.1... Building mtl-2.2.1... Building dlist-0.8.0.2... Installed dlist-0.8.0.2 Configuring names-th-0.2.0.2... Building names-th-0.2.0.2... Configuring old-locale-1.0.0.7... Installed mtl-2.2.1 Building old-locale-1.0.0.7... Configuring sql-words-0.1.4.1... Installed names-th-0.2.0.2 Building sql-words-0.1.4.1... Configuring th-data-compat-0.0.2.2... Installed old-locale-1.0.0.7 Building th-data-compat-0.0.2.2... Configuring text-1.2.2.1... Installed sql-words-0.1.4.1 Building text-1.2.2.1... Configuring time-locale-compat-0.1.1.3... Installed th-data-compat-0.0.2.2 Building time-locale-compat-0.1.1.3... Configuring th-reify-compat-0.0.1.1... Installed time-locale-compat-0.1.1.3 Building th-reify-compat-0.0.1.1... Configuring utf8-string-1.0.1.1... Installed th-reify-compat-0.0.1.1 Building utf8-string-1.0.1.1... Installed utf8-string-1.0.1.1 Configuring persistable-record-0.4.1.0... Building persistable-record-0.4.1.0... Configuring old-time-1.1.0.3... Installed persistable-record-0.4.1.0 Building old-time-1.1.0.3... Installed text-1.2.2.1 Configuring relational-query-0.8.3.2... Building relational-query-0.8.3.2... Installed old-time-1.1.0.3 Configuring convertible-1.1.1.0... Building convertible-1.1.1.0... Installed convertible-1.1.1.0 Configuring HDBC-2.4.0.1... Building HDBC-2.4.0.1... Installed relational-query-0.8.3.2 Configuring relational-schemas-0.1.3.1... Building relational-schemas-0.1.3.1... Installed HDBC-2.4.0.1 Configuring HDBC-sqlite3-2.3.3.1... Building HDBC-sqlite3-2.3.3.1... Configuring HDBC-session-0.1.1.0... Installed HDBC-sqlite3-2.3.3.1 Building HDBC-session-0.1.1.0... Installed HDBC-session-0.1.1.0 Installed relational-schemas-0.1.3.1 Configuring relational-query-HDBC-0.6.0.2... Building relational-query-HDBC-0.6.0.2... Installed relational-query-HDBC-0.6.0.2 Downloading relational-record-examples-0.1.0.0... Configuring relational-record-examples-0.1.0.0... Building relational-record-examples-0.1.0.0... Failed to install relational-record-examples-0.1.0.0 Build log ( /home/builder/.cabal/logs/relational-record-examples-0.1.0.0.log ): cabal: Entering directory '/tmp/cabal-tmp-27636/relational-record-examples-0.1.0.0' Configuring relational-record-examples-0.1.0.0... Building relational-record-examples-0.1.0.0... Preprocessing executable 'examples' for relational-record-examples-0.1.0.0... [1 of 6] Compiling DataSource ( src/DataSource.hs, dist/build/examples/examples-tmp/DataSource.o ) src/DataSource.hs:35:6: warning: [-Wdeprecations] In the use of ‘derivingShow’ (imported from Database.Record.TH): Deprecated: "Use TH quasi-quotation like ''Show instead of this." [2 of 6] Compiling Department ( src/Department.hs, dist/build/examples/examples-tmp/Department.o ) [3 of 6] Compiling Employee ( src/Employee.hs, dist/build/examples/examples-tmp/Employee.o ) [4 of 6] Compiling Product ( src/Product.hs, dist/build/examples/examples-tmp/Product.o ) [5 of 6] Compiling Account ( src/Account.hs, dist/build/examples/examples-tmp/Account.o ) [6 of 6] Compiling Main ( src/examples.hs, dist/build/examples/examples-tmp/Main.o ) src/examples.hs:63:13: error: • Couldn't match type ‘GHC.Int.Int32’ with ‘Int64’ Expected type: Relation () (((Int64, String), Int64), Maybe Double) Actual type: Relation () (((GHC.Int.Int32, String), GHC.Int.Int32), Maybe Double) • In the expression: relation $ do { a <- query account; wheres $ a ! Account.productCd' `in'` values ["CHK", "SAV", ....]; return $ a ! Account.accountId' >< a ! Account.productCd' >< a ! Account.custId' >< a ! Account.availBalance' } In an equation for ‘account1T’: account1T = relation $ do { a <- query account; wheres $ a ! Account.productCd' `in'` values ["CHK", ....]; return $ a ! Account.accountId' >< a ! Account.productCd' >< a ! Account.custId' >< a ! Account.availBalance' } src/examples.hs:72:25: error: • Couldn't match type ‘GHC.Int.Int32’ with ‘Int64’ Expected type: Projection Flat Int64 Actual type: Projection Flat GHC.Int.Int32 • In the second argument of ‘(|$|)’, namely ‘a ! Account.accountId'’ In the first argument of ‘(|*|)’, namely ‘Account1 |$| a ! Account.accountId'’ In the first argument of ‘(|*|)’, namely ‘Account1 |$| a ! Account.accountId' |*| a ! Account.productCd'’ src/examples.hs:74:25: error: • Couldn't match type ‘GHC.Int.Int32’ with ‘Int64’ Expected type: Projection Flat Int64 Actual type: Projection Flat GHC.Int.Int32 • In the second argument of ‘(|*|)’, namely ‘a ! Account.custId'’ In the first argument of ‘(|*|)’, namely ‘Account1 |$| a ! Account.accountId' |*| a ! Account.productCd' |*| a ! Account.custId'’ In the second argument of ‘($)’, namely ‘Account1 |$| a ! Account.accountId' |*| a ! Account.productCd' |*| a ! Account.custId' |*| a ! Account.availBalance'’ src/examples.hs:146:13: error: • Couldn't match type ‘GHC.Int.Int32’ with ‘Int64’ Expected type: Relation () (Maybe Int64, Maybe Int64) Actual type: Relation () (Maybe GHC.Int.Int32, Maybe GHC.Int.Int32) • In the expression: relation $ do { e <- query employee; wheres $ e ! Employee.title' .=. just (value "Teller"); return $ just (e ! Employee.empId') >< e ! Employee.assignedBranchId' } In an equation for ‘employee1’: employee1 = relation $ do { e <- query employee; wheres $ e ! Employee.title' .=. just (value "Teller"); return $ just (e ! Employee.empId') >< e ! Employee.assignedBranchId' } src/examples.hs:152:12: error: • Couldn't match type ‘GHC.Int.Int32’ with ‘Int64’ Expected type: Relation () (Maybe Int64, Maybe Int64) Actual type: Relation () (Maybe GHC.Int.Int32, Maybe GHC.Int.Int32) • In the expression: relation $ do { a <- query account; wheres $ a ! Account.productCd' .=. value "SAV"; return $ a ! Account.openEmpId' >< a ! Account.openBranchId' } In an equation for ‘account2’: account2 = relation $ do { a <- query account; wheres $ a ! Account.productCd' .=. value "SAV"; return $ a ! Account.openEmpId' >< a ! Account.openBranchId' } src/examples.hs:164:11: error: • Couldn't match type ‘GHC.Int.Int32’ with ‘Int64’ Expected type: Relation () (Maybe Int64, Maybe Int64) Actual type: Relation () (Maybe GHC.Int.Int32, Maybe GHC.Int.Int32) • In the expression: relation (do { e <- query employee; wheres $ e ! Employee.title' .=. just (value "Teller"); return $ just (e ! Employee.empId') >< e ! Employee.assignedBranchId' }) `union` relation (do { a <- query account; wheres $ a ! Account.productCd' .=. value "SAV"; return $ a ! Account.openEmpId' >< a ! Account.openBranchId' }) In an equation for ‘union1'’: union1' = relation (do { e <- query employee; wheres $ e ! Employee.title' .=. just (value "Teller"); return $ just (e ! Employee.empId') >< e ! Employee.assignedBranchId' }) `union` relation (do { a <- query account; wheres $ a ! Account.productCd' .=. value "SAV"; return $ a ! Account.openEmpId' >< a ! Account.openBranchId' }) src/examples.hs:184:10: error: • Couldn't match type ‘GHC.Int.Int32’ with ‘Int64’ Expected type: Relation () (Maybe Int64, Int64) Actual type: Relation () (Maybe GHC.Int.Int32, Int64) • In the expression: aggregateRelation $ do { a <- query account; g <- groupBy $ a ! Account.openEmpId'; asc $ g ! id'; return $ g >< count (a ! Account.accountId') } In an equation for ‘group1’: group1 = aggregateRelation $ do { a <- query account; g <- groupBy $ a ! Account.openEmpId'; asc $ g ! id'; .... } src/examples.hs:214:13: error: • Couldn't match type ‘GHC.Int.Int32’ with ‘Int64’ Expected type: Relation String (((Int64, String), Int64), Maybe Double) Actual type: Relation String (((GHC.Int.Int32, String), GHC.Int.Int32), Maybe Double) • In the expression: relation' $ do { a <- query account; (phProductCd, p) <- queryList' product1; wheres $ a ! Account.productCd' `in'` p; let at = a ! Account.accountId' >< a ! Account.productCd' >< a ! Account.custId' >< a ! Account.availBalance'; .... } In an equation for ‘account3T’: account3T = relation' $ do { a <- query account; (phProductCd, p) <- queryList' product1; wheres $ a ! Account.productCd' `in'` p; .... } src/examples.hs:226:25: error: • Couldn't match type ‘GHC.Int.Int32’ with ‘Int64’ Expected type: Projection Flat Int64 Actual type: Projection Flat GHC.Int.Int32 • In the second argument of ‘(|$|)’, namely ‘a ! Account.accountId'’ In the first argument of ‘(|*|)’, namely ‘Account1 |$| a ! Account.accountId'’ In the first argument of ‘(|*|)’, namely ‘Account1 |$| a ! Account.accountId' |*| a ! Account.productCd'’ src/examples.hs:228:25: error: • Couldn't match type ‘GHC.Int.Int32’ with ‘Int64’ Expected type: Projection Flat Int64 Actual type: Projection Flat GHC.Int.Int32 • In the second argument of ‘(|*|)’, namely ‘a ! Account.custId'’ In the first argument of ‘(|*|)’, namely ‘Account1 |$| a ! Account.accountId' |*| a ! Account.productCd' |*| a ! Account.custId'’ In the expression: Account1 |$| a ! Account.accountId' |*| a ! Account.productCd' |*| a ! Account.custId' |*| a ! Account.availBalance' cabal: Leaving directory '/tmp/cabal-tmp-27636/relational-record-examples-0.1.0.0' cabal: Error: some packages failed to install: relational-record-examples-0.1.0.0 failed during the building phase. The exception was: ExitFailure 1