From d47ae89803ca1cde69b8a312101421322f4259f6 Mon Sep 17 00:00:00 2001
From: Bruno Haible <bruno@clisp.org>
Date: Mon, 10 Apr 2023 01:50:39 +0200
Subject: c32toupper: New module.

* lib/uchar.in.h (c32toupper): New declaration.
* lib/c32toupper.c: New file.
* modules/c32toupper: New file.
* m4/uchar_h.m4 (gl_UCHAR_H_REQUIRE_DEFAULTS): Initialize
GNULIB_C32TOUPPER.
* modules/uchar (Makefile.am): Substitute GNULIB_C32TOUPPER.
---
 lib/c32toupper.c | 34 ++++++++++++++++++++++++++++++++++
 lib/uchar.in.h   | 15 +++++++++++++++
 2 files changed, 49 insertions(+)
 create mode 100644 lib/c32toupper.c

(limited to 'lib')

diff --git a/lib/c32toupper.c b/lib/c32toupper.c
new file mode 100644
index 0000000000..a3ca5ecf19
--- /dev/null
+++ b/lib/c32toupper.c
@@ -0,0 +1,34 @@
+/* Map a 32-bit wide character to uppercase.
+   Copyright (C) 2023 Free Software Foundation, Inc.
+
+   This file is free software.
+   It is dual-licensed under "the GNU LGPLv3+ or the GNU GPLv2+".
+   You can redistribute it and/or modify it under either
+     - the terms of the GNU Lesser General Public License as published
+       by the Free Software Foundation, either version 3, or (at your
+       option) any later version, or
+     - the terms of the GNU General Public License as published by the
+       Free Software Foundation; either version 2, or (at your option)
+       any later version, or
+     - the same dual license "the GNU LGPLv3+ or the GNU GPLv2+".
+
+   This file is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Lesser General Public License and the GNU General Public License
+   for more details.
+
+   You should have received a copy of the GNU Lesser General Public
+   License and of the GNU General Public License along with this
+   program.  If not, see <https://www.gnu.org/licenses/>.  */
+
+#include <config.h>
+
+#define IN_C32TOUPPER
+/* Specification.  */
+#include <uchar.h>
+
+#define FUNC c32toupper
+#define WCHAR_FUNC towupper
+#define UCS_FUNC uc_toupper
+#include "c32to-impl.h"
diff --git a/lib/uchar.in.h b/lib/uchar.in.h
index c6795f7e91..27b91c5b58 100644
--- a/lib/uchar.in.h
+++ b/lib/uchar.in.h
@@ -359,6 +359,21 @@ _GL_FUNCDECL_SYS (c32tolower, wint_t, (wint_t wc));
 _GL_CXXALIAS_SYS (c32tolower, wint_t, (wint_t wc));
 _GL_CXXALIASWARN (c32tolower);
 #endif
+#if @GNULIB_C32TOUPPER@
+# if (_GL_WCHAR_T_IS_UCS4 && !GNULIB_defined_mbstate_t) && !defined IN_C32TOUPPER
+_GL_BEGIN_C_LINKAGE
+_GL_INLINE wint_t
+c32toupper (wint_t wc)
+{
+  return towupper (wc);
+}
+_GL_END_C_LINKAGE
+# else
+_GL_FUNCDECL_SYS (c32toupper, wint_t, (wint_t wc));
+# endif
+_GL_CXXALIAS_SYS (c32toupper, wint_t, (wint_t wc));
+_GL_CXXALIASWARN (c32toupper);
+#endif
 
 
 /* Converts a 32-bit wide character to a multibyte character.  */
-- 
cgit v1.2.1