|
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: 777 (0x309) Types: TextFile Names: »wr_prm.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_prm.c«
/* wr_prm.c: send the parameter structure to submit */ # ifndef lint static char Rcsid[] = "@(#)$Header: /cs/research/pp/hubris/pp-beta/Lib/io/RCS/wr_prm.c,v 5.0 90/09/20 16:07:10 pp Exp Locker: pp $"; # endif /* * $Header: /cs/research/pp/hubris/pp-beta/Lib/io/RCS/wr_prm.c,v 5.0 90/09/20 16:07:10 pp Exp Locker: pp $ * * $Log: wr_prm.c,v $ * Revision 5.0 90/09/20 16:07:10 pp * rcsforce : 5.0 public release * */ #include "head.h" #include "prm.h" /* --------------------- Begin Routines -------------------------------- */ int wr_prm (pp, fp) struct prm_vars *pp; FILE *fp; { int retval; PP_DBG (("Lib/io/wr_prm()")); retval = prm2txt (fp, pp); if (retval == NOTOK) return (RP_FIO); return (RP_OK); }