3
JSON 파일을 부동 소수점 숫자로 디코딩하려고하면 Text.JSON 패키지에서 JSRational로 숫자를 제공합니다. 그래서 JSRational에서 readJSON을 할 수 있습니다. 그러나, 나는 합리적인 숫자를 쓸 수 없다! 이거 목적이 있니?Haskell Text.Json 패키지는 Rationals를 읽을 수는 있지만 쓸 수는 없습니까?
JSON 파일을 부동 소수점 숫자로 디코딩하려고하면 Text.JSON 패키지에서 JSRational로 숫자를 제공합니다. 그래서 JSRational에서 readJSON을 할 수 있습니다. 그러나, 나는 합리적인 숫자를 쓸 수 없다! 이거 목적이 있니?Haskell Text.Json 패키지는 Rationals를 읽을 수는 있지만 쓸 수는 없습니까?
배경은 JSON 형식의 유형 태그를 통해 구별되지 않는 부동 소수점 유형과 정수 유형을 JSON이 결합한다는 것입니다. 따라서 우리는 JSON의 모든 숫자 유형을 Rationals를 통해 표시합니다. JSON 타입으로 변환하는
인스턴스 합리적 위해 등을 두 번, 인터넷 용 제공되지 않지만 - 이것에 대한 좋은 이유는 실제로 존재하지 불구하고, 인스턴스가 사소한 같이
instance JSON Rational where
showJSON r = JSRational True r
readJSON (JSRational _ r) = return r