OLD | NEW |
1 /* | 1 /* |
2 This file is part of LilyPond, the GNU music typesetter. | 2 This file is part of LilyPond, the GNU music typesetter. |
3 | 3 |
4 Copyright (C) 1998--2019 Jan Nieuwenhuizen <janneke@gnu.org> | 4 Copyright (C) 1998--2019 Jan Nieuwenhuizen <janneke@gnu.org> |
5 | 5 |
6 LilyPond is free software: you can redistribute it and/or modify | 6 LilyPond is free software: you can redistribute it and/or modify |
7 it under the terms of the GNU General Public License as published by | 7 it under the terms of the GNU General Public License as published by |
8 the Free Software Foundation, either version 3 of the License, or | 8 the Free Software Foundation, either version 3 of the License, or |
9 (at your option) any later version. | 9 (at your option) any later version. |
10 | 10 |
11 LilyPond is distributed in the hope that it will be useful, | 11 LilyPond is distributed in the hope that it will be useful, |
12 but WITHOUT ANY WARRANTY; without even the implied warranty of | 12 but WITHOUT ANY WARRANTY; without even the implied warranty of |
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | 13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
14 GNU General Public License for more details. | 14 GNU General Public License for more details. |
15 | 15 |
16 You should have received a copy of the GNU General Public License | 16 You should have received a copy of the GNU General Public License |
17 along with LilyPond. If not, see <http://www.gnu.org/licenses/>. | 17 along with LilyPond. If not, see <http://www.gnu.org/licenses/>. |
18 */ | 18 */ |
19 | 19 |
20 #ifndef LILY_GUILE_HH | 20 #ifndef LILY_GUILE_HH |
21 #define LILY_GUILE_HH | 21 #define LILY_GUILE_HH |
22 | 22 |
| 23 #include "config.hh" |
| 24 |
23 #if __MINGW32__ | 25 #if __MINGW32__ |
24 #include "mingw-compatibility.hh" | 26 #include "mingw-compatibility.hh" |
25 #endif | 27 #endif |
26 | 28 |
27 #include <libguile.h> | 29 #if HAVE_LIBGUILE18_H |
| 30 # include <libguile18.h> |
| 31 #else |
| 32 # include <libguile.h> |
| 33 #endif |
28 #include <string.h> | 34 #include <string.h> |
29 | 35 |
30 /* | 36 /* |
31 Hack for various MacOS incarnations. | 37 Hack for various MacOS incarnations. |
32 */ | 38 */ |
33 #ifndef GUILE_ELLIPSIS | 39 #ifndef GUILE_ELLIPSIS |
34 #define GUILE_ELLIPSIS | 40 #define GUILE_ELLIPSIS |
35 #endif | 41 #endif |
36 | 42 |
37 #include "guile-compatibility.hh" | 43 #include "guile-compatibility.hh" |
(...skipping 177 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
215 SCM ly_offsets2scm (vector<Offset> os); | 221 SCM ly_offsets2scm (vector<Offset> os); |
216 vector<Offset> ly_scm2offsets (SCM s); | 222 vector<Offset> ly_scm2offsets (SCM s); |
217 | 223 |
218 /* For backward compatability with Guile 1.8 */ | 224 /* For backward compatability with Guile 1.8 */ |
219 #if !HAVE_GUILE_HASH_FUNC | 225 #if !HAVE_GUILE_HASH_FUNC |
220 typedef SCM (*scm_t_hash_fold_fn) (GUILE_ELLIPSIS); | 226 typedef SCM (*scm_t_hash_fold_fn) (GUILE_ELLIPSIS); |
221 typedef SCM (*scm_t_hash_handle_fn) (GUILE_ELLIPSIS); | 227 typedef SCM (*scm_t_hash_handle_fn) (GUILE_ELLIPSIS); |
222 #endif | 228 #endif |
223 | 229 |
224 #endif /* LILY_GUILE_HH */ | 230 #endif /* LILY_GUILE_HH */ |
OLD | NEW |