diff options
Diffstat (limited to 'doc/example-smob/myguile.c')
-rw-r--r-- | doc/example-smob/myguile.c | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/doc/example-smob/myguile.c b/doc/example-smob/myguile.c deleted file mode 100644 index 95bff27fd..000000000 --- a/doc/example-smob/myguile.c +++ /dev/null @@ -1,37 +0,0 @@ -/* myguile.c - * - * Copyright (C) 1998 Free Software Foundation, Inc. - * - * This program is free software; you can redistribute it and/or modify - * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2, or (at your option) - * any later version. - * - * This program is distributed in the hope that it will be useful, - * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - * GNU General Public License for more details. - * - * You should have received a copy of the GNU General Public License - * along with this software; see the file COPYING. If not, write to - * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, - * Boston, MA 02111-1307 USA - */ - -#include <libguile.h> -#include "image-type.h" - -static void -inner_main (void *closure, int argc, char **argv) -{ - /* module initializations would go here */ - init_image_type(); - scm_shell (argc, argv); -} - -int -main (int argc, char **argv) -{ - scm_boot_guile (argc, argv, inner_main, 0); - return 0; /* never reached */ -} |