Zamień dwie zmienne w Elisp

20

Załóżmy, że mam

(setq a 1 b 2)

Jak mogę elegancko zamienić wartości ai bbez użycia zmiennej tymczasowej?

elisp

— PythonNut
źródło

Chociaż pamiętam operację wymiany z przykładów programowania sprzed wielu lat, nie sądzę, żebym kiedykolwiek potrzebował takiej operacji wymiany. Gdzie więc potrzebujesz czegoś takiego?

— Stefan

@ Stefan tym razem piszę funkcję, która przyjmuje dwa argumenty i chciałbym upewnić się, że pierwszy argument jest mniejszy z dwóch.

— PythonNut,

1

@PythonNut, możesz powiązać pierwszy argument z (min a b)drugim (max a b). To jest jedno rozwiązanie. Niektórzy twierdzą, że wymaga to dwóch porównań, gdy jedno wystarczy, to prawda. Możesz sobie z tym poradzić za pomocą jednego porównania w bardziej funkcjonalny sposób, na przykład używając wiązania restrukturyzacji (cl-destructuring-bind (a . b) (if (< a b) (cons a b) (cons b a)) ...). To jest inny sposób.

— Mark Karpov,

1

@Zaznacz prawdę, ale przynajmniej dla mnie wydaje się, że to obrzucanie granatów ręcznych. cl-destructuring-bindjest absurdalnie potężnym narzędziem do tego zadania.

— PythonNut,

18

Jeśli pamięć dobrze mi służy i chcesz ją wykorzystać, cl-libto:

(cl-rotatef a b)

Zauważ, że jest to wspólny sposób rozwiązania problemu.

— Mark Karpov
źródło

20

To elegancki idiom, którego używam ;-).

(setq a  (prog1 b (setq b  a)))

— Rysował
źródło

1

Hej, to fajnie. Będę o tym pamiętać, jeśli wydajność będzie kiedykolwiek stanowić problem.

— PythonNut,

1

Pomysłowy i prosty.

— Nazwisko

1

Och, w żadnym wypadku nie jest to ze mną oryginalne. Ale to chyba główny cel, z którego korzystam prog1.

— Drew,

1

To właśnie do tego cl-rotatefmakro się rozwija.

— abo-abo

6

Jeśli to liczby całkowite:

(setq a (logxor a b))
(setq b (logxor a b))
(setq a (logxor a b))

:)

— jtgd
źródło

2

Dla kompletności powinieneś również uwzględnić następujący klasyk: a = a + b, b = a - b, a = a - b. Przetłumaczone na Emacsa Lispa, oczywiście :-D

— Mark Karpov

1

To prawda i dla kompletności zaznaczę, że w asm lub C Trik XOR działa na wszystko; rejestry, pamięć, liczby całkowite, zmiennoprzecinkowe, struktury, ciągi znaków (równa długość) ... W Lisp myślę tylko o liczbach całkowitych. W przypadku dużych bloków pamięci miło jest nie potrzebować bufora tymczasowego.

— jtgd

@jtgd: W przypadku dużych bloków pamięci można wykonywać zamianę segment po segmencie za pomocą małego bufora.

— Clément