Contents

(ns octal)

(defn to-decimal [num]
  (loop [sum 0, num num]
    (if (empty? num)
      sum
      (let [diff (.compareTo (first num) \0)]
        (if (<= 0 diff 7)
          (recur (+ (* sum 8) diff) (next num))
          0)))))

Version data entries

396 entries across 396 versions & 1 rubygems

Version	Path
trackler-2.2.1.98	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.97	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.96	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.95	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.94	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.93	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.92	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.91	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.90	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.89	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.88	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.87	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.86	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.85	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.84	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.83	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.82	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.81	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.80	tracks/clojure/exercises/octal/src/example.clj
trackler-2.2.1.79	tracks/clojure/exercises/octal/src/example.clj