Haskell Sqlite3-捕獲異常

Question

我想知道如果下面的代碼引發異常，如何捕獲異常

query_3 <- quickQuery' conn_1 "SELECT MAX(high) \
                              FROM historicalData " []                                    
mapM_ (putStrLn . convertSqlValToString) query_3   

我知道有可能使用名為“ catchSql”的東西，但不知道如何在上面的代碼中使用它

Answer 1

我現在無法對其進行測試，但是可以嘗試以下操作：

handleSql print $ do
    query_3 <- quickQuery' conn_1 "SELECT MAX(high) FROM historicalData" []
    mapM_ (putStrLn . convertSqlValToString) query_3

它用

handleSql :: (SqlError -> IO a) -> IO a -> IO a

（這只是catchSql :: IO a -> (SqlError -> IO a) -> IO a ，其參數已反轉）。

函數handleSql運行作為其第二個參數給出的操作，在您的情況下為quickQuery'后跟mapM_ 。 並且如果在該部分發生SqlError則會將其傳遞給作為第一個參數給出的函數。 因此，在上述例子中，如果一個SqlError內部塊期間出現， handleSql將調用print上它..