correct a bug in pretty printer

	modified:   Parser.hs