|
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: I T
Length: 792 (0x318)
Types: TextFile
Names: »IMISC-03.c«
└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0
└─⟦e83f91978⟧ »EurOpenD22/isode/osimis-2.0.tar.Z«
└─⟦d846658bd⟧
└─⟦this⟧ »osimis/misode/imisc/IMISC-03.c«
/* automatically generated by pepy 6.0 #3 (embarcadero.cs.ucl.ac.uk), do not edit! */
#include "psap.h"
#define advise PY_advise
void advise ();
/* Generated from module IMISC */
#include <stdio.h>
#include "IMISC-types.h"
#ifndef PEPYPARM
#define PEPYPARM char *
#endif /* PEPYPARM */
extern PEPYPARM NullParm;
/* ARGSUSED */
int encode_IMISC_TimeResult (pe, explicit, len, buffer, parm)
register PE *pe;
int explicit;
integer len;
char *buffer;
struct type_IMISC_TimeResult * parm;
{
register integer p2 = parm -> parm ;
if (((*pe) = num2prim (p2, PE_CLASS_UNIV, PE_PRIM_INT)) == NULLPE) {
advise (NULLCP, "TimeResult: %s", PEPY_ERR_NOMEM);
return NOTOK;
}
#ifdef DEBUG
(void) testdebug ((*pe), "IMISC.TimeResult");
#endif
return OK;
}