[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

*To*: clisp-list@ma2s2.mathematik.uni-karlsruhe.de*Subject*: setq with memory*From*: Roberto Olmi <olmi@iroe.iroe.fi.cnr.it>*Date*: Wed, 26 Jun 1996 10:37:59 +0200

I am a lisp beginner, so my question could have a straightforward answer. I am trying to implement a simple function MY-SETQ which does exactly what SETQ does, and records in a list *MEM* the actions done. The objective is to have the possibility of seeing (and executing, by MAPCAR and EVAL) the assignements done. I have implemented MY-SETQ as follows: (defun my-setq (x y) (set x (eval y)) (setq *MEM* (cons (list 'setq x y) *MEM*))) After an inizialization of *MEM* to nil, the commands look like these: (my-setq 'x ''abc) (my-setq 'y ''(sin 1.2345)) and *MEM* is, in the above case: ((setq y '(sin 1.2345)) (setq x 'abc)) so that, for example, (mapcar 'eval *MEM*) does the required re-assignement. The question is: how can I implement MY-SETQ such that the arguments are written in a more "natural" way, to say: (my-setq x 'abc) ? Any suggestion will be greatly appreciated. -------------------------------- Dr. Roberto Olmi IROE-CNR "Nello Carrara" Via Panciatichi 64 50127 Firenze (Italy) --------------------------------

**Follow-Ups**:**Re: setq with memory***From:*Roger Kehr <kehr@iti.informatik.th-darmstadt.de>

- Prev by Date:
**Re: clisp running on HP-UX 9.x somewhere?** - Next by Date:
**Re: setq with memory** - Previous by thread:
**[no subject]** - Next by thread:
**Re: setq with memory** - Index(es):