एर्लांग सज्जाकार

एर्लैंग में कभी-कभी इस दिलचस्प विशेषता का अभाव होता है, इसलिए मैं इस सुविधा को पकड़ना चाहता था।

इंटरनेट पर खोज करने के बाद, मुझे एक लेख मिला ।

लेखक ने डेकोरेटर को तर्क देने के अलावा लगभग सभी कार्यक्षमता को पूरी तरह से लागू किया है।

तुरंत जीथुब का लिंक दें।

तो, मेरी परियोजना का अंतर यह है कि डेकोरेटर मापदंडों और क्रिया विकल्प को पारित कर सकता है, जिसके लिए फ़ंक्शन के नाम के साथ एक ट्यूपल और फ़ाइल में एक पंक्ति 3 तर्क के साथ डेकोरेटर को दी जाएगी।

उपयोग का एक उदाहरण जो इन दोनों विशेषताओं का उपयोग करता है (निश्चित रूप से उत्पादन नहीं, लेकिन सार स्पष्ट होना चाहिए)।

-module(memoize). % This row is required for decorators -compile([{parse_transform,decorators}]). % exporting decorator function -export([memoize/4]). % api exports -export([fact/1]). % pretty decorator usage -define(MEMOIZE, -decorate({?MODULE,memoize,[?MODULE],verbose})). memoize(F,Args,{FunName,_Line},Module)-> case ets:info(memoize) of undefined -> ets:new(memoize,[public,named_table]); _-> ok end, case ets:lookup(memoize,{Module,FunName,Args}) of [] -> R = apply(F,[Args]), ets:insert(memoize,{{Module,FunName,Args},R}), R; [{_,Value}] -> Value end. ?MEMOIZE. % decorator fact(N) when is_integer(N) andalso N>=1 -> fact(N,1). fact(1,Acc) -> Acc; fact(N,Acc) -> fact(N-1,Acc*N). 

खैर, 2 कॉल का परीक्षण:

 >> timer:tc(memoize,fact,[1000]). {1282, ... }. >> timer:tc(memoize,fact,[1000]). {9, ... }. 

यानी वृद्धि ध्यान देने योग्य है :)

मैं इस विषय पर एक होलीवर नहीं बनाना चाहता हूं कि क्या यह आवश्यक है या नहीं, मुझे खुशी होगी कि अगर यह ध्यान में रहे ...

पुनश्च
अगर किसी को दिलचस्पी होगी - मैं आगे parse_transform के माध्यम से कोड पीढ़ी की पूरी प्रक्रिया का पूरी तरह से वर्णन कर सकता हूं ...