|
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 w
Length: 766 (0x2fe) Types: TextFile Names: »wr_dr.c«
└─⟦2d1937cfd⟧ Bits:30007241 EUUGD22: P.P 5.0 └─⟦dc59850a2⟧ »EurOpenD22/pp5.0/pp-5.tar.Z« └─⟦e5a54fb17⟧ └─⟦this⟧ »pp-5.0/Lib/io/wr_dr.c«
/* wr_dr.c: writes out a DR struct from an incomming chan */ # ifndef lint static char Rcsid[] = "@(#)$Header: /cs/research/pp/hubris/pp-beta/Lib/io/RCS/wr_dr.c,v 5.0 90/09/20 16:07:06 pp Exp Locker: pp $"; # endif /* * $Header: /cs/research/pp/hubris/pp-beta/Lib/io/RCS/wr_dr.c,v 5.0 90/09/20 16:07:06 pp Exp Locker: pp $ * * $Log: wr_dr.c,v $ * Revision 5.0 90/09/20 16:07:06 pp * rcsforce : 5.0 public release * */ #include "head.h" #include "q.h" #include "dr.h" /* --------------------- Begin Routines -------------------------------- */ int wr_dr (dp, fp) register DRmpdu *dp; FILE *fp; { int retval; PP_DBG (("Lib/io/wr_dr()")); retval = dr2txt (fp, dp); if (retval == NOTOK) return (RP_FIO); return (RP_OK); }