#endif /* REAL_WIDTH */
#if REAL_WIDTH == 1
-# define CONST_DOUBLE_FORMAT "e0ww"
+# define CONST_DOUBLE_FORMAT "0ww"
#else
# if REAL_WIDTH == 2
-# define CONST_DOUBLE_FORMAT "e0ww"
+# define CONST_DOUBLE_FORMAT "0ww"
# else
# if REAL_WIDTH == 3
-# define CONST_DOUBLE_FORMAT "e0www"
+# define CONST_DOUBLE_FORMAT "0www"
# else
# if REAL_WIDTH == 4
-# define CONST_DOUBLE_FORMAT "e0wwww"
+# define CONST_DOUBLE_FORMAT "0wwww"
# else
# if REAL_WIDTH == 5
-# define CONST_DOUBLE_FORMAT "e0wwwww"
+# define CONST_DOUBLE_FORMAT "0wwwww"
# else
# define CONST_DOUBLE_FORMAT /* nothing - will cause syntax error */
# endif
gendef (*fmt);
}
-#if defined(USE_C_ALLOCA)
-PTR
-xmalloc (nbytes)
- size_t nbytes;
-{
- register PTR tmp = (PTR) really_call_malloc (nbytes);
-
- if (!tmp)
- {
- fprintf (stderr, "can't allocate %d bytes (out of virtual memory)\n",
- nbytes);
- exit (FATAL_EXIT_CODE);
- }
-
- return tmp;
-}
-#endif /* USE_C_ALLOCA */
-
/* This is the main program. We accept only one argument, "-h", which
says we are writing the genrtl.h file. Otherwise we are writing the
genrtl.c file. */