In Steel Bank Common Lisp:
* (macroexpand '(setf a 3))
(SETQ A 3)
T
* (macroexpand '(setf (nth a 0) 3))
(SB-KERNEL:%SETNTH A 0 3)
T
'Programming' 카테고리의 다른 글
Test EOF in Common Lisp (0) | 2014.10.24 |
---|---|
Precise Garbage Collection for C (0) | 2014.10.01 |
Download a file from the internet using Perl (0) | 2014.09.25 |
Continuations and tail recursion (0) | 2014.06.24 |
Unbound identifier in transformer environment (0) | 2014.05.28 |