head	1.2;
access
	werner
	shectman;
symbols;
locks; strict;
comment	@ * @;


1.2
date	91.05.22.18.05.20;	author kemnitz;	state Exp;
branches;
next	;


desc
@Initial Ported Version
@


1.2
log
@checked in with -k by werner at 1992/01/09 16:57:27
@
text
@/*
 * Tuple macros used by both index tuples and heap tuples.
 * 
 * "$Header: RCS/tupmacs.h,v 1.2 91/05/22 18:05:20 kemnitz Exp $"
 */

#ifndef TUPMACS_H
#define TUPMACS_H

#define att_isnull(ATT, BITS) (!((BITS)[(ATT) >> 3] & (1 << ((ATT) & 0x07))))

#define fetchatt(A, T) \
((*(A))->attlen < 0 ? (char *) (LONGALIGN((T) + sizeof(long))) : \
 ((*(A))->attbyval ? \
  ((*(A))->attlen > sizeof(short) ? (char *) *(long *) (T) : \
   ((*(A))->attlen < sizeof(short) ? (char *) *(T) : \
	(char *) * (short *) (T))) : (char *) (T)))
	
#endif

@