Arc Forumnew | comments | leaders | submitlogin
2 points by aw 5133 days ago | link | parent

My favorite debug print macro:

  (mac erp (x)
    (w/uniq (gx)
      `(let ,gx ,x
         (w/stdout (stderr)
           (write ',x)
           (disp ": ")
           (write ,gx)
           (disp #\newline))
         ,gx)))

  arc> (+ 3 (erp (/ 4 2)) 5)
  (/ 4 2): 2
  10