|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T u
Length: 1197 (0x4ad)
Types: TextFile
Names: »ut_gldm.c«
└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0
└─⟦dc59850a2⟧ »EurOpenD22/pp5.0/pp-5.tar.Z«
└─⟦e5a54fb17⟧
└─⟦this⟧ »pp-5.0/Lib/pp/ut_gldm.c«
/* ut_p1_st.c: Deals with new p1 structures */
# ifndef lint
static char Rcsid[] = "@(#)$Header: /cs/research/pp/hubris/pp-beta/Lib/pp/RCS/ut_gldm.c,v 5.0 90/09/20 16:12:51 pp Exp Locker: pp $";
# endif
/*
* $Header: /cs/research/pp/hubris/pp-beta/Lib/pp/RCS/ut_gldm.c,v 5.0 90/09/20 16:12:51 pp Exp Locker: pp $
*
* $Log: ut_gldm.c,v $
* Revision 5.0 90/09/20 16:12:51 pp
* rcsforce : 5.0 public release
*
*/
#include "util.h"
#include "mta.h"
#include <sys/time.h>
extern GlobalDomId Myglobalname;
/* --------------------- Begin Routines -------------------------------- */
void GlobalDomId_new (gp) /* generate a new global id */
GlobalDomId *gp;
{
PP_DBG (("Lib/pp/new_GlobalDomId()"));
or_myinit ();
gp->global_Country = strdup(Myglobalname.global_Country);
gp->global_Admin = strdup(Myglobalname.global_Admin);
if(Myglobalname.global_Private)
gp->global_Private = strdup(Myglobalname.global_Private);
}
void GlobalDomId_free (gp)
GlobalDomId *gp;
{
if (gp -> global_Country)
free (gp -> global_Country);
if (gp -> global_Private)
free (gp -> global_Private);
if (gp -> global_Admin)
free (gp -> global_Admin);
bzero ((char *)gp, sizeof *gp);
}