I am new to haskell plz dnt mind<br><br><br>scan :: [Char] -&gt; Token<br>scan (&#39;i&#39;:&#39;f&#39;:tl)  = IfKeyword <br>scan (&#39;t&#39;:&#39;h&#39;:&#39;e&#39;:&#39;n&#39;:tl)  = ThenKeyword<br>scanp :: [Char] -&gt; [Token]<br>
scanp t  = sequence (map scan t) <br>
<br>when I call scan on my file which has &quot;if then&quot;<br>then its just printing if as IfKeyword ..its nt talking the then word<br><br>I tried using sequence but its nt working..Can you please help me out..<br><br>

I have to get the output as a list of tokens<br><br>[IfKeyword, ThenKeyword]