Update GHCS.hs