<div class="gmail_quote">If we change the code a bit,</div><div class="gmail_quote"><font class="Apple-style-span" face="&#39;courier new&#39;, monospace"><font class="Apple-style-span" face="arial"><br></font></font></div>
<div class="gmail_quote"><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"></blockquote><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">data MyAction = A1 Word8 | A2 Word16<br>
</font><div id=":2i6">
<font class="Apple-style-span" face="&#39;courier new&#39;, monospace"><br></font>
</div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">a,b :: Get MyAction¬†</font><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"></blockquote>
<font class="Apple-style-span" face="&#39;courier new&#39;, monospace">a = A1 &lt;$&gt; getWord8<br></font><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;"></blockquote>
<font class="Apple-style-span" face="&#39;courier new&#39;, monospace">b = A2 &lt;$&gt; getWord16be<br></font><div id=":2i6">
<font class="Apple-style-span" face="&#39;courier new&#39;, monospace"><br></font></div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">listOfActions :: [Get MyAction]¬†</font><div id=":2i6"><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">
listOfActions = [a,b,a]</font></div></div><div><br></div><div>Now, we know how to execute the list of actions, and get the output as list. Using the following guys:</div><div><br></div><div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">sequence :: Monad m =&gt; [m a] -&gt; m [a]</font></div>
<div><font class="Apple-style-span" face="&#39;courier new&#39;, monospace">runGet :: Get a -&gt; ByteString -&gt; a</font></div><br>Best,<br>
<div>Ozgur</div>