32 #if !defined(HAVE_STDLIB_H) || !defined(HAVE_GCVT) 33 extern char *
gcvt __PR((
double,
int,
char *));
79 #define CHECKFLAG() if (fa.flags & GOTSTAR) goto flagerror 100 #define allmask(t) ((unsigned t)~((unsigned t)0)) 101 #define lowmask(t, x) ((unsigned t)~((unsigned t)((1 << (x))-1))) 102 #define rshiftmask(t, s)((allmask(t) & lowmask(t, s)) >> (s)) 104 #define CHARMASK makemask(char) 105 #define SHORTMASK makemask(short) 106 #define INTMASK makemask(int) 107 #define LONGMASK makemask(long) 113 #define divlbys(val, base) ((val)/(base)) 114 #define modlbys(val, base) ((val)%(base)) 122 #define is_dig(c) (((c) >= '0') && ((c) <= '9')) 123 #define is_cap(c) ((c) >= 'A' && (c) <= 'Z') 124 #define to_cap(c) (is_cap(c) ? c : c - 'a' + 'A') 125 #define cap_ty(c) (is_cap(c) ? 'L' : 'I') 170 #define FMT_ARGMAX 30 188 LOCAL void dbg_print
__PR((
char *
fmt,
int a,
int b,
int c,
int d,
int e,
int f,
int g,
int h,
int i));
192 #ifndef FORMAT_FUNC_NAME 220 #define ofun(c, xp) (--((f_args *)xp)->cnt <= 0 ? \ 221 xflsbuf(c, (f_args *)xp) : \ 222 (*(((f_args *)xp)->ptr)++ = (c))) 226 #ifndef FORMAT_FUNC_NAME 227 #define FORMAT_FUNC_NAME format 228 #define FORMAT_FUNC_PARM 230 #define FORMAT_FUNC_PROTO_DECL void (*fun)(char, void *), 231 #define FORMAT_FUNC_KR_DECL register void (*fun)(); 232 #define FORMAT_FUNC_KR_ARGS fun, 234 #define ofun(c, fp) (*fun)(c, fp) 238 #define FARG ((void *)((UIntptr_t)farg|1)) 258 #ifdef FORMAT_LOW_MEM 300 #ifdef FORMAT_FUNC_PARM 421 case '1':
case '2':
case '3':
case '4':
422 case '5':
case '6':
case '7':
case '8':
case '9':
558 #if SIZEOF_SIZE_T == SIZEOF_INT 562 #if SIZEOF_SIZE_T == SIZEOF_LONG_INT 566 #if SIZEOF_SIZE_T == SIZEOF_LLONG 577 #if SIZEOF_PTRDIFF_T == SIZEOF_INT 581 #if SIZEOF_PTRDIFF_T == SIZEOF_LONG_INT 585 #if SIZEOF_PTRDIFF_T == SIZEOF_LLONG 603 if (
type ==
'H' && *
fmt ==
'h') {
608 if (
type ==
'L' && *
fmt ==
'l') {
623 else if (
mode ==
'I')
650 dbg_print(
"*fmt: '%c' mode: '%c' type: '%c'\n",
681 #ifndef NO_FLOATINGPOINT 686 #ifdef HAVE_LONGDOUBLE 687 long double ldval =
va_arg(
args,
long double);
689 #if (defined(HAVE_QECVT) || defined(HAVE__LDECVT)) 706 #ifdef HAVE_LONGDOUBLE 707 long double ldval =
va_arg(
args,
long double);
709 #if (defined(HAVE_QFCVT) || defined(HAVE__LDFCVT)) 728 #ifdef HAVE_LONGDOUBLE 729 long double ldval =
va_arg(
args,
long double);
731 #if (defined(HAVE_QGCVT) || defined(HAVE__LDGCVT)) 734 #define qgcvt(ld, n, b) _ldgcvt(*(long_double *)&ld, n, b) 749 # ifdef USE_FLOATINGARGS 904 }
else switch (
mode) {
1025 #ifdef FORMAT_BUFFER 1029 if ((
fa.ptr !=
fa.iobuf) &&
1046 register unsigned base;
1126 register unsigned base;
1206 register const char *
s;
1210 register int rfillc;
1212 #ifdef FORMAT_FUNC_PARM 1213 register void (*fun)
__PR((
char,
void *)) =
fa->outf;
1216 register int lzero = 0;
1245 while (--lzero >= 0)
1276 register int rfillc;
1278 #ifdef FORMAT_FUNC_PARM 1279 register void (*fun)
__PR((
char,
void *)) =
fa->outf;
1309 register const char *
s;
1313 register int signific;
1316 return (
prbuf(
"(NULL POINTER)",
fa));
1324 while (--signific >= 0 && *
s !=
'\0')
1338 sprintf(ff,
fmt,
a,
b,
c,
d,
e,
f,
g,
h,
i);
1358 #define AT_LONG_LONG 3 1360 #define AT_LONG_DOUBLE 5 1361 #define AT_VOID_PTR 6 1362 #define AT_CHAR_PTR 7 1363 #define AT_SHORT_PTR 8 1364 #define AT_INT_PTR 9 1365 #define AT_LONG_PTR 10 1366 #define AT_LONG_LONG_PTR 11 1368 #define AT_R_VA_LIST 13 1369 #define AT_BOUNDS 14 1373 #define AF_LONG_LONG 2 1374 #define AF_LONG_DOUBLE 4 1377 static const char skips[] =
"+- #'.$h1234567890";
1410 if (
fmt[
i] ==
'$') {
1413 argindex = *
fmt++ -
'0';
1416 argindex +=
c -
'0';
1441 #if SIZEOF_SIZE_T == SIZEOF_INT 1445 #if SIZEOF_SIZE_T == SIZEOF_LONG_INT 1449 #if SIZEOF_SIZE_T == SIZEOF_LLONG 1459 #if SIZEOF_PTRDIFF_T == SIZEOF_INT 1463 #if SIZEOF_PTRDIFF_T == SIZEOF_LONG_INT 1467 #if SIZEOF_PTRDIFF_T == SIZEOF_LLONG 1589 starindex = *
fmt++ -
'0';
1592 starindex +=
c -
'0';
1596 if (starindex >= 0 && starindex <
FMT_ARGMAX) {
1597 argtypes[starindex] =
AT_INT;
1598 if (starindex > maxindex)
1599 maxindex = starindex;
1607 if (argindex >= 0 && argindex <
FMT_ARGMAX) {
1608 argtypes[argindex] = thistype;
1612 argtypes[++argindex] =
AT_INT;
1614 if (argindex > maxindex)
1615 maxindex = argindex;
1624 for (
i = 0;
i <= maxindex;
i++) {
1627 switch (argtypes[
i]) {
1646 #ifdef HAVE_LONGDOUBLE 1703 (
void)
va_arg((*fargs).ap,
int);
struct png_info_def **typedef void(__cdecl typeof(png_destroy_read_struct))(struct png_struct_def **
ACPI_SIZE strlen(const char *String)
void outf __PR((char, void *))
GLuint GLuint GLsizei count
_In_ CLIPOBJ _In_ BRUSHOBJ _In_ LONG x1
_Check_return_ _CRTIMP size_t __cdecl strspn(_In_z_ const char *_Str, _In_z_ const char *_Control)
EXPORT ssize_t filewrite(FILE *f, void *vbuf, size_t len)
GLfloat GLfloat GLfloat GLfloat h
#define sprintf(buf, format,...)
GLenum GLuint GLenum GLsizei const GLchar * buf
unsigned short(__cdecl typeof(TIFFCurrentDirectory))(struct tiff *)
EXPORT int ftoes(register char *s, MDOUBLE val, register int fieldwidth, register int ndigits)
EXPORT int ftofs(register char *s, MDOUBLE val, register int fieldwidth, register int ndigits)
GLboolean GLboolean GLboolean b
__kernel_ptrdiff_t ptrdiff_t
char * strchr(const char *String, int ch)
void int int ULONGLONG int va_list * ap
GLuint GLuint GLsizei GLenum type
GLboolean GLboolean GLboolean GLboolean a
_CRTIMP char *__cdecl gcvt(_In_ double _Val, _In_ int _NumOfDigits, _Pre_notnull_ _Post_z_ char *_DstBuf)
static unsigned(__cdecl *hash_bstr)(bstr_t s)
unsigned int(__cdecl typeof(jpeg_read_scanlines))(struct jpeg_decompress_struct *