From: "Matwey V. Kornilov" <matwey.kornilov at gmail.com>
the following seems to work just great for me:
PROTECT(sx = eval(lang3(install("solve"),sA,sb),R_BaseEnv))
You need to PROTECT the result of lang3 before calling eval. And on the other hand, you don't necessarily have to protect the result of eval (only if you will be doing further allocations while still using sx). Radford Neal