Emacs - Add compile for cpp mode

[dotfiles.git] / emacs.d / config.org

diff --git a/emacs.d/config.org b/emacs.d/config.org
index a8676e9..2993e1a 100644 (file)
--- a/emacs.d/config.org
+++ b/emacs.d/config.org
@@ -2336,6 +2336,26 @@ irony-company
     (add-hook 'c++-mode-hook 'google-set-c-style))
 #+END_SRC
 
+*** Compile and Run the C file
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+  (defun my-cpp-hook ()
+    (let* ((current-file-name)
+           (a-dot-out-file))
+      (when buffer-file-name
+        (setq current-file-name (shell-quote-argument buffer-file-name))
+        (setq a-dot-out-file (concat (file-name-directory buffer-file-name) "a.out")))
+      (setq-local compilation-read-command t)
+      (set (make-local-variable 'compile-command)
+           (concat "g++ -Wall "
+                   current-file-name
+                   " && "
+                   a-dot-out-file))
+      (local-set-key (kbd "s-r") 'compile)))
+
+  (add-hook 'c-mode-hook 'my-cpp-hook)
+  (add-hook 'c++-mode-hook 'my-cpp-hook)
+#+END_SRC
+
 ** Lua
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
   (use-package lua-mode
@@ -2915,15 +2935,6 @@ Use =ESC= to exit minibuffer. Also I map =Super-h= the same as =C-g=
     (add-to-list 'projectile-globally-ignored-files "GTAGS")
     (projectile-global-mode t))
 
-  ;; (use-package persp-projectile
-  ;;   :ensure t
-  ;;   :config
-  ;;   (persp-mode)
-  ;;   :bind
-  ;;   ;; (:map projectile-mode-map
-  ;;   ;;       ("s-t" . projectile-persp-switch-project))
-  ;;   )
-
   ;; change default-directory of scratch buffer to projectile-project-root 
   (defun sd/project-switch-action ()
     "Change default-directory of scratch buffer to current projectile-project-root directory"