2017-12-07 Vladimir Makarov <vmakarov@redhat.com>
[official-gcc.git] / intl / dgettext.c
blobe497dd9c920b5fccd2d24b5d20e9f7caa2fe90d2
1 /* Implementation of the dgettext(3) function.
2 Copyright (C) 1995-1997, 2000-2003 Free Software Foundation, Inc.
4 This program is free software; you can redistribute it and/or modify it
5 under the terms of the GNU Library General Public License as published
6 by the Free Software Foundation; either version 2, or (at your option)
7 any later version.
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Library General Public License for more details.
14 You should have received a copy of the GNU Library General Public
15 License along with this program; if not, write to the Free Software
16 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301,
17 USA. */
19 #ifdef HAVE_CONFIG_H
20 # include <config.h>
21 #endif
23 #include "gettextP.h"
25 #include <locale.h>
27 #ifdef _LIBC
28 # include <libintl.h>
29 #else
30 # include "libgnuintl.h"
31 #endif
33 /* @@ end of prolog @@ */
35 /* Names for the libintl functions are a problem. They must not clash
36 with existing names and they should follow ANSI C. But this source
37 code is also used in GNU C Library where the names have a __
38 prefix. So we have to make a difference here. */
39 #ifdef _LIBC
40 # define DGETTEXT __dgettext
41 # define DCGETTEXT INTUSE(__dcgettext)
42 #else
43 # define DGETTEXT libintl_dgettext
44 # define DCGETTEXT libintl_dcgettext
45 #endif
47 /* Look up MSGID in the DOMAINNAME message catalog of the current
48 LC_MESSAGES locale. */
49 char *
50 DGETTEXT (domainname, msgid)
51 const char *domainname;
52 const char *msgid;
54 return DCGETTEXT (domainname, msgid, LC_MESSAGES);
57 #ifdef _LIBC
58 /* Alias for function name in GNU C Library. */
59 weak_alias (__dgettext, dgettext);
60 #endif