ओवरराइडिंग वेरिएबल नामों से बचें

Question

किसी विशेष नामस्थान पर मैं काम कर रहा हूं, मैं फ़ंक्शन नामों से बाहर निकलना शुरू कर रहा हूं। अगर मैं एक ऐसे नाम का पुन: उपयोग करता हूं जो पहले से ही उसी नामस्थान में किसी फ़ंक्शन से जुड़ा हुआ है, तो मुझे एक अन्य नामस्थान से एक प्रतीक ओवरराइड करने की तरह चेतावनी प्राप्त करने का कोई तरीका है?

Answer 1

तो यह एक समस्या के लिए पर्याप्त है कि आप एक कोर मैक्रो (रों) (का सेट) को बदलने के लिए तैयार हो जाएगा है, तो आप इस दृष्टिकोण की कोशिश कर सकते defn साथ वार असफल हो जायेगी:

user=> (defn foo [] :foo) 
#'user/foo 
user=> (defn foo [] :bar) 
AssertionError Assert failed: Attempting to redefine already defined Var #'user/foo 
(nil? (resolve name)) user/defn (NO_SOURCE_FILE:2) 

आप इसी तरह defmacro की जगह सकता है; उस स्थिति में आपको अपने स्वयं के संस्करण को परिभाषित करते समय clojure.core/defmacro पर कॉल करना होगा।

सादा, unadorned def एक विशेष रूप है और संकलक से जादू उपचार प्राप्त करता है, ताकि आप इसके साथ मौजूदा वर्रों को ओवरराइट कर सकें। यदि आप उस झुकाव पर भी नाम झड़पों से बचना चाहते हैं, तो आप एक समान कस्टम जोर के साथ defvar (clojure.contrib.def में उपलब्ध होने के लिए उपयोग किए गए) पर स्विच कर सकते हैं।

Answer 2

यह आपके प्रश्न का उत्तर नहीं है लेकिन इस मुद्दे से बचने में आपकी मदद कर सकता है कि आपके नामस्थान में फ़ंक्शंस का उपयोग कैसे किया जा रहा है। आप letfn का उपयोग करके स्थानीय कार्यों में उन्हें बना सकते हैं, जिससे आप उन फ़ंक्शंस के नामों का पुन: उपयोग कर सकते हैं जिनका उपयोग केवल किसी अन्य फ़ंक्शन के संदर्भ में किया जाता है।

(defn main-fn [x] 
    (letfn [(secondary-fn [x] (* x x)) 
      (another-fn [x] (secondary-fn (inc x)))] 
    (/ (another-fn x) 4))) 

Answer 3

यहां तक ​​कि अगर आप अपने आप को एकल चरित्र फ़ंक्शन नाम तक सीमित है, तो आप बाहर चलाने का कोई खतरे में हैं, के रूप में वहाँ (के बारे में) 64 हजार यूनिकोड वर्ण हैं, जिनमें से किसी भी एक के लिए एक वैध समारोह का नाम है।

यह देखते हुए कि आप वास्तव में ऐसे नाम हैं जो दस हजार वर्ण लंबे हैं, आप भी सुरक्षित जमीन पर हैं।

(ns huge.core 
    (:refer-clojure :exclude [defn])) 

(defmacro defn [name & defn-tail] 
    (assert (nil? (resolve name)) 
      (str "Attempting to redefine already defined Var " 
       "#'" (.name *ns*) "/" name)) 
    `(clojure.core/defn ~name ~@defn-tail)) 

फिर एक मौजूदा फिर से परिभाषित करने का कोई भी प्रयास: