src/lib/krb5/free/f_princ.c


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32

/*
 * $Source$
 * $Author$
 *
 * Copyright 1990 by the Massachusetts Institute of Technology.
 * All Rights Reserved.
 *
 * For copying and distribution information, please see the file
 * <krb5/copyright.h>.
 *
 * krb5_free_principal()
 */

#if !defined(lint) && !defined(SABER)
static char rcsid_f_princ_c [] =
"$Id$";
#endif	/* !lint & !SABER */

#include <krb5/krb5.h>
#include <krb5/ext-proto.h>

void
krb5_free_principal(val)
krb5_principal val;
{
    register krb5_data **temp;

    for (temp = val; *temp; temp++)
	krb5_free_data(*temp);
    xfree(val);
    return;
}