;; pd -stderr and:

(comint-run "/usr/local/bin/pd") 


(defun pd-send-region()
  (interactive)
(shell-command (concat "echo \"" (buffer-substring (region-beginning) (region-end)) ";\" | pdsend 9999 127.0.0.1 udp")))

;; todo: remove all line breaks in region

;;(display (+ 12 13))