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


1.3
date	91.04.28.09.17.17;	author cimarron;	state Exp;
branches;
next	;


desc
@Initial Ported Version
@


1.3
log
@checked in with -k by werner at 1992/01/09 16:56:15
@
text
@/* ----------------------------------------------------------------
 *   FILE
 *	scan.c
 *	
 *   DESCRIPTION
 *	scan direction and key code
 *
 *   INTERFACE ROUTINES
 *	
 *   NOTES
 *	
 *   IDENTIFICATION
 *	$Header: RCS/scan.c,v 1.3 91/04/28 09:17:17 cimarron Exp $
 * ----------------------------------------------------------------
 */

#include "tmp/c.h"
#include "access/sdir.h"
#include "access/attnum.h"
#include "access/skey.h"

RcsId("$Header: RCS/scan.c,v 1.3 91/04/28 09:17:17 cimarron Exp $");

/*
 *	ScanDirectionIsValid, ScanDirectionIsBackward
 *	ScanDirectionIsNoMovement, ScanDirectionIsForward
 *		.. are now macros in sdir.h
 *
 *	ScanKeyIsValid, ScanKeyEntryIsValid, ScanKeyEntryIsLegal
 *		.. are now macros in skey.h -cim 4/27/91
 */

/* ----------------
 *	ScanKeyEntrySetIllegal
 * ----------------
 */
void
ScanKeyEntrySetIllegal(entry)
    ScanKeyEntry	entry;
{
    Assert(ScanKeyEntryIsValid(entry));

    entry->flags = 0;	/* just in case... */
    entry->attributeNumber = InvalidAttributeNumber;
    entry->procedure = 0;	/* should be InvalidRegProcedure */
}

/* ----------------
 *	ScanKeyEntryInitialize
 * ----------------
 */
void
ScanKeyEntryInitialize(entry, flags, attributeNumber, procedure, argument)
    ScanKeyEntry	entry;
    bits16		flags;
    AttributeNumber	attributeNumber;
    RegProcedure	procedure;
    Datum		argument;
{
    Assert(ScanKeyEntryIsValid(entry));

    entry->flags = flags;
    entry->attributeNumber = attributeNumber;
    entry->procedure = procedure;
    entry->argument = argument;
	fmgr_info(procedure, &entry->func, &entry->nargs);

    Assert(ScanKeyEntryIsLegal(entry));
}
@