1: # include <ingres.h>
2: # include <aux.h>
3: # include <tree.h>
4: # include <symbol.h>
5: # include <pv.h>
6: # include "globs.h"
7: # include <sccs.h>
8:
9: SCCSID(@(#)call_dbu.c 8.1 12/31/84)
10:
11: int Synconly, Error_flag;
12:
13:
14: /*
15: ** Call the appropriate dbu with the arguments
16: ** given in the globals Pc and Pv. Code is a
17: ** number identifing which dbu to call. Errflag
18: ** indicates whether an error return from the dbu
19: ** is possibly expected.
20: **
21: ** If errflag is FALSE then call_dbu will syserr on an error
22: ** If errflag is TRUE then call_dbu will return error value
23: **
24: ** Trace Flags:
25: ** 60
26: */
27:
28: call_dbu(code, errflag)
29: int code;
30: bool errflag;
31: {
32: # ifdef xDTR1
33: if (tTf(60, 0))
34: printf("Calling DBU %d\n", code);
35: # endif
36:
37: Error_flag = 0;
38: call(code, NULL);
39: if (Error_flag != 0 && !errflag)
40: syserr("call_dbu:%d,ret %d", code, Error_flag);
41: return(Error_flag);
42: }
43:
44:
45:
46: /*
47: ** Proc_error is called if an error
48: ** block is encountered.
49: ** Otherwise the error block(s) are passed on up.
50: */
51:
52: /*ARGSUSED*/
53: catcherr(pc, pv)
54: int pc;
55: PARM *pv;
56: {
57: extern int Error_flag;
58:
59: Error_flag = pv[0].pv_val.pv_int;
60: }
Defined functions
Defined variables