Delete or hide compilation buffer when finished compile and run process

Question

Recently I'm using this function which is given bellow, to compile and run C++ program. Everything works fine with this function.

I just want to delete pop-up window (generated by this function) after compilation and running procedure is finished.

And want the window to give me a message asking :

press <return> key to delete current window and go-back.

I'm new to Emacs and have zero knowledge of elisp. So it would be very kind of you guys if you let me know how to done this work.

 (defun compile-and-run()
  (interactive)  
  (save-buffer)  
  (compile (concat "g++ " (file-name-nondirectory (buffer-file-name)) " -o " 
  (file-name-sans-extension (file-name-nondirectory (buffer-file-name))) " && ./" 
  (file-name-sans-extension (file-name-nondirectory (buffer-file-name)))) t ) 
  (other-window 1)
 (goto-char (point-max))) 

(define-key c++-mode-map [f5] #'compile-and-run) 

Answer 1

The compile mode actually exposes a hook that runs after compilation finishes, called compilation-finish-functions. You can add your own hook to the compilation, and in that, just call the quit-window function that others have mentioned in the comments.

(defun exit-after-compile-hook (cur-buffer msg)
  ;; nil: Don't kill the window.
  ;; 0: Affect visible and iconified frames.
  (quit-window nil (get-buffer-window cur-buffer 0)))

(add-hook 'compilation-finish-functions #'exit-after-compile-hook)

You can certainly combine these lines with a lambda. You also may wish to not close the window in the event that compilation failed. If you noticed, I passed nil to quit-window, which at least, keeps the buffer around.