Comments on: frumiOS – a simple object-system for Clojure

By: Jaskirat

Jaskirat — Wed, 23 Feb 2011 07:43:46 +0000

um i tried to use an img tag i guess it got chomped What I was trying to say was that the namespace has expanded to look like a smiley because of “: o”

By: Jaskirat

Jaskirat — Wed, 23 Feb 2011 07:42:31 +0000

In the source code shown above for frumios, the OBJECT def seems to have expanded the “:org…” to the “rg…” . You might want to escape that.

By: Amit Rathore

Amit Rathore — Tue, 29 Dec 2009 22:44:24 +0000

Meikel,

Sweet! I didn’t know about condp – it reads so much nicer! Works very well for such let-over-lambda forms… thank you!

Regards,
Amit.

By: Meikel

Meikel — Tue, 29 Dec 2009 22:15:46 +0000

You know about condp?

(defn new-class
  [class-name parent methods]
  (let [klass ((comp resolve symbol name) class-name)]
    (fn [command & args]
      (condp = command
        :parent       parent
        :name         klass
        :method-names (keys methods)
        :methods      methods
        :new          (new-object klass)
        :method       (let [[method-name] args]
                        (find-method method-name methods parent))
        (throw (RuntimeException. (str "Unknown message: " command)))))))