regfatal.c revision 7c2fbfb345896881c631598ee3852ce9ce33fb07
2N/A/***********************************************************************
2N/A* *
2N/A* This software is part of the ast package *
2N/A* Copyright (c) 1985-2008 AT&T Intellectual Property *
2N/A* and is licensed under the *
2N/A* Common Public License, Version 1.0 *
2N/A* by AT&T Intellectual Property *
2N/A* *
2N/A* A copy of the License is available at *
2N/A* http://www.opensource.org/licenses/cpl1.0.txt *
2N/A* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
2N/A* *
2N/A* Information and Software Systems Research *
2N/A* AT&T Research *
2N/A* Florham Park NJ *
2N/A* *
2N/A* Glenn Fowler <gsf@research.att.com> *
2N/A* David Korn <dgk@research.att.com> *
2N/A* Phong Vo <kpv@research.att.com> *
2N/A* *
2N/A***********************************************************************/
2N/A#pragma prototyped
2N/A
2N/A/*
2N/A * posix regex fatal error interface to error()
2N/A */
2N/A
2N/A#include "reglib.h"
2N/A
2N/A#include <error.h>
2N/A
2N/Avoid
2N/Aregfatalpat(regex_t* p, int level, int code, const char* pat)
2N/A{
2N/A char buf[128];
2N/A
2N/A regerror(code, p, buf, sizeof(buf));
2N/A regfree(p);
2N/A if (pat)
2N/A error(level, "regular expression: %s: %s", pat, buf);
2N/A else
2N/A error(level, "regular expression: %s", buf);
2N/A}
2N/A
2N/Avoid
2N/Aregfatal(regex_t* p, int level, int code)
2N/A{
2N/A regfatalpat(p, level, code, NiL);
2N/A}
2N/A