   (is (= 3.14159 (parse-str "3.14159")))
   (is (= 6.022e23 (parse-str "6.022e23"))))
 
+(deftest can-read-bigdec
+  (is (= 3.14159M (parse-str "3.14159" :bigdec true))))
+
 (deftest can-read-null
   (is (= nil (parse-str "null"))))
 

(deftest can-get-string-keys
  (is (= {"a" [1 2 {"b" [3 "four"]} 5.5]}
         (parse-str "{\"a\":[1,2,{\"b\":[3,\"four\"]},5.5]}"))))

(declare pass1-string)


(ns clojure.data.json-test
  (:use clojure.test clojure.data.json))

(deftest can-read-from-pushback-reader
  (let [s (java.io.PushbackReader. (java.io.StringReader. "42"))]
    (is (= 42 (parse s)))))

(deftest can-read-from-reader
  (let [s (java.io.StringReader. "42")]
    (is (= 42 (parse s)))))

(deftest can-read-numbers
  (is (= 42 (parse-str "42")))
