mirrors
/
org-mode
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git
0
0
Fork 1
Code Releases Activity

babel: org-babel-c now responds to :cmdline header argument

This commit is contained in:
Eric Schulte 2010-03-29 12:26:53 -06:00
parent a3f3efe82d
commit 2675848d37
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
contrib/babel/lisp/langs/org-babel-C.el
View File

@ -74,6 +74,7 @@ called by `org-babel-execute-src-block'."
('cpp ".cpp"))))
(tmp-bin-file (make-temp-file "org-babel-C-bin"))
(tmp-out-file (make-temp-file "org-babel-C-out"))
(cmdline (cdr (assoc :cmdline params)))
(flags (cdr (assoc :flags params)))
(vars (second processed-params))
(includes (org-babel-read
@ -117,7 +118,9 @@ called by `org-babel-execute-src-block'."
(org-babel-trim
(with-temp-buffer
(org-babel-shell-command-on-region
(point-min) (point-max) tmp-bin-file (current-buffer) 'replace)
(point-min) (point-max)
(concat tmp-bin-file (if cmdline (concat " " cmdline) ""))
(current-buffer) 'replace)
(buffer-string))))
(progn
(with-current-buffer error-buf