diff options
author | Thierry Banel <tbanelwebmin@free.fr> | 2014-06-15 14:53:34 +0200 |
---|---|---|
committer | Eric Schulte <schulte.eric@gmail.com> | 2014-06-16 11:05:01 -0400 |
commit | 25fc4d83447cf1df9ef48825413e9f8aea4e5c1b (patch) | |
tree | e9da0e7b7afbff1cb93761612cd9a9d0c2b7b8da | |
parent | d100d590e1c42676e71d1e2b1e448d8bf3dccc6f (diff) | |
download | org-mode-25fc4d83447cf1df9ef48825413e9f8aea4e5c1b.tar.gz |
Make C, C++, D, Java, Groovy compilers customizable
* ob-C.el (org-babel-C-compiler):
(org-babel-C++-compiler):
(org-babel-D-compiler): changed defvar to defcustom
* ob-java.el (org-babel-java-command):
(org-babel-java-compiler): changed defvar to defcustom
* ob-groovy.el (org-babel-groovy-command):
changed defvar to defcustom
-rw-r--r-- | lisp/ob-C.el | 36 | ||||
-rw-r--r-- | lisp/ob-groovy.el | 10 | ||||
-rw-r--r-- | lisp/ob-java.el | 22 |
3 files changed, 51 insertions, 17 deletions
diff --git a/lisp/ob-C.el b/lisp/ob-C.el index 505b290..2e146d4 100644 --- a/lisp/ob-C.el +++ b/lisp/ob-C.el @@ -46,16 +46,32 @@ (defvar org-babel-default-header-args:C '()) -(defvar org-babel-C-compiler "gcc" - "Command used to compile a C source code file into an -executable.") - -(defvar org-babel-C++-compiler "g++" - "Command used to compile a C++ source code file into an -executable.") - -(defvar org-babel-D-compiler "rdmd" - "Command used to compile and execute a D source code file.") +(defcustom org-babel-C-compiler "gcc" + "Command used to compile a C source code file into an executable. +May be either a command in the path, like gcc +or an absolute path name, like /usr/local/bin/gcc +parameter may be used, like gcc -v" + :group 'org-babel + :version "24.3" + :type 'string) + +(defcustom org-babel-C++-compiler "g++" + "Command used to compile a C++ source code file into an executable. +May be either a command in the path, like g++ +or an absolute path name, like /usr/local/bin/g++ +parameter may be used, like g++ -v" + :group 'org-babel + :version "24.3" + :type 'string) + +(defcustom org-babel-D-compiler "rdmd" + "Command used to compile and execute a D source code file. +May be either a command in the path, like rdmd +or an absolute path name, like /usr/local/bin/rdmd +parameter may be used, like rdmd --chatty" + :group 'org-babel + :version "24.3" + :type 'string) (defvar org-babel-c-variant nil "Internal variable used to hold which type of C (e.g. C or C++ or D) diff --git a/lisp/ob-groovy.el b/lisp/ob-groovy.el index 9bb17e6..0068df9 100644 --- a/lisp/ob-groovy.el +++ b/lisp/ob-groovy.el @@ -36,8 +36,14 @@ (defvar org-babel-tangle-lang-exts) ;; Autoloaded (add-to-list 'org-babel-tangle-lang-exts '("groovy" . "groovy")) (defvar org-babel-default-header-args:groovy '()) -(defvar org-babel-groovy-command "groovy" - "Name of the command to use for executing Groovy code.") +(defcustom org-babel-groovy-command "groovy" + "Name of the command to use for executing Groovy code. +May be either a command in the path, like groovy +or an absolute path name, like /usr/local/bin/groovy +parameters may be used, like groovy -v" + :group 'org-babel + :version "24.3" + :type 'string) (defun org-babel-execute:groovy (body params) "Execute a block of Groovy code with org-babel. This function is diff --git a/lisp/ob-java.el b/lisp/ob-java.el index 22f8785..8c64171 100644 --- a/lisp/ob-java.el +++ b/lisp/ob-java.el @@ -32,11 +32,23 @@ (defvar org-babel-tangle-lang-exts) (add-to-list 'org-babel-tangle-lang-exts '("java" . "java")) -(defvar org-babel-java-command "java" - "Name of the java command.") - -(defvar org-babel-java-compiler "javac" - "Name of the java compiler.") +(defcustom org-babel-java-command "java" + "Name of the java command. +May be either a command in the path, like java +or an absolute path name, like /usr/local/bin/java +parameters may be used, like java -verbose" + :group 'org-babel + :version "24.3" + :type 'string) + +(defcustom org-babel-java-compiler "javac" + "Name of the java compiler. +May be either a command in the path, like javac +or an absolute path name, like /usr/local/bin/javac +parameters may be used, like javac -verbose" + :group 'org-babel + :version "24.3" + :type 'string) (defun org-babel-execute:java (body params) (let* ((classname (or (cdr (assoc :classname params)) |