diff --git a/lib/krb5/store.c b/lib/krb5/store.c
index 6b92df144..cce7fff05 100644
--- a/lib/krb5/store.c
+++ b/lib/krb5/store.c
@@ -577,6 +577,7 @@ krb5_ret_principal(krb5_storage *sp,
     p->name.name_string.val = calloc(ncomp, sizeof(*p->name.name_string.val));
     if(p->name.name_string.val == NULL && ncomp != 0){
 	free(p->realm);
+	free(p);
 	return ENOMEM;
     }
     for(i = 0; i < ncomp; i++){