head 1.1;
access;
symbols;
locks
paul:1.1; strict;
comment @ * @;
1.1
date 93.06.14.20.37.07; author paul; state Exp;
branches;
next ;
desc
@@
1.1
log
@Initial revision
@
text
@/*
** FreeQIR -- Free space allocated within QI_response array
**
** Parameters:
** QRp -- pointer to array of QI_response
**
** Returns:
** None
**
** Side Effects:
** none
*/
#include "qiapi.h"
#ifndef lint
static char RcsId[] = "@@(#)$Id$";
#endif
void
FreeQIR(QRp)
QIR *QRp;
{
QIR *QRsave = QRp;
if (QRp == QIR_NULL)
return;
do {
if (QRp->message != (char *) NULL)
free (QRp->message);
} while ((QRp++)->code < 0);
free ((char *) QRsave);
}
@