Commit | Line | Data |
---|---|---|
acc33231 CY |
1 | ;;; ede/proj-scheme.el --- EDE Generic Project scheme (guile) support |
2 | ||
acaf905b | 3 | ;; Copyright (C) 1998-2000, 2009-2012 Free Software Foundation, Inc. |
acc33231 CY |
4 | |
5 | ;; Author: Eric M. Ludlam <zappo@gnu.org> | |
6 | ;; Keywords: project, make, scheme | |
7 | ||
8 | ;; This file is part of GNU Emacs. | |
9 | ||
10 | ;; GNU Emacs is free software: you can redistribute it and/or modify | |
11 | ;; it under the terms of the GNU General Public License as published by | |
12 | ;; the Free Software Foundation, either version 3 of the License, or | |
13 | ;; (at your option) any later version. | |
14 | ||
15 | ;; GNU Emacs is distributed in the hope that it will be useful, | |
16 | ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
17 | ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
18 | ;; GNU General Public License for more details. | |
19 | ||
20 | ;; You should have received a copy of the GNU General Public License | |
21 | ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. | |
22 | ||
23 | ;;; Commentary: | |
24 | ;; | |
25 | ;; Handle scheme (Guile) in and EDE Project file. | |
26 | ;; This is a specialized do nothing class. | |
27 | ||
28 | (require 'ede/proj) | |
29 | (require 'ede/autoconf-edit) | |
30 | ||
31 | ;;; Code: | |
32 | (defclass ede-proj-target-scheme (ede-proj-target) | |
33 | ((menu :initform nil) | |
34 | (keybindings :initform nil) | |
35 | (interpreter :initarg :interpreter | |
36 | :initform "guile" | |
37 | :type string | |
38 | :custom string | |
39 | :documentation "The preferred interpreter for this code.") | |
40 | ) | |
41 | "This target consists of scheme files.") | |
42 | ||
43 | (defmethod ede-proj-tweak-autoconf ((this ede-proj-target-scheme)) | |
7ee6a1d3 | 44 | "Tweak the configure file (current buffer) to accommodate THIS." |
acc33231 CY |
45 | (autoconf-insert-new-macro "AM_INIT_GUILE_MODULE")) |
46 | ||
47 | (provide 'ede/proj-scheme) | |
48 | ||
49 | ;;; ede/proj-scheme.el ends here |