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

catcherr defined in line 53; never used

Defined variables

Error_flag defined in line 11; used 6 times
Synconly defined in line 11; never used
Last modified: 1986-04-17
Generated: 2016-12-26
Generated by src2html V0.67
page hit count: 836
Valid CSS Valid XHTML 1.0 Strict