560af5c5 |
1 | ;; Common Lisp bindings for GTK+ v2.0 |
c8c48a4c |
2 | ;; Copyright (C) 2000 Espen S. Johnsen <esj@stud.cs.uit.no> |
560af5c5 |
3 | ;; |
4 | ;; This library is free software; you can redistribute it and/or |
5 | ;; modify it under the terms of the GNU Lesser General Public |
6 | ;; License as published by the Free Software Foundation; either |
7 | ;; version 2 of the License, or (at your option) any later version. |
8 | ;; |
9 | ;; This library is distributed in the hope that it will be useful, |
10 | ;; but WITHOUT ANY WARRANTY; without even the implied warranty of |
11 | ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
12 | ;; Lesser General Public License for more details. |
13 | ;; |
14 | ;; You should have received a copy of the GNU Lesser General Public |
15 | ;; License along with this library; if not, write to the Free Software |
16 | ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
17 | |
feff53f5 |
18 | ;; $Id: glib-export.lisp,v 1.5 2001-05-11 16:11:07 espen Exp $ |
560af5c5 |
19 | |
20 | |
21 | ;;; Autogenerating exported symbols |
22 | |
23 | (in-package "GLIB") |
24 | |
25 | (eval-when (:compile-toplevel :load-toplevel :execute) |
ec833faa |
26 | (defexport defbinding (name &rest args) |
560af5c5 |
27 | (declare (ignore args)) |
28 | (if (symbolp name) |
29 | name |
30 | (first name))) |
31 | |
9f7d0979 |
32 | (defexport define-type-method-fun (name lambda-list) |
560af5c5 |
33 | (declare (ignore lambda-list)) |
feff53f5 |
34 | name) |
35 | |
36 | (defexport define-types-by-introspection (prefix &rest args) |
37 | (list-autoexported-symbols (expand-type-definitions prefix args)))) |
38 | |
560af5c5 |
39 | |
40 | (export-from-file #p"clg:glib;gutils.lisp") |
41 | (export-from-file #p"clg:glib;glib.lisp") |
ec833faa |
42 | (export-from-file #p"clg:glib;proxy.lisp") |
43 | (export-from-file #p"clg:glib;gboxed.lisp") |
560af5c5 |
44 | (export-from-file #p"clg:glib;gtype.lisp") |
c8c48a4c |
45 | (export-from-file #p"clg:glib;gparam.lisp") |
46 | (export-from-file #p"clg:glib;gcallback.lisp") |
560af5c5 |
47 | (export-from-file #p"clg:glib;gobject.lisp") |
ec833faa |
48 | (export-from-file #p"clg:glib;genums.lisp") |