(define foo 2)

(define-syntax bar
  (lambda (e i c)
    2))

(case 2
  ((foo) (print "foo"))
  (((bar)) (print "jee")) ;; <- why not this?
  ((2) (print "jee 2"))   ;; <- but this
  (else (print "else")))

(print (bar))

;; [canonicalized]
;; (##core#callunit "library")

;; (##core#callunit "eval")

;; (##core#undefined)

;; (set! foo '2)

;; (##core#undefined)

;; (let ((tmp59 '2))
;;   (if (eqv? tmp59 'foo)
;;     (print '"foo")
;;     (if (eqv? tmp59 '(bar))
;;       (print '"jee")
;;       (if (eqv? tmp59 '2) (print '"jee 2") (print '"else")))))

;; (print '2)

;; ((##sys#implicit-exit-handler))

;; (##core#undefined)