Arc Forumnew | comments | leaders | submitlogin
2 points by drcode 5929 days ago | link | parent

You're asking a complicated question with a complicated example and don't have matching parentheses.

You can't expect us to answer this without supplying us with a proper example.



2 points by xrchz 5929 days ago | link

I'm really sorry my parentheses were mismatching. Here is a correct example.

  (define pusher cons)
  (define-syntax push
    (syntax-rules ()
      ((_ e ls) (pusher e ls))))
  (let ((pusher (lambda (x ls) (append ls (list x)))))
    (display (push 'a '(b c d))) (newline)
    (display (pusher 'd '(a b c))) (newline))

-----

1 point by almkglor 5929 days ago | link

Well, I think it's an example of the problem I pointed out here: http://snapvm.blogspot.com/2008/07/symeval.html

-----

1 point by xrchz 5929 days ago | link

I think you're right.

-----