#+source: wrappable
#+begin_src emacs-lisp
 (setq x (+ 4 x))
#+end_src

#+begin_src emacs-lisp :comments noweb :noweb yes :tangle yes
 (let ((x 1))
   (message "x=%s" x)
   <<wrappable>>
   (message "x=%s" x))
#+end_src

which tangles out the following emacs-lisp
#+begin_src emacs-lisp
 ;; [[file:~/src/babel-dev/scraps.org::*wrap%20noweb%20references%20in%20comments][wrap-noweb-references-in-comments:2]]
 (let ((x 1))
   (message "x=%s" x)
   ;; [[file:~/src/babel-dev/scraps.org::*wrap%20noweb%20references%20in%20comments][wrappable]]
   (setq x (+ 4 x))
   ;; wrappable ends here
   (message "x=%s" x))
 ;; wrap-noweb-references-in-comments:2 ends here
#+end_src

Cheers -- Eric