मन के साथ काम करना, हाथ नहीं: Emacs में टेक्स्ट एडिटिंग के प्रदर्शन को बढ़ाने का एक उदाहरण

कहानी

मैंने एक परियोजना को लगभग समाप्त कर दिया है और जैसा कि हमेशा होता है, आखिरी समय पर इसे बड़े पैमाने पर नियमित बदलाव करने की आवश्यकता थी।

यह विभिन्न यूनिक्स पर निर्माण प्रक्रिया को स्वचालित करने के लिए एक बैश स्क्रिप्ट थी और वास्तविकता यह है कि मेरे वातावरण और बिल्ड सर्वर वातावरण के बीच कुछ भी सामान्य नहीं था।

निष्कर्ष एक था: स्क्रिप्ट में पाए गए उपयोगिताओं के लिए पूर्ण पथ का उपयोग करना आवश्यक था। इसके लिए, मैंने चर का उपयोग करने का निर्णय लिया, जैसा कि GNU ऑटोकॉन्फ़ मेकफाइल में: “RM=/usr/local/bin/rm” और “${RM} -vf foo” ।

काम लगभग पूरा हो गया है, लेकिन मेरे पास 3 ऐसी स्क्रिप्ट हैं जो बहुत समान दिखती हैं और मैं बिल्कुल अपने हाथों से इन प्रतिस्थापनों को नहीं करना चाहता ... इसलिए मैंने Emacs में नए ' स्क्रैच * बफर ' के ' रिप्ले -स्ट्रिंग' के संस्करण को बनाने की कोशिश की, बस मेरी समस्या:

 (defun foo () (interactive) (let ((begin (region-beginning)) (end (region-end))) (mapcar #'(lambda (p) (replace-string (format "%s " (cadr p)) (format "${%s} " (car p)) nil begin end)) '((GNUTAR tar) (GUNZIP gunzip) (GZIP gzip) (GMAKE gmake) (AUTORECONF autoreconf) (MKDIR mkdir) (ECHO echo) (CP cp) (FIND find) (RM rm) (TEST test) (LN ln))))) 

और वह सब है!

अधिक विस्तार से, यह कोड क्या है

यह `फू ' फ़ंक्शन है, जिसे संपादक में अंतःक्रियात्मक रूप से कहा जा सकता है, अर्थात्। पाठ संपादित करते समय, और अन्य कार्यों के मुख्य भाग से नहीं। यह सूची में प्रत्येक तत्व के लिए 'रिप्ले-स्ट्रिंग' फ़ंक्शन की कार्रवाई का विस्तार करता है:

  ((GNUTAR tar) (GUNZIP gunzip) (GZIP gzip) (GMAKE gmake) (AUTORECONF autoreconf) (MKDIR mkdir) (ECHO echo) (CP cp) (FIND find) (RM rm) (TEST test) (LN ln)) 

परिणामस्वरूप, पाठ में पाए जाने वाले प्रत्येक तत्व के दूसरे मूल्य की जगह पहले (उदाहरण के लिए, "GNUTAR" ) के साथ "GNUTAR" "tar" ।

इसके निष्पादन की शुरुआत में, 'फू' फ़ंक्शन चयनित क्षेत्र की सीमाओं को निर्धारित करता है जिसमें इसे प्रतिस्थापन करना चाहिए: ये 'क्षेत्र-शुरुआत' और 'क्षेत्र-अंत' के लिए कॉल हैं।

फिर `मैपकार ' फ़ंक्शन को कहा जाता है, जो सूची के प्रत्येक तत्व के लिए लैम्बडा (पी) क्लोजर फ़ंक्शन को कॉल करता है।

क्लोजर फ़ंक्शन का कार्य पी चर को घटकों में पार्स करना है और टेक्स्ट में इसे बदलने के लिए रिप्ले -स्ट्रिंग फ़ंक्शन को कॉल करना है।

उपसंहार

मैं ध्यान देता हूं कि `मैप ' परिवार के कार्यों को मनमानी संख्या में सूची में संचालित किया जा सकता है और, पहली नज़र में, ऐसा लगता है कि सूचियों की सूची के बजाय, दो मूल्य स्पाइक्स का उपयोग किया जा सकता है: (GNUTAR GUNZIP GZIP ...) (tar gunzip gzip ...) (GNUTAR GUNZIP GZIP ...) (tar gunzip gzip ...) , लेकिन डेटा संरचना का ऐसा संगठन स्पष्ट रूप से दो सूचियों के बीच निहित संबंधों के कारण अधिक जटिल है, जबकि प्रस्तावित संस्करण में, इस तरह का संबंध अधीन सूची के दायरे से बाहर नहीं जाता है।

निष्कर्ष

माना गया फ़ंक्शन एक बार का डिज़ाइन है जो उस समस्या को हल करने के लिए डिज़ाइन किया गया है जो एक व्यक्ति के सामने आया था। लेखक इस डिजाइन के सार्वभौमिकरण को व्यर्थ अभ्यास के रूप में देखता है। इस पोस्ट का उद्देश्य एक टूल (Emacs एडिटर) की प्रोग्रामिंग की सरलता और सहजता को दिखाना था, जिसका उपयोग कोई व्यक्ति अपने दिमाग से काम कर सकता है, न कि अपने हाथों से।