[cvs-nhc98] Correct type of hSetPosn :: HandlePosn -> IO ().