It is possible to use ``dot notation'' to match a variable to the rest of a list:

( (progn nil . ?s)   (progn . ?s) )

The variable ?s will match whatever is at the end of the list: 0 or more statements.

(transf '( (progn nil . ?s)   (progn . ?s) )
        '(progn nil (setq x 3) (setq y 7)) )

(PROGN (SETQ X 3) (SETQ Y 7))

Contents    Page-10    Prev    Next    Page+10    Index