Expression evaluator - help needed

Hello rebolist, is there someone who can help me to modify Gabriele's expression evaluator ( http://www.mail-archive.com/list-rebol.com/msg11328.html ) so it would be able to handle set-words as well? I have this test version: http://oldes.multimedia.cz/rebol/expr-test.r which now translates: eval/translate [a: x + 2] == [a: (add x 2)] but I would like to be able to do full Rebol like evaluation of code like: eval/translate [a: x + b: 2] which should give me: [a: (add x b: (2))] (but not working in my version correctly) I'm sure it must be possible, but I'm probably too puzzled at this moment. thanks -=oldes=-