.emacs.d/lisp/init-program-basic.el


1
2
3
4
5
6
7
8
9
10
11
12
13

;; C programming
(setq-default c-basic-offset 4
	      tab-width 4
	      indent-tabs-mode t)

(defun execute-c-program ()
  (interactive)
  (defvar foo)
  (setq foo (concat
			 "gcc " (buffer-name) " -o " (buffer-name) ".out && ./" (buffer-name) ".out" ))
  (shell-command foo))

(provide 'init-program-basic)