?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Print a warning when translating subscripted functions
[maxima.git] / share / contrib / unwind_protect.lisp
blob260223f5b12aa7b5f786c07a3302c14dc1783e9b
1 (defmspec $unwind_protect (e)
2 (setq e (margs e))
3 (unwind-protect (meval (first e)) (mapcar #'meval (rest e))))
Maxima, a Computer Algebra System