|
|
1.1 ! root 1: /* py_advise.c - standard "advise" routine for pepsy/pepy */ ! 2: ! 3: #ifndef lint ! 4: static char *rcsid = "$Header: /f/osi/pepsy/RCS/py_advise.c,v 7.1 90/07/09 14:53:19 mrose Exp $"; ! 5: #endif ! 6: ! 7: /* ! 8: * $Header: /f/osi/pepsy/RCS/py_advise.c,v 7.1 90/07/09 14:53:19 mrose Exp $ ! 9: * ! 10: * ! 11: * $Log: py_advise.c,v $ ! 12: * Revision 7.1 90/07/09 14:53:19 mrose ! 13: * sync ! 14: * ! 15: * Revision 7.0 89/11/23 22:12:05 mrose ! 16: * Release 6.0 ! 17: * ! 18: */ ! 19: ! 20: /* ! 21: * NOTICE ! 22: * ! 23: * Acquisition, use, and distribution of this module and related ! 24: * materials are subject to the restrictions of a license agreement. ! 25: * Consult the Preface in the User's Manual for the full terms of ! 26: * this agreement. ! 27: * ! 28: */ ! 29: ! 30: ! 31: /* LINTLIBRARY */ ! 32: ! 33: #include <stdio.h> ! 34: #include <varargs.h> ! 35: ! 36: /* */ ! 37: ! 38: #ifndef lint ! 39: char PY_pepy[BUFSIZ]; ! 40: ! 41: ! 42: void PY_advise (va_alist) ! 43: va_dcl ! 44: { ! 45: va_list ap; ! 46: ! 47: va_start (ap); ! 48: ! 49: asprintf (PY_pepy, ap); ! 50: ! 51: va_end (ap); ! 52: } ! 53: #else ! 54: /* VARARGS */ ! 55: ! 56: void PY_advise (what, fmt) ! 57: char *what, ! 58: *fmt; ! 59: { ! 60: PY_advise (what, fmt); ! 61: } ! 62: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.