                             (if (fs/absolute? filename)
                               (fs/file filename)
                               (fs/file (get-cwd) filename)))
+          data (encode-ir-tokens-as-strings data)
           data (if (map? data)
                  ;; (if (= file-format "edn-mixed")
                  ;;   (sort-mixed-map data)


(defn get-cwd []
  @cwd)

;; file-format's supported: edn edn-mixed json string
;; if input is a map, sort it as a homogeneous key map

          rv (if (and (= lb 0) (= ub :infinity))
               nil ;; do NOT explicitly return default bounds
               [lb ub])]
      rv)))
