하스켈에서 지역에 따라 숫자의 형식을 지정하는 방법은 무엇입니까? 파이썬에서

Question

나는 로케일 설정에 따라 locale.format 꽤 인쇄 번호를 사용할 수 있습니다

>>> import locale 
>>> locale.setlocale(locale.LC_ALL, "en_US.UTF-8") 
'en_US.UTF-8' 
>>> locale.format("%.2f",1234567.89,grouping=True) 
'1,234,567.89' 

어떻게 하스켈에서 동일한 작업을 수행 할 수 있습니까? localeconv and setlocale 바인딩이 있다는 것을 알지만, Lconv을 존중하는 일반 예쁜 프린터가 있습니까?

Answer 1

내가 말하고자하는 것은 문제의 라이브러리가 누락 된 경우 자신에게 하나 (분명한 옵션, 쉽지 않음)를 쓰거나 필요한 기능에 대한 바인딩을 쓸 수 있다는 것입니다. 예를 들어, 전용의 sprintf 받을수 sprintf 바인딩 제한 두 배로

Double.hs :

{-# INCLUDE "double.h" #-} 
{-# LANGUAGE ForeignFunctionInterface #-} 
module Double (cPrintf) where 

import Foreign 
import Foreign.C.Types 
import System.IO.Unsafe 
import qualified Data.ByteString as B 

foreign import ccall "double.h toString" 
c_toString :: CDouble -> (Ptr Word8) -> CInt -> IO CInt 

buf = unsafePerformIO $ mallocBytes 64 

cPrintf :: Double -> B.ByteString 
cPrintf n = B.pack $ unsafePerformIO $ do 
    len <- c_toString (realToFrac n) buf 64 
    peekArray (fromIntegral len) buf 

double.h :

int toString(double a, char *buffer, int bufferLen); 

double.c :

#include <stdio.h> 
#include "double.h" 

int toString(double a, char *buffer, int bufferLen) { 
return snprintf(buffer, bufferLen, "%f", a); 
} 

을

빌드 이름 :

gcc -c double.c 
ghc --make Main.hs double.o