<pre style="margin-top:0px;margin-bottom:0px;font-size:13px;text-align:left;background-color:rgb(255,255,255)"><span class="hs-keyword"><font face="arial, helvetica, sans-serif">I&#39;m trying to use postgresql enum types to represent Haskell types like in the code snippet below but an receiving the following error:</font></span></pre>

<pre style="margin-top:0px;margin-bottom:0px;font-size:13px;text-align:left;background-color:rgb(255,255,255)"><span class="hs-keyword"><pre style="color:rgb(0,0,0);text-align:-webkit-auto;word-wrap:break-word;white-space:pre-wrap">

&quot;Incompatible {errSQLType = &quot;x&quot;, errHaskellType = &quot;Text&quot;, errMessage = &quot;types incompatible&quot;}&quot;</pre><pre style="color:rgb(0,0,0);text-align:-webkit-auto;word-wrap:break-word;white-space:pre-wrap">

<font face="arial, helvetica, sans-serif">In other areas of my code (not shown) I&#39;m successfully using Text to convert to and from Postgersql enum types but it doesn&#39;t seem to work in the case below. Any ideas what I&#39;m doing wrong?</font></pre>

<pre style="color:rgb(0,0,0);text-align:-webkit-auto;word-wrap:break-word;white-space:pre-wrap"><font face="arial, helvetica, sans-serif">Thanks, Luke</font></pre><pre style="color:rgb(0,0,0);text-align:-webkit-auto;word-wrap:break-word;white-space:pre-wrap">

<br></pre></span></pre><pre style="margin-top:0px;margin-bottom:0px;font-size:13px;text-align:left;background-color:rgb(255,255,255)"><span class="hs-keyword" style="color:rgb(57,116,96)"><br></span></pre><pre style="margin-top:0px;margin-bottom:0px;font-size:13px;text-align:left;background-color:rgb(255,255,255)">

<span class="hs-keyword" style="color:rgb(57,116,96)"><br></span></pre><pre style="margin-top:0px;margin-bottom:0px;font-size:13px;text-align:left;background-color:rgb(255,255,255)"><span class="hs-keyword" style="color:rgb(57,116,96)">import</span>           <span class="hs-conid" style="color:rgb(79,67,113)">Database</span><span class="hs-varop" style="color:rgb(51,51,51)">.</span><span class="hs-conid" style="color:rgb(79,67,113)">PostgreSQL</span><span class="hs-varop" style="color:rgb(51,51,51)">.</span><span class="hs-conid" style="color:rgb(79,67,113)">Simple</span><span class="hs-varop" style="color:rgb(51,51,51)">.</span><span class="hs-conid" style="color:rgb(79,67,113)">FromField</span>        <span class="hs-layout">(</span><span class="hs-conid" style="color:rgb(79,67,113)">FromField</span><span class="hs-layout">,</span> <span class="hs-varid" style="color:rgb(51,51,51)">fromField</span><span class="hs-layout">)</span>
<span class="hs-keyword" style="color:rgb(57,116,96)">import</span>           <span class="hs-conid" style="color:rgb(79,67,113)">Database</span><span class="hs-varop" style="color:rgb(51,51,51)">.</span><span class="hs-conid" style="color:rgb(79,67,113)">PostgreSQL</span><span class="hs-varop" style="color:rgb(51,51,51)">.</span><span class="hs-conid" style="color:rgb(79,67,113)">Simple</span><span class="hs-varop" style="color:rgb(51,51,51)">.</span><span class="hs-conid" style="color:rgb(79,67,113)">FromRow</span>          <span class="hs-layout">(</span><span class="hs-conid" style="color:rgb(79,67,113)">FromRow</span><span class="hs-layout">,</span> <span class="hs-varid" style="color:rgb(51,51,51)">field</span><span class="hs-layout">,</span> <span class="hs-varid" style="color:rgb(51,51,51)">fromRow</span><span class="hs-layout">)</span>
<span class="hs-keyword" style="color:rgb(57,116,96)">import</span>           <span class="hs-conid" style="color:rgb(79,67,113)">Database</span><span class="hs-varop" style="color:rgb(51,51,51)">.</span><span class="hs-conid" style="color:rgb(79,67,113)">PostgreSQL</span><span class="hs-varop" style="color:rgb(51,51,51)">.</span><span class="hs-conid" style="color:rgb(79,67,113)">Simple</span><span class="hs-varop" style="color:rgb(51,51,51)">.</span><span class="hs-conid" style="color:rgb(79,67,113)">SqlQQ</span>            <span class="hs-layout">(</span><span class="hs-varid" style="color:rgb(51,51,51)">sql</span><span class="hs-layout">)</span>


<span class="hs-keyword" style="color:rgb(57,116,96)">data</span> <span class="hs-conid" style="color:rgb(79,67,113)">X</span> <span class="hs-keyglyph">=</span> <span class="hs-conid" style="color:rgb(79,67,113)">X</span> <span class="hs-conid" style="color:rgb(79,67,113)">Float</span>
       <span class="hs-keyglyph">|</span> <span class="hs-conid" style="color:rgb(79,67,113)">Y</span> <span class="hs-conid" style="color:rgb(79,67,113)">Float</span>


<span class="hs-definition">buildX</span> <span class="hs-keyglyph">::</span> <span class="hs-conid" style="color:rgb(79,67,113)">Text</span> <span class="hs-keyglyph">-&gt;</span> <span class="hs-conid" style="color:rgb(79,67,113)">Float</span> <span class="hs-keyglyph">-&gt;</span> <span class="hs-conid" style="color:rgb(79,67,113)">X</span>
<span class="hs-definition">buildX</span> <span class="hs-str" style="color:rgb(54,99,84)">&quot;x&quot;</span>      <span class="hs-keyglyph">=</span> <span class="hs-conid" style="color:rgb(79,67,113)">X</span>
<span class="hs-definition">buildX</span> <span class="hs-str" style="color:rgb(54,99,84)">&quot;y&quot;</span>      <span class="hs-keyglyph">=</span> <span class="hs-conid" style="color:rgb(79,67,113)">Y</span>


<span class="hs-keyword" style="color:rgb(57,116,96)">instance</span> <span class="hs-conid" style="color:rgb(79,67,113)">FromField</span> <span class="hs-layout">(</span><span class="hs-conid" style="color:rgb(79,67,113)">Float</span> <span class="hs-keyglyph">-&gt;</span> <span class="hs-conid" style="color:rgb(79,67,113)">X</span><span class="hs-layout">)</span> <span class="hs-keyword" style="color:rgb(57,116,96)">where</span>
    <span class="hs-varid" style="color:rgb(51,51,51)">fromField</span> <span class="hs-varid" style="color:rgb(51,51,51)">f</span> <span class="hs-varid" style="color:rgb(51,51,51)">v</span> <span class="hs-keyglyph">=</span> <span class="hs-varid" style="color:rgb(51,51,51)">buildX</span> <span class="hs-varop" style="color:rgb(51,51,51)">&lt;$&gt;</span> <span class="hs-varid" style="color:rgb(51,51,51)">fromField</span> <span class="hs-varid" style="color:rgb(51,51,51)">f</span> <span class="hs-varid" style="color:rgb(51,51,51)">v</span>


<span class="hs-keyword" style="color:rgb(57,116,96)">instance</span> <span class="hs-conid" style="color:rgb(79,67,113)">FromRow</span> <span class="hs-conid" style="color:rgb(79,67,113)">X</span> <span class="hs-keyword" style="color:rgb(57,116,96)">where</span>
    <span class="hs-varid" style="color:rgb(51,51,51)">fromRow</span> <span class="hs-keyglyph">=</span> <span class="hs-varid" style="color:rgb(51,51,51)">field</span> <span class="hs-varop" style="color:rgb(51,51,51)">&lt;*&gt;</span> (field :: RowParser Float)</pre>

<pre style="margin-top:0px;margin-bottom:0px;font-size:13px;text-align:left;background-color:rgb(255,255,255)"><br></pre><pre style="margin-top:0px;margin-bottom:0px;font-size:13px;text-align:left;background-color:rgb(255,255,255)">

<br></pre>