Name

psetq

Usage

macro

Syntax

(psetq sym1 value1 sym2 value2...)

Description

Performs all assignments after evaluating all values.

user 1 > (macroexpand '(psetq v1 (inc v2) v2 (inc v1)))
it: (merging-do
        (let temp:temp-614 (inc v2))
        (let temp:temp-615 (inc v1))
        (setq v1 temp:temp-614)
        (setq v2 temp:temp-615))