Update shiftjis.hs