comparison src/editfns.c @ 38519:200c049178cc

(toplevel) [STDC_HEADERS]: Include float.h. (MAX_10_EXP): New macro. (Fformat): Use it.

38518:883da5f3dbac

#include "coding.h"
#include "frame.h"
#include "window.h"

#include "systime.h"

#define min(a, b) ((a) < (b) ? (a) : (b))
#define max(a, b) ((a) > (b) ? (a) : (b))

#ifndef NULL

	      args[n] = Ftruncate (args[n], Qnil);

	    /* Note that we're using sprintf to print floats,
	       so we have to take into account what that function
	       prints.  */
	    thissize = 200 + precision;
	  }
	else
	  {
	    /* Anything but a string, convert to a string using princ.  */
	    register Lisp_Object tem;

38519:200c049178cc

#include "coding.h"
#include "frame.h"
#include "window.h"

#include "systime.h"

#ifdef STDC_HEADERS
#include <float.h>
#define MAX_10_EXP	DBL_MAX_10_EXP
#else
#define MAX_10_EXP	310
#endif

#define min(a, b) ((a) < (b) ? (a) : (b))
#define max(a, b) ((a) > (b) ? (a) : (b))

#ifndef NULL

	      args[n] = Ftruncate (args[n], Qnil);

	    /* Note that we're using sprintf to print floats,
	       so we have to take into account what that function
	       prints.  */
	    thissize = MAX_10_EXP + 100 + precision;
	  }
	else
	  {
	    /* Anything but a string, convert to a string using princ.  */
	    register Lisp_Object tem;