Error in solution to exercise

[Johannes Jansson]

Hi, there seems to be an error in the solution to question 3 of the exercises (http://www1.digitalgrammars.com/ipl-book/course-exercises/sol.html).

As the second param to an EAss constructor is of type Exp and not Stm the following

SWhile (EGt (EIdent (Ident "x")) (EIdent (Ident "y")))
    (SExp (EAss (Ident "y") (SExp (EAss (Ident "x") (EInt 3)))))

should be

SWhile (EGt (EIdent (Ident "x")) (EIdent (Ident "y")))
    (SExp (EAss (Ident "y") (EAss (Ident "x") (EInt 3))))

/Johannes