82 lines
3 KiB
Meson
82 lines
3 KiB
Meson
# Copyright (C) 2002-2004, 2006-2018 Free Software Foundation, Inc.
|
|
# This file is free software; the Free Software Foundation
|
|
# gives unlimited permission to copy and/or distribute it,
|
|
# with or without modifications, as long as this notice is preserved.
|
|
|
|
# Test whether the *printf family of functions supports the %ls format
|
|
# directive and in particular, when a precision is specified, whether
|
|
# the functions stop converting the wide string argument when the number
|
|
# of bytes that have been produced by this conversion equals or exceeds
|
|
# the precision.
|
|
# Result is gl_cv_func_printf_directive_ls.
|
|
|
|
printf_directive_ls_test = '''
|
|
/* Tru64 with Desktop Toolkit C has a bug: <stdio.h> must be included before
|
|
<wchar.h>.
|
|
BSD/OS 4.0.1 has a bug: <stddef.h>, <stdio.h> and <time.h> must be
|
|
included before <wchar.h>. */
|
|
#include <stddef.h>
|
|
#include <stdio.h>
|
|
#include <time.h>
|
|
#include <wchar.h>
|
|
#include <string.h>
|
|
int main ()
|
|
{
|
|
int result = 0;
|
|
char buf[100];
|
|
/* Test whether %ls works at all.
|
|
This test fails on OpenBSD 4.0, IRIX 6.5, Solaris 2.6, Haiku, but not on
|
|
Cygwin 1.5. */
|
|
{
|
|
static const wchar_t wstring[] = { 'a', 'b', 'c', 0 };
|
|
buf[0] = '\0';
|
|
if (sprintf (buf, "%ls", wstring) < 0
|
|
|| strcmp (buf, "abc") != 0)
|
|
result |= 1;
|
|
}
|
|
/* This test fails on IRIX 6.5, Solaris 2.6, Cygwin 1.5, Haiku (with an
|
|
assertion failure inside libc), but not on OpenBSD 4.0. */
|
|
{
|
|
static const wchar_t wstring[] = { 'a', 0 };
|
|
buf[0] = '\0';
|
|
if (sprintf (buf, "%ls", wstring) < 0
|
|
|| strcmp (buf, "a") != 0)
|
|
result |= 2;
|
|
}
|
|
/* Test whether precisions in %ls are supported as specified in ISO C 99
|
|
section 7.19.6.1:
|
|
"If a precision is specified, no more than that many bytes are written
|
|
(including shift sequences, if any), and the array shall contain a
|
|
null wide character if, to equal the multibyte character sequence
|
|
length given by the precision, the function would need to access a
|
|
wide character one past the end of the array."
|
|
This test fails on Solaris 10. */
|
|
{
|
|
static const wchar_t wstring[] = { 'a', 'b', (wchar_t) 0xfdfdfdfd, 0 };
|
|
buf[0] = '\0';
|
|
if (sprintf (buf, "%.2ls", wstring) < 0
|
|
|| strcmp (buf, "ab") != 0)
|
|
result |= 8;
|
|
}
|
|
return result;
|
|
}
|
|
'''
|
|
|
|
if not meson.is_cross_build() or meson.has_exe_wrapper()
|
|
run_result = cc.run(printf_directive_ls_test,
|
|
name : 'printf supports the \'ls\' directive')
|
|
gl_cv_func_printf_directive_ls = run_result.compiled() and run_result.returncode() == 0
|
|
else
|
|
if (host_system.startswith ('openbsd') or
|
|
host_system.startswith ('irix') or
|
|
host_system.startswith ('solaris') or
|
|
host_system.startswith ('cygwin') or
|
|
host_system.startswith ('beos') or
|
|
host_system.startswith ('haiku'))
|
|
gl_cv_func_printf_directive_ls = false
|
|
elif host_system == 'windows'
|
|
gl_cv_func_printf_directive_ls = true
|
|
else
|
|
gl_cv_func_printf_directive_ls = true
|
|
endif
|
|
endif
|