2 * CDE - Common Desktop Environment
4 * Copyright (c) 1993-2012, The Open Group. All rights reserved.
6 * These libraries and programs are free software; you can
7 * redistribute them and/or modify them under the terms of the GNU
8 * Lesser General Public License as published by the Free Software
9 * Foundation; either version 2 of the License, or (at your option)
12 * These libraries and programs are distributed in the hope that
13 * they will be useful, but WITHOUT ANY WARRANTY; without even the
14 * implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
15 * PURPOSE. See the GNU Lesser General Public License for more
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with these libraries and programs; if not, write
20 * to the Free Software Foundation, Inc., 51 Franklin Street, Fifth
21 * Floor, Boston, MA 02110-1301 USA
23 /* $XConsortium: cflow.c /main/3 1995/11/01 16:27:48 rswiston $ */
24 /***************************************************************
26 * AT&T - PROPRIETARY *
28 * THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF *
29 * AT&T BELL LABORATORIES *
30 * AND IS NOT TO BE DISCLOSED OR USED EXCEPT IN *
31 * ACCORDANCE WITH APPLICABLE AGREEMENTS *
33 * Copyright (c) 1995 AT&T Corp. *
34 * Unpublished & Not for Publication *
35 * All Rights Reserved *
37 * The copyright notice above does not evidence any *
38 * actual or intended publication of such source code *
40 * This software was created by the *
41 * Advanced Software Technology Department *
42 * AT&T Bell Laboratories *
44 * For further information contact *
45 * {research,attmail}!dgk *
47 ***************************************************************/
49 /* : : generated by proto : : */
51 #if !defined(__PROTO__)
52 #if defined(__STDC__) || defined(__cplusplus) || defined(_proto) || defined(c_plusplus)
53 #if defined(__cplusplus)
54 #define __MANGLE__ "C"
59 #define __PROTO__(x) x
61 #define __PARAM__(n,o) n
62 #if !defined(__STDC__) && !defined(__cplusplus)
63 #if !defined(c_plusplus)
74 #define __PROTO__(x) ()
75 #define __OTORP__(x) x
76 #define __PARAM__(n,o) o
84 #if defined(__cplusplus) || defined(c_plusplus)
85 #define __VARARG__ ...
89 #if defined(__STDARG__)
90 #define __VA_START__(p,a) va_start(p,a)
92 #define __VA_START__(p,a) va_start(p)
100 #include "builtins.h"
105 int b_ret_exit __PARAM__((register int n, register char *argv[],__V_ *extra), (n, argv, extra)) __OTORP__(register int n; register char *argv[];__V_ *extra;){
106 struct checkpt *pp = (struct checkpt*)sh.jmplist;
109 while((n = optget(argv,sh_optcflow))) switch(n)
112 if(!strmatch(argv[opt_index],"[+-]+([0-9])"))
116 error(ERROR_usage(0), opt_arg);
120 if(error_info.errors)
121 error(ERROR_usage(2),optusage((char*)0));
122 pp->mode = (**argv=='e'?SH_JMPEXIT:SH_JMPFUN);
124 n = (((arg= *argv)?atoi(arg):sh.oldexit)&SH_EXITMASK);
125 /* return outside of function, dotscript and profile is exit */
126 if(sh.fn_depth==0 && sh.dot_depth==0 && !sh_isstate(SH_PROFILE))
127 pp->mode = SH_JMPEXIT;
136 int b_brk_cont __PARAM__((register int n, register char *argv[],__V_ *extra), (n, argv, extra)) __OTORP__(register int n; register char *argv[];__V_ *extra;){
138 register int cont= **argv=='c';
140 while((n = optget(argv,sh_optcflow))) switch(n)
146 error(ERROR_usage(0), opt_arg);
149 if(error_info.errors)
150 error(ERROR_usage(2),optusage((char*)0));
155 n = strtol(arg,&arg,10);
157 error(ERROR_exit(1),e_nolabels,*argv);
161 sh.st.execbrk = sh.st.breakcnt = n;
162 if(sh.st.breakcnt > sh.st.loopcnt)
163 sh.st.breakcnt = sh.st.loopcnt;
165 sh.st.breakcnt = -sh.st.breakcnt;