Imported from ../bash-2.05a.tar.gz.
[platform/upstream/bash.git] / builtins / return.def
1 This file is return.def, from which is created return.c.
2 It implements the builtin "return" in Bash.
3
4 Copyright (C) 1987, 1989, 1991 Free Software Foundation, Inc.
5
6 This file is part of GNU Bash, the Bourne Again SHell.
7
8 Bash is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 2, or (at your option) any later
11 version.
12
13 Bash is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
16 for more details.
17
18 You should have received a copy of the GNU General Public License along
19 with Bash; see the file COPYING.  If not, write to the Free Software
20 Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA.
21
22 $PRODUCES return.c
23
24 $BUILTIN return
25
26 $FUNCTION return_builtin
27 $SHORT_DOC return [n]
28 Causes a function to exit with the return value specified by N.  If N
29 is omitted, the return status is that of the last command.
30 $END
31
32 #include <config.h>
33
34 #if defined (HAVE_UNISTD_H)
35 #  ifdef _MINIX
36 #    include <sys/types.h>
37 #  endif
38 #  include <unistd.h>
39 #endif
40
41 #include "../shell.h"
42 #include "common.h"
43
44 extern int last_command_exit_value;
45 extern int subshell_environment;
46 extern int return_catch_flag, return_catch_value;
47
48 /* If we are executing a user-defined function then exit with the value
49    specified as an argument.  if no argument is given, then the last
50    exit status is used. */
51 int
52 return_builtin (list)
53      WORD_LIST *list;
54 {
55   return_catch_value = list ? get_exitstat (list) : last_command_exit_value;
56
57   if (return_catch_flag)
58     longjmp (return_catch, 1);
59   else
60     {
61       builtin_error ("can only `return' from a function or sourced script");
62       return (EXECUTION_FAILURE);
63     }
64 }