Update Test.hs for 1.2