1################################################################################
2##
3##  $Revision: 1.2 $
4##  $Author: millert $
5##  $Date: 2006/03/28 19:23:02 $
6##
7################################################################################
8##
9##  Version 3.x, Copyright (C) 2004-2005, Marcus Holland-Moritz.
10##  Version 2.x, Copyright (C) 2001, Paul Marquess.
11##  Version 1.x, Copyright (C) 1999, Kenneth Albanowski.
12##
13##  This program is free software; you can redistribute it and/or
14##  modify it under the same terms as Perl itself.
15##
16################################################################################
17
18=provides
19
20/^#\s*define\s+(\w+)/
21
22=implementation
23
24#ifndef IVdf
25#  if IVSIZE == LONGSIZE
26#    define	IVdf      "ld"
27#    define	UVuf      "lu"
28#    define	UVof      "lo"
29#    define	UVxf      "lx"
30#    define	UVXf      "lX"
31#  else
32#    if IVSIZE == INTSIZE
33#      define	IVdf      "d"
34#      define	UVuf      "u"
35#      define	UVof      "o"
36#      define	UVxf      "x"
37#      define	UVXf      "X"
38#    endif
39#  endif
40#endif
41
42#ifndef NVef
43#  if defined(USE_LONG_DOUBLE) && defined(HAS_LONG_DOUBLE) && \
44      defined(PERL_PRIfldbl) /* Not very likely, but let's try anyway. */
45#    define NVef          PERL_PRIeldbl
46#    define NVff          PERL_PRIfldbl
47#    define NVgf          PERL_PRIgldbl
48#  else
49#    define NVef          "e"
50#    define NVff          "f"
51#    define NVgf          "g"
52#  endif
53#endif
54
55