你好:
我一直在研究 Self 语言,并尝试使用多方法来模拟 Self 风格的消息。我想知道大家对这个模式有什么看法
(ns self)
(def path "./hello.txt")
(defn inst [msg]
(if (map? msg) (keys msg) msg)
)
(defmulti hello inst)
(defmethod hello [:save] [msg]
(spit path (msg :save))
)
(defmethod hello :load [msg]
(slurp path)
)
(defn do-run [h]
(h {:save "world"})
(println (h :load))
)
(defn run [opts]
(do-run hello)
)
你认为这种模式有趣且有用吗?示例没有显示,但可能会有包含多个关键字的消息。
谢谢,
- Quenio