[Haskell-cafe] Re: Trying to implement this code

[Dmitry Vyal]

Lizz Ross wrote:
> 
> This gives me the error message :28 - Syntax error in input (unexpected 
> symbol "wrap")
> 

Sorry. Looks like my mailer ate tabulation.
Just correct the intendation:


-- loads list of strings in the tree
ins_list :: [String] -> BinTree Word_stat
ins_list lst = foldl ins_in_tree  Leaf (map wrap lst)
     where wrap :: String -> Word_stat
           wrap s = Word_stat s