Commands out of sync when using MultiStatements

[ocharles]

See the following GHCI session:

Prelude Database.MySQL.Simple Database.MySQL.Base Base> conn <- connect defaultConnectInfo { connectOptions = [ MultiStatements ]}
Prelude Database.MySQL.Simple Database.MySQL.Base Base> execute_ conn "SET @OLD_CHARACTER_SET_CLIENT=@@CHARACTER_SET_CLIENT" 
0
Prelude Database.MySQL.Simple Database.MySQL.Base Base> execute_ conn "SET @OLD_CHARACTER_SET_CLIENT=@@CHARACTER_SET_CLIENT" 
0
Prelude Database.MySQL.Simple Database.MySQL.Base Base> execute_ conn "SET @OLD_CHARACTER_SET_CLIENT=@@CHARACTER_SET_CLIENT; SET @OLD_CHARACTER_SET_CLIENT=@@CHARACTER_SET_CLIENT" 
0
Prelude Database.MySQL.Simple Database.MySQL.Base Base> execute_ conn "SET @OLD_CHARACTER_SET_CLIENT=@@CHARACTER_SET_CLIENT; SET @OLD_CHARACTER_SET_CLIENT=@@CHARACTER_SET_CLIENT" 
*** Exception: ConnectionError {errFunction = "query", errNumber = 2014, errMessage = "Commands out of sync; you can't run this command now"}