(print!
  (case 'bar
    (foo 1)
    (bar 2)))