/*Copyright (C) 1992, 1995 by Thomas Glen Smith.  All Rights Reserved.*/
/* temp APL2 V1.0.0 ****************************************************
* Marks the specified aplcb as temporary, and returns its address.     *
***********************************************************************/
#define INCLUDES APLCB
#include "includes.h"
Aplcb temp(rite)
Aplcb rite;
{
	if (rite != NULL)
		rite->aplflags |= APLTEMP;
	return(rite);
}