src/common/chanvalue.c

#ifndef lint
static const char       RCSid[] = "$Id: chanvalue.c,v 3.1 2003/02/22 02:07:21 greg Exp $";
#endif
/*
 * Dummy definition of chanvalue() for calcomp routines.
 */

#include "standard.h"

double
chanvalue(int n)
{
        eputs("Call to unsupported chanvalue routine\n");
        quit(1);
        return 0.0; /* pro forma return */
}
Revision:	3.2
Committed:	Sat Jun 7 12:50:20 2003 UTC (20 years, 10 months ago) by schorsch
Content type:	text/plain
Branch:	MAIN
Changes since 3.1:	+4 -1 lines
Log Message:	Various small changes to reduce compile warnings/errors on Windows.
#	Content
1	#ifndef lint
2	static const char RCSid[] = "$Id: chanvalue.c,v 3.1 2003/02/22 02:07:21 greg Exp $";
3	#endif
4	/*
5	* Dummy definition of chanvalue() for calcomp routines.
6	*/
7
8	#include "standard.h"
9
10	double
11	chanvalue(int n)
12	{
13	eputs("Call to unsupported chanvalue routine\n");
14	quit(1);
15	return 0.0; /* pro forma return */
16	}