-
Data: 2011-10-16 12:24:06
Temat: Re: lambda i clojures
Od: " " <f...@g...SKASUJ-TO.pl> szukaj wiadomości tego autora
[ pokaż wszystkie nagłówki ]Piotr Chamera <p...@p...onet.pl> napisał(a):
> W dniu 2011-10-16 12:09, Piotr Chamera pisze:
> > Można np. napisać to
> >
> > >> (let ((licznik 0))
> > >> (defun następny () (setf licznik (1+ licznik)))
> > >> (defun poprzedni () (setf licznik (1- licznik))))
> >
> > tak:
> >
> > (defvar *licz*
> > (let ((licznik 0))
> > (list
> > (lambda ()
> > (setf licznik (1+ licznik)))
> > (lambda ()
> > (setf licznik (1- licznik))))))
> >
> > taka konstrukcja zwraca listę funkcji (którym nie nadano nazw)
> >
> > CL-USER> *licz*
> > (#<COMPILED-LEXICAL-CLOSURE #xC9E7EC6> #<COMPILED-LEXICAL-CLOSURE
> > #xC9E7E9E>)
> >
> > i korzystać z licznika tak:
> >
> > CL-USER> (funcall (first *licz*))
> > 1
> > CL-USER> (funcall (first *licz*))
> > 2
> > CL-USER> (funcall (second *licz*))
> > 1
> > CL-USER> (funcall (second *licz*))
> > 0
>
> Dodam może jeszcze, że w tym przykładzie możemy zrobić
> coś takiego:
>
> CL-USER> (setf (symbol-function 'następny) (first *licz*))
> #<COMPILED-LEXICAL-CLOSURE #xC83E976>
>
> CL-USER> (setf (symbol-function 'poprzedni) (second *licz*))
> #<COMPILED-LEXICAL-CLOSURE #xC83E94E>
>
> CL-USER> (następny)
> 1
> CL-USER> (funcall (first *licz*))
> 2
> CL-USER> (następny)
> 3
> CL-USER> (funcall (first *licz*))
> 4
> ....
>
> Wywołujemy teraz tę samą funkcję, ale raz przez nazwę,
> a drugi raz uruchamiając obiekt przechowywany na liście.
nadal nie rozumiem tego cholerstwa, cos takirgo jak
z tym licznikiem mozna zrobic na statycznych zmiennych
wewnatrz funkcji, nie wiem jaka jest roznica miedzy tym
co moznazrobic na tych zm statycznych a tym czego nie mozna
zrobic i potrzebne sa te closures i wogole do czego
moze sie to przydac - te przyklady jakie widza w wiki sa jakos
totalnie dziwne
--
Wysłano z serwisu Usenet w portalu Gazeta.pl -> http://www.gazeta.pl/usenet/
Następne wpisy z tego wątku
- 16.10.11 12:52 Piotr Chamera
- 16.10.11 13:15
- 16.10.11 13:37 Edek
- 16.10.11 13:46 Piotr Chamera
- 16.10.11 14:17 Stachu 'Dozzie' K.
- 16.10.11 14:27
- 16.10.11 14:49 Piotr Chamera
- 16.10.11 15:26 bartekltg
- 16.10.11 16:22 Piotr Chamera
- 16.10.11 16:43 Bronek Kozicki
- 16.10.11 16:44 Bronek Kozicki
- 16.10.11 17:11
- 16.10.11 17:56 Piotr Chamera
- 16.10.11 20:19 Bronek Kozicki
- 17.10.11 04:38 Maciej Pilichowski
Najnowsze wątki z tej grupy
- Do czego nadaje się QDockWidget z bibl. Qt?
- Bibl. Qt jest sztucznie ograniczona - jest nieprzydatna do celów komercyjnych
- Co sciaga kretynow
- AEiC 2024 - Ada-Europe conference - Deadlines Approaching
- Jakie są dobre zasady programowania programów opartych na wtyczkach?
- sprawdzanie słów kluczowych dot. zła
- Re: W czym sie teraz pisze programy??
- Re: (PDF) Surgical Pathology of Non-neoplastic Gastrointestinal Diseases by Lizhi Zhang
- CfC 28th Ada-Europe Int. Conf. Reliable Software Technologies
- Młodzi programiści i tajna policja
- Ada 2022 Language Reference Manual to be Published by Springer
- Press Release - AEiC 2023, Ada-Europe Reliable Softw. Technol.
- Ada-Europe - AEiC 2023 early registration deadline approaching
- Ada-Europe Int.Conf. Reliable Software Technologies, AEiC 2023
- Ile cykli zajmuje mnożenie liczb 64-bitowych?
Najnowsze wątki
- 2024-06-27 Re: Prywatny parking? Pierwsze 10 minut bezplatnie
- 2024-06-27 A co mnie to koooorwa obchodzi?
- 2024-06-28 nawigacja satelitarna
- 2024-06-28 SmartLife/Tuya i osuszanie -- mordowanie z zimną krwią...
- 2024-06-27 położyłem kafelki
- 2024-06-28 Łódź => International Freight Forwarder <=
- 2024-06-28 Łódź => Spedytor Międzynarodowy <=
- 2024-06-28 Gdańsk => Head of International Freight Forwarding Department <=
- 2024-06-28 Sopot => Team Leader E-Commerce for Foreign Markets <=
- 2024-06-28 Warszawa => Senior React Native Developer <=
- 2024-06-28 Warszawa => Frontend Developer (React) <=
- 2024-06-28 Warszawa => Software .Net Developer <=
- 2024-06-28 Warszawa => Frontend Developer (React) <=
- 2024-06-28 Warszawa => Programista Full Stack .Net <=
- 2024-06-28 Warszawa => Frontend Developer (React) <=