       (binding [*out* out
                 *cljs-ns* 'cljs.user
                 *cljs-file* (.getPath ^java.io.File src)
-                *position* (atom {:line 0 :col 0})]
+                *position* (atom {:gline 0 :gcol 0})]
         (loop [forms (forms-seq src)
                ns-name nil
                deps nil]

      :else (let [s (print-str x)]
              (when *position*
                (swap! *position*
                  (fn [{:keys [line col]}]
                    {:line line :col (+ col (count s))})))
              (print s))))
  nil)


  (println)
  (when *position*
    (swap! *position*
      (fn [{:keys [gline gcol]}]
        {:gline (inc gline) :gcol 0})))
  nil)

(defmulti emit-constant class)
