[Haskell-cafe] segfault depending on code position in source file

Damien Mattei damien.mattei at gmail.com
Thu Feb 21 15:13:46 UTC 2019

my code is structured like this , in summary:

-- this function will return th N°BD from Sidonie for a given name
-- note: names have been standardized between Sidonie and WDS
getAlphaDelta :: Connection -> String -> IO (Double,Double)
getAlphaDelta conn name = do
            let qry_head_AlphaDelta_AngularDistance = "select alpha,delta
from AngularDistance where Nom = ?" :: Query
            (alpha_delta_rows :: [(Double,Double)]) <- query conn
qry_head_AlphaDelta_AngularDistance (Only (name::String))
--            putStrLn $ show alpha_delta_rows
            return (head alpha_delta_rows)

main =

    conn <- connect defaultConnectInfo
      { connectHost = "moita",
        connectUser = "mattei",
        connectPassword = "sidonie2",
        connectDatabase = "sidonie" }

-- check getAlphaDelta works:

    let name3 = "A     7"
    putStrLn $ show name3
    ad3 <- getAlphaDelta conn name3
    putStr "ad3 ="
    putStrLn $ show ad3

this works i got result such as:
"A     7"
ad3 =(11297.0,-619.0)

if i move the 5 lines of code at the end of file it segfault

between the begin and end i have some DB connection and  queriung ,
filtering, mapping...

any idea?

should i really upgrade the version of GHCI?

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/haskell-cafe/attachments/20190221/e5f923a1/attachment.html>

More information about the Haskell-Cafe mailing list