Nobody on this one?<br>Here is a simplified version:<br><br>data Event a where<br>    InputChoice ::  a -&gt; Event a<br><br>How to serialize/deserialize this?<br><br>Cheers,<br>Corentin<br><br><div class="gmail_quote">On Sat, Oct 20, 2012 at 10:49 PM, Corentin Dupont <span dir="ltr">&lt;<a href="mailto:corentin.dupont@gmail.com" target="_blank">corentin.dupont@gmail.com</a>&gt;</span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">Hi the list!<br>I have a simple question, how can I serialize/deserialize a structure like this:<br><br>data InputChoice c  deriving Typeable<br>
data Event a where<br>    InputChoice :: (Eq c, Show c) =&gt; [c] -&gt; c -&gt; Event (InputChoice c)<br>
 (...)<br><br>I&#39;d like that the values of type &quot;c&quot; get serialized to a String... That&#39;s the easy part, but for deserializing, oops!<br><br>Cheers,<br>Corentin<br>
</blockquote></div><br>