From c7abe91f8b134cbd73658e10993d1dffb44d942d Mon Sep 17 00:00:00 2001 From: Jose Antonio Ortega Ruiz Date: Fri, 24 Mar 2006 22:54:41 +0000 Subject: CVS $Id$ tags removed. git-archimport-id: mdk@sv.gnu.org/mdk--devel--1--patch-7 --- mixguile/mixguile_main.c | 24 +++++++++++------------- 1 file changed, 11 insertions(+), 13 deletions(-) (limited to 'mixguile/mixguile_main.c') diff --git a/mixguile/mixguile_main.c b/mixguile/mixguile_main.c index 22e65be..faee06a 100644 --- a/mixguile/mixguile_main.c +++ b/mixguile/mixguile_main.c @@ -1,24 +1,22 @@ /* -*-c-*- -------------- mixguile_main.c : * Main function for mixguile, the MIX Guile shell * ------------------------------------------------------------------ - * $Id: mixguile_main.c,v 1.6 2005/09/20 19:43:14 jao Exp $ - * ------------------------------------------------------------------ - * Copyright (C) 2001 Free Software Foundation, Inc. - * + * Copyright (C) 2001, 2006 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 of the License, 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 program; if not, write to the Free Software * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. - * + * */ #include @@ -37,7 +35,7 @@ enum { NOINIT_OPT = 'q', }; -static const char *options_ = "vq"; +static const char *options_ = "vq"; static struct option long_options_[] = { @@ -54,7 +52,7 @@ main (int argc, char *argv[]) int c; gboolean initfile = TRUE; - + setlocale (LC_ALL, ""); bindtextdomain (PACKAGE, LOCALEDIR); textdomain (PACKAGE); @@ -65,15 +63,15 @@ main (int argc, char *argv[]) while (1) { c = getopt_long (argc, argv, options_, long_options_, (int*)0); - + /* Detect the end of the options. */ if (c == -1) break; - + switch (c) { case VER_OPT: - mix_print_license ("mixguile, Scheme MIX Virtual Machine"); + mix_print_license ("mixguile, Scheme MIX Virtual Machine"); return EXIT_SUCCESS; case NOINIT_OPT: initfile = FALSE; @@ -83,7 +81,7 @@ main (int argc, char *argv[]) break; } } - + mix_init_lib (); config = mix_config_new (NULL, CONFIG_FILE); -- cgit v1.2.3