Commit cc04b18a7642e0a63ee0fc92b08494b46690c507
- Diff rendering mode:
- inline
- side by side
processing-mode.el
(9 / 21)
|   | |||
| 73 | 73 | (concat " --platform=" | |
| 74 | 74 | (if platform platform (processing-platform))))))) | |
| 75 | 75 | ||
| 76 | (defun processing-preprocess-sketch () | ||
| 77 | "Preprocess a sketch into .java files." | ||
| 78 | ;(processing-commander "~/sketchbook/test" "~/sketchbook/test/output" "run") | ||
| 79 | t) | ||
| 76 | (defun processing-compile (&optional cmd) | ||
| 77 | "Runs the Processing Commander application with the current | ||
| 78 | buffer. The output directory is the sub-directory ``output'' | ||
| 79 | which will be found in the parent directory of the buffer file." | ||
| 80 | (interactive) | ||
| 81 | ;; TODO: Add support for temporary sketches | ||
| 82 | (let ((sketch-dir (file-name-directory buffer-file-name))) | ||
| 83 | (processing-commander sketch-dir (concat sketch-dir "output") (if cmd cmd "run")))) | ||
| 80 | 84 | ||
| 81 | (defun processing-build-sketch () | ||
| 82 | "Preprocess and compile a sketch into .class files." | ||
| 83 | t) | ||
| 84 | |||
| 85 | (defun processing-run-sketch () | ||
| 86 | "Preprocess, compile, and run a Processing sketch." | ||
| 87 | t) | ||
| 88 | |||
| 89 | (defun processing-present-sketch () | ||
| 90 | "Preprocess, compile, and run a Processing sketch full screen." | ||
| 91 | t) | ||
| 92 | |||
| 93 | (defun processing-export-applet () | ||
| 94 | "Turns the Processing sketch into a Java applet." | ||
| 95 | t) | ||
| 96 | |||
| 97 | 85 | (defun processing-export-application () | |
| 98 | 86 | "Turns the Processing sketch into a Java application. Assumes | |
| 99 | 87 | that the platform target is whatever platform Emacs is running | |
| … | … | ||
| 90 | 90 | ||
| 91 | 91 | ;; Key bindings | |
| 92 | 92 | (define-key processing-mode-map | |
| 93 | [C-c C-r] 'processing-run-sketch) | ||
| 93 | "\C-c\C-r" 'processing-compile) | ||
| 94 | 94 | ||
| 95 | 95 | ;; Font-lock, keywords | |
| 96 | 96 | (defconst processing-font-lock-keywords-1 |

