機能が部分的かどうかを確認するにはどうすればよいですか？

Question

Clojureで何かが一部の機能であるかどうかを確認することはできますか？

(partial? (partial + 10))のようなものがありますか？事前

Answer 1

で

おかげいいえ、部分によって作成された機能は、単に「通常」の機能であるため。 ただし、このように、それのためにいくつかのメタデータを使用することができます。

(defn partial2 [f & more] 
    (with-meta (apply partial f more) {:partial true})) 

(def partial-plus (partial2 + 1 2)) 

(meta partial-plus) ;;=> {:partial true} 

は本当にこのアプローチの結果を通じて考えていないけれども...

Kotarakが働くよりよい解決策を考え出したが、常にではない。たとえば、これを取る：

は

(partial? (partial + 1)) ;;=> true 
(partial? (partial + 1 2)) ;;=> false 

これは動作します：

(defn partial? [f] 
    (let [[fst snd] (-> (class f) (.getName) (string/split #"\$"))] 
    (= ["clojure.core" "partial"] [fst snd]))) 

を文字列/分割は、分割関数であると（1.3）またはclojure.contrib.str-utils2（1.2）clojure.stringから。

Answer 2

partialで作成された関数は普通の関数ですが、もしあなたが地獄に陥っているのであれば、おそらくこのようなものが役に立ちますか？ ：

(defn partial? 
    [f] 
    (clojure.contrib.string/substring? "partial" (str (class f)))) 

免責事項：このようなものがばかばかしいかどうかわかりません。

Answer 3

ハッキングで行うことができます。

user=> (let [partial-classes (map class [(partial + 1) 
             (partial + 1 2) 
             (partial + 1 2 3) 
             (partial + 1 2 3 4)])] 
     (defn partial? 
      [x] 
      (some #(instance? % x) partial-classes))) 
#'user/partial? 
user=> (partial? (partial - 1)) 
true 
user=> (partial? (partial - 1 2)) 
true 
user=> (partial? (partial - 1 2 3)) 
true 
user=> (partial? (apply partial - 1 2 [3 4 5])) 
true 

EDIT：ミシェルさんのコメントに応じて修正しました。あなたがpartialの内臓を知る必要があることは、ハッキーな性質を確認します。