Consider

;; <point>(foo)

Then C-M-@ to mark the expression (foo) and M-; (paredit-comment-dwim). Do what I mean, i.e. uncomment the marked expression.

Actual:

;; ;; (foo)

Expected:

(foo)