Support Shift_JIS to Data.Encoding of Haskell module