1 /* -*-C-*-
2
3 Copyright (C) 1986, 1987, 1988, 1989, 1990, 1991, 1992, 1993, 1994,
4 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
5 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013, 2014 Massachusetts
6 Institute of Technology
7
8 This file is part of MIT/GNU Scheme.
9
10 MIT/GNU Scheme 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 2 of the License, or (at
13 your option) any later version.
14
15 MIT/GNU Scheme is distributed in the hope that it will be useful, but
16 WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 General Public License for more details.
19
20 You should have received a copy of the GNU General Public License
21 along with MIT/GNU Scheme; if not, write to the Free Software
22 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301,
23 USA.
24
25 */
26
27 #ifdef COMPILE_AS_MODULE
28
29 #include "scheme.h"
30
31 extern void dload_initialize_x11base (void);
32 extern void dload_initialize_x11color (void);
33 extern void dload_initialize_x11graph (void);
34 extern void dload_initialize_x11term (void);
35
36 const char *
dload_initialize_file(void)37 dload_initialize_file (void)
38 {
39 dload_initialize_x11base ();
40 dload_initialize_x11color ();
41 dload_initialize_x11graph ();
42 dload_initialize_x11term ();
43 return ("#prx11");
44 }
45
46 extern void dload_finalize_x11base (void);
47
48 void
dload_finalize_file(void)49 dload_finalize_file (void)
50 {
51 dload_finalize_x11base ();
52 }
53
54 #endif /* defined (COMPILE_AS_MODULE) */
55