Arc Forumnew | comments | leaders | submitlogin
1 point by kennytilton 6163 days ago | link | parent

Here is my CL hack to avoid parens juggling, automated or not:

  (defmacro ekx (ekx-id &rest body)
    (let ((result (gensym)))
     `(let ((,result (,@body)))
         (trc ,(string-downcase (symbol-name ekx-id))
              :=> ,result)
         ,result)))
(ekx weird-result + 40 2) -> weird-result :=> 42

I think my TRC function can be easily converted to standard CL. Of course, none of thus addresses the fancier tricks you talked about above, such as (+ prn:x 42).