home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / graphics-0.17 / dist-stat / setprecn.c < prev    next >
Encoding:
C/C++ Source or Header  |  1990-11-13  |  1.0 KB  |  55 lines
  1. /*
  2.  * $Header: /files1/home/toy/src/stat/RCS/setprec.c,v 1.1 90/09/04 16:03:35 toy Exp $
  3.  *
  4.  * NAME
  5.  *    set_def_prec - set default number precision
  6.  *
  7.  * SYNOPSIS
  8.  *    set_def_prec()
  9.  *
  10.  * DESCRIPTION
  11.  *    The default precision for printing numbers is set by
  12.  *    reading the environment variable STAT_PREC.  This should
  13.  *    be set to an integer which gives the number of significant
  14.  *    digits that should be used for printing numbers.
  15.  *
  16.  * HISTORY
  17.  * $Log:    setprec.c,v $
  18.  * Revision 1.1  90/09/04  16:03:35  toy
  19.  * Initial revision
  20.  *
  21.  */
  22.  
  23. #include <stdio.h>
  24.  
  25. #if    defined(__STDC__) || defined(__GNUC__)
  26. #include <stddef.h>
  27. #include <stdlib.h>
  28. #else
  29. extern char *getenv ();
  30. #endif
  31.  
  32. #include "gps.h"
  33.  
  34. #ifndef    lint
  35. static char RCSID[] = "@(#) $Id: setprec.c,v 1.1 90/09/04 16:03:35 toy Exp $";
  36. #endif
  37.  
  38. #if    defined(__STDC__) || defined(__GNUC__)
  39. void
  40. set_def_prec (void)
  41. #else
  42. void
  43. set_def_prec ()
  44. #endif
  45. {
  46.   char *prec_str;
  47.   int prec;
  48.  
  49.   prec_str = getenv ("STAT_PREC");
  50.   if ((prec_str != NULL) && (sscanf (prec_str, "%d", &prec) == 1))
  51.     {
  52.       set_precision (prec);
  53.     }
  54. }
  55.