/*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);
}