क्लोजर में मैं अपने स्वयं के रिकॉर्ड और प्रकारों पर मानक क्लोजर संग्रह इंटरफेस कैसे कार्यान्वित कर सकता हूं?

Question

मैं एक सार तत्व बनाना चाहता हूं जो डेटाबेस तालिका का प्रतिनिधित्व करता है, लेकिन जिसे सभी सामान्य क्लोजर सीक्यू और कॉंज और सभी फैंसी सामानों का उपयोग करके एक्सेस किया जा सकता है। क्या कोई प्रोटोकॉल जोड़ने की ज़रूरत है?

Answer 1

हां। प्रोटोकॉल जावा इंटरफ़ेस clojure.lang.ISeq द्वारा परिभाषित किया गया है। आप clojure.lang.ASeq का विस्तार करना चाहते हैं जो इसके एक अमूर्त कार्यान्वयन प्रदान करता है।

यहां एक उदाहरण है: seq एक संसाधन का अमूर्त जो बंद करने योग्य है और seq समाप्त होने पर स्वचालित रूप से बंद हो जाता है। (कठोर परीक्षण नहीं किया गया)

(deftype CloseableSeq [delegate-seq close-fn] 
    clojure.lang.ISeq 
    (next [this] 
     (if-let [n (next delegate-seq)] 
     (CloseableSeq. n close-fn) 
     (.close this))) 
    (first [this] (if-let [f (first delegate-seq)] f (.close this))) 
    (more [this] (if-let [n (next this)] n '())) 
    (cons [this obj] (CloseableSeq. (cons obj delegate-seq) close-fn)) 
    (count [this] (count delegate-seq)) 
    (empty [this] (CloseableSeq. '() close-fn)) 
    (equiv [this obj] (= delegate-seq obj)) 
    clojure.lang.Seqable 
    (seq [this] this) 
    java.io.Closeable 
    (close [this] (close-fn)))