(defun prettify-function (objectclass) "Decorate C++ functions"
  (while (re-search-forward "^\(.*\);$" nil t)
    (replace-match (concatenate "a\b" 'objectclass "\n") nil nil) ) )