<html>
  <head>
    <meta http-equiv="Content-Type" content="text/html; charset=UTF-8">
  </head>
  <body text="#000000" bgcolor="#FFFFFF">
    <p>Well, it's kind of difficult to tell if it's a compiler bug
      without at least trying different GHC versions.<br>
      <br>
      As it stands I don't think there's enough information to diagnose
      the problem. Perhaps provide something reproducible that we could
      build on our machines?<br>
      <br>
      Cheers,<br>
      Vanessa McHale<br>
    </p>
    <div class="moz-cite-prefix">On 2/21/19 9:13 AM, Damien Mattei
      wrote:<br>
    </div>
    <blockquote type="cite"
cite="mid:CADEOaddobxowBA-BejE7QJPT6Vq=bJGVDtj1p9x-TzX7aEmnJw@mail.gmail.com">
      <meta http-equiv="content-type" content="text/html; charset=UTF-8">
      <div dir="ltr">
        <div dir="ltr">
          <div dir="ltr">
            <div dir="ltr">
              <div class="gmail_default" style="font-size:large">my code
                is structured like this , in summary:</div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large">-- this
                function will return th N°BD from Sidonie for a given
                name<br>
                -- note: names have been standardized between Sidonie
                and WDS<br>
                getAlphaDelta :: Connection -> String -> IO
                (Double,Double)<br>
                getAlphaDelta conn name = do<br>
                            let qry_head_AlphaDelta_AngularDistance =
                "select alpha,delta from AngularDistance where Nom = ?"
                :: Query<br>
                            (alpha_delta_rows :: [(Double,Double)])
                <- query conn qry_head_AlphaDelta_AngularDistance
                (Only (name::String))<br>
                --            putStrLn $ show alpha_delta_rows<br>
                            return (head alpha_delta_rows)<br>
              </div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large">main =<br>
                <br>
                  do<br>
                    conn <- connect defaultConnectInfo<br>
                      { connectHost = "moita",<br>
                        connectUser = "mattei",<br>
                        connectPassword = "sidonie2",<br>
                        connectDatabase = "sidonie" }<br>
                <br>
                <br>
                -- check getAlphaDelta works:<br>
                  <br>
                    let name3 = "A     7"<br>
                    putStrLn $ show name3<br>
                    ad3 <- getAlphaDelta conn name3<br>
                    putStr "ad3 ="<br>
                    putStrLn $ show ad3</div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large">this
                works i got result such as:</div>
              <div class="gmail_default" style="font-size:large">"A    
                7"<br>
                ad3 =(11297.0,-619.0)</div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large">if i
                move the 5 lines of code at the end of file it segfault</div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large">between
                the begin and end i have some DB connection and 
                queriung , filtering, mapping...<br>
              </div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large">any
                idea?</div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large">should
                i really upgrade the version of GHCI?</div>
              <div class="gmail_default" style="font-size:large"><br>
              </div>
              <div class="gmail_default" style="font-size:large">Damien<br>
              </div>
            </div>
          </div>
        </div>
      </div>
      <br>
      <fieldset class="mimeAttachmentHeader"></fieldset>
      <pre class="moz-quote-pre" wrap="">_______________________________________________
Haskell-Cafe mailing list
To (un)subscribe, modify options or view archives go to:
<a class="moz-txt-link-freetext" href="http://mail.haskell.org/cgi-bin/mailman/listinfo/haskell-cafe">http://mail.haskell.org/cgi-bin/mailman/listinfo/haskell-cafe</a>
Only members subscribed via the mailman list are allowed to post.</pre>
    </blockquote>
  </body>
</html>