From 3950ffe2a485479f6561c27364d3d7df5a21d124 Mon Sep 17 00:00:00 2001 From: Igor Pashev Date: Sun, 24 Jun 2012 22:28:35 +0000 Subject: Imported Upstream version 93u+ --- src/lib/libast/misc/errorx.c | 50 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 50 insertions(+) create mode 100644 src/lib/libast/misc/errorx.c (limited to 'src/lib/libast/misc/errorx.c') diff --git a/src/lib/libast/misc/errorx.c b/src/lib/libast/misc/errorx.c new file mode 100644 index 0000000..70466de --- /dev/null +++ b/src/lib/libast/misc/errorx.c @@ -0,0 +1,50 @@ +/*********************************************************************** +* * +* This software is part of the ast package * +* Copyright (c) 1985-2011 AT&T Intellectual Property * +* and is licensed under the * +* Eclipse Public License, Version 1.0 * +* by AT&T Intellectual Property * +* * +* A copy of the License is available at * +* http://www.eclipse.org/org/documents/epl-v10.html * +* (with md5 checksum b35adb5213ca9657e911e9befb180842) * +* * +* Information and Software Systems Research * +* AT&T Research * +* Florham Park NJ * +* * +* Glenn Fowler * +* David Korn * +* Phong Vo * +* * +***********************************************************************/ +#pragma prototyped + +#include "lclib.h" + +/* + * low level for ERROR_translate() + * this fills in NiL arg defaults and calls error_info.translate + */ + +char* +errorx(const char* loc, const char* cmd, const char* cat, const char* msg) +{ + char* s; + + if (!error_info.translate) + error_info.translate = translate; /* 2007-03-19 OLD_Error_info_t workaround */ + if (ERROR_translating()) + { + if (!loc) + loc = (const char*)locales[AST_LC_MESSAGES]->code; + if (!cmd) + cmd = (const char*)error_info.id; + if (!cat) + cat = (const char*)error_info.catalog; + if (s = (*error_info.translate)(loc, cmd, cat, msg)) + return s; + } + return (char*)msg; +} -- cgit v1.2.3