1 |
/* Copyright (C) 1994, 1995, 1996, 1997, 1998, 2000 Free Software Foundation, Inc. |
/* Copyright (C) 1994, 1995, 1996, 1997, 1998, 2000, 2002 Free Software Foundation, Inc. |
2 |
* This program is free software; you can redistribute it and/or modify |
* This program is free software; you can redistribute it and/or modify |
3 |
* it under the terms of the GNU General Public License as published by |
* it under the terms of the GNU General Public License as published by |
4 |
* the Free Software Foundation; either version 2, or (at your option) |
* the Free Software Foundation; either version 2, or (at your option) |
41 |
/* "script.c" argv tricks for `#!' scripts. |
/* "script.c" argv tricks for `#!' scripts. |
42 |
Authors: Aubrey Jaffer and Jim Blandy */ |
Authors: Aubrey Jaffer and Jim Blandy */ |
43 |
|
|
|
/* Software engineering face-lift by Greg J. Badros, 11-Dec-1999, |
|
|
gjb@cs.washington.edu, http://www.cs.washington.edu/homes/gjb */ |
|
44 |
|
|
45 |
#include <stdio.h> |
#include <stdio.h> |
46 |
#include <ctype.h> |
#include <ctype.h> |
550 |
{ |
{ |
551 |
/* Print version number. */ |
/* Print version number. */ |
552 |
printf ("Guile %s\n" |
printf ("Guile %s\n" |
553 |
"Copyright (c) 1995, 1996, 1997, 2000 Free Software Foundation\n" |
"Copyright (c) 1995, 1996, 1997, 2000, 2002 Free Software Foundation\n" |
554 |
"Guile may be distributed under the terms of the GNU General Public Licence;\n" |
"Guile may be distributed under the terms of the GNU General Public Licence;\n" |
555 |
"certain other uses are permitted as well. For details, see the file\n" |
"certain other uses are permitted as well. For details, see the file\n" |
556 |
"`COPYING', which is included in the Guile distribution.\n" |
"`COPYING', which is included in the Guile distribution.\n" |