i-bash/builtins/return.def

79 lines
2.1 KiB
Modula-2
Raw Normal View History

1996-08-26 18:22:31 +00:00
This file is return.def, from which is created return.c.
It implements the builtin "return" in Bash.
2009-01-12 13:36:28 +00:00
Copyright (C) 1987-2009 Free Software Foundation, Inc.
1996-08-26 18:22:31 +00:00
This file is part of GNU Bash, the Bourne Again SHell.
2009-01-12 13:36:28 +00:00
Bash 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 3 of the License, or
(at your option) any later version.
1996-08-26 18:22:31 +00:00
2009-01-12 13:36:28 +00:00
Bash 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.
1996-08-26 18:22:31 +00:00
2009-01-12 13:36:28 +00:00
You should have received a copy of the GNU General Public License
along with Bash. If not, see <http://www.gnu.org/licenses/>.
1996-08-26 18:22:31 +00:00
$PRODUCES return.c
$BUILTIN return
$FUNCTION return_builtin
$SHORT_DOC return [n]
2009-01-12 13:36:28 +00:00
Return from a shell function.
Causes a function or sourced script to exit with the return value
specified by N. If N is omitted, the return status is that of the
last command executed within the function or script.
Exit Status:
Returns N, or failure if the shell is not executing a function or script.
1996-08-26 18:22:31 +00:00
$END
1996-12-23 17:02:34 +00:00
#include <config.h>
#if defined (HAVE_UNISTD_H)
1998-04-17 19:52:44 +00:00
# ifdef _MINIX
# include <sys/types.h>
# endif
1996-12-23 17:02:34 +00:00
# include <unistd.h>
#endif
2004-07-27 13:29:18 +00:00
#include "../bashintl.h"
1996-08-26 18:22:31 +00:00
#include "../shell.h"
1996-12-23 17:02:34 +00:00
#include "common.h"
2009-01-12 13:36:28 +00:00
#include "bashgetopt.h"
1996-08-26 18:22:31 +00:00
extern int last_command_exit_value;
2000-03-17 21:46:59 +00:00
extern int subshell_environment;
1996-08-26 18:22:31 +00:00
extern int return_catch_flag, return_catch_value;
/* If we are executing a user-defined function then exit with the value
specified as an argument. if no argument is given, then the last
exit status is used. */
int
return_builtin (list)
WORD_LIST *list;
{
#if 0
2009-01-12 13:36:28 +00:00
if (no_options (list))
return (EX_USAGE);
list = loptend; /* skip over possible `--' */
#endif
2009-01-12 13:36:28 +00:00
2002-07-17 14:10:11 +00:00
return_catch_value = get_exitstat (list);
1996-08-26 18:22:31 +00:00
if (return_catch_flag)
longjmp (return_catch, 1);
else
{
2004-07-27 13:29:18 +00:00
builtin_error (_("can only `return' from a function or sourced script"));
1996-08-26 18:22:31 +00:00
return (EXECUTION_FAILURE);
}
}