एक यूटीएफ -8-एन्कोडेड बाइटस्ट्रिंग

Question

आउटपुट करने के लिए हास्केल का उपयोग करना मैं कंसोल में यूटीएफ -8-एन्कोडेड डेटा को आउटपुट करने की कोशिश कर रहा हूं।

मैंने String का उपयोग करके इसे पूरा करने में कामयाब रहा है, लेकिन अब मैं ByteString के साथ ऐसा करना चाहता हूं। क्या ऐसा करने का एक अच्छा और तेज़ तरीका है?

यह मैं अब तक क्या मिल गया है, और यह काम नहीं कर रहा:

import Prelude hiding (putStr) 
import Data.ByteString.Char8 (putStr, pack) 

main :: IO() 
main = putStr $ pack "čušpajž日本語" 

यह uapaj~�,� बाहर प्रिंट, ओह।

मुझे नवीनतम जीएचसी 6.12.1 सर्वोत्तम के लिए उत्तर चाहिए, हालांकि मैं पिछले संस्करणों के उत्तर भी सुनना चाहता हूं।

धन्यवाद!

अद्यतन: पाठ की एक ही यूटीएफ -8-एन्कोडेड लाइन को पढ़ना और आउटपुट करना ठीक से काम करता है। (Data.ByteString.Char8 का उपयोग करके, मैं बस putStr =<< getLine करता हूं।) लेकिन उपरोक्त उदाहरण में, .hs फ़ाइल के अंदर से पैक किए गए मान, ठीक से आउटपुट करने से इनकार करते हैं ... मुझे कुछ गलत करना होगा?

Answer 1

utf8-string bytestrings का समर्थन करता है।

import Prelude hiding (putStr) 
import Data.ByteString.Char8 (putStr) 
import Data.ByteString.UTF8 (fromString) 

main :: IO() 
main = putStr $ fromString "čušpajž日本語" 

Answer 2

This is a known ghc bug, marked "wontfix".

Answer 3

bytestrings बाइट्स के तार कर रहे हैं। जब वे आउटपुट होते हैं, तो उन्हें 8 बिट्स तक छोटा कर दिया जाएगा, क्योंकि यह Data.ByteString.Char8 के लिए प्रलेखन में वर्णन करता है। हैकेज पर utf8-string पैकेज के माध्यम से आपको उन्हें utf8 में स्पष्ट रूप से रूपांतरित करने की आवश्यकता होगी, जिसमें बाइटस्टर्स के लिए समर्थन शामिल है।

---

हालांकि, 2011 के रूप में, आप text पैकेज तेजी से, पैक यूनिकोड उत्पादन के लिए उपयोग करना चाहिए। GHC truncating Unicode character output

आपका उदाहरण बहुत आसान हो जाता है:

{-# LANGUAGE OverloadedStrings #-} 

import qualified Data.Text as T 
import qualified Data.Text.IO as T 

main = T.putStrLn "čušpajž日本語" 

तो जैसा

:

$ runhaskell A.hs 
čušpajž日本語