| Revision: | 3.3 | 
| Committed: | Thu Jul 17 09:21:29 2003 UTC (22 years, 3 months ago) by schorsch | 
| Content type: | text/plain | 
| Branch: | MAIN | 
| CVS Tags: | rad5R4, rad5R2, rad5R3, rad5R0, rad5R1, rad4R2, rad3R7P2, rad3R7P1, rad6R0, rad4R1, rad4R0, rad3R6, rad3R6P1, rad3R8, rad3R9, rad4R2P1, rad4R2P2, HEAD | 
| Changes since 3.2: | +3 -2 lines | 
| Log Message: | Added prototypes and includes from patch by Randolph Fritz. Added more required includes and reduced other compile warnings. | 
| # | Content | 
|---|---|
| 1 | #ifndef lint | 
| 2 | static const char RCSid[] = "$Id: chanvalue.c,v 3.2 2003/06/07 12:50:20 schorsch Exp $"; | 
| 3 | #endif | 
| 4 | /* | 
| 5 | * Dummy definition of chanvalue() for calcomp routines. | 
| 6 | */ | 
| 7 | |
| 8 | #include "rterror.h" | 
| 9 | #include "calcomp.h" | 
| 10 | |
| 11 | double | 
| 12 | chanvalue(int n) | 
| 13 | { | 
| 14 | eputs("Call to unsupported chanvalue routine\n"); | 
| 15 | quit(1); | 
| 16 | return 0.0; /* pro forma return */ | 
| 17 | } |