haskell GHC。 exe在执行sqlite3触发器时崩溃

Question

我写了以下触发器。当我执行它时，ghc。 exe崩溃。

它说“ghc.exe已停止工作。目前正在寻找解决此问题的方法。这是我从未经历过的事情。”

calculateNoOfStocksTraded ::String->Database.HDBC.Sqlite3.Connection->IO ()
calculateNoOfStocksTraded code conn=do                             
  res <- quickQuery' conn  "SELECT SUM(volume) FROM historicalData WHERE companyCode = ? " [toSql code]
  let conv=convertSqlValToInt res

  run conn "CREATE TRIGGER calStocks \
           \AFTER INSERT ON historicalData \
           \FOR EACH ROW \
           \BEGIN \
           \UPDATE company \
           \SET noOfStocks= ? ; \
           \END; " [toSql (conv::Integer)]

  commit conn