1: # include   "../ingres.h"
   2: # include   "../symbol.h"
   3: # include   "../access.h"
   4: 
   5: clr_tuple(desc, tuple)
   6: struct descriptor   *desc;
   7: char            *tuple;
   8: 
   9: /*
  10: **	Clr_tuple initializes all character domains
  11: **	to blank and all numeric domains to zero.
  12: */
  13: 
  14: {
  15:     register struct descriptor  *d;
  16:     register char           *tup;
  17:     register int            i;
  18:     int             j, pad;
  19: 
  20:     d = desc;
  21: 
  22:     for (i = 1; i <= d->relatts; i++)
  23:     {
  24:         if (d->relfrmt[i] == CHAR)
  25:             pad = ' ';
  26:         else
  27:             pad = 0;
  28: 
  29:         tup = &tuple[d->reloff[i]];
  30:         j = d->relfrml[i] & I1MASK;
  31: 
  32:         while (j--)
  33:             *tup++ = pad;
  34:     }
  35: }
Last modified: 1980-12-17
Generated: 2016-12-26
Generated by src2html V0.67
page hit count: 439
Valid CSS Valid XHTML 1.0 Strict