File:  [Research Unix] / researchv9 / X11 / src / X.V11R1 / lib / oldXtk / Error.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:22:00 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv9-SUN3_old, researchv9-SUN3, HEAD
researchv9-SUN3(old)

/* $Header: /var/lib/cvsd/repos/research/researchv9/X11/src/X.V11R1/lib/oldXtk/Error.c,v 1.1.1.1 2018/04/24 17:22:00 root Exp $ */
#ifndef lint
static char *sccsid = "@(#)Error.c	1.4	2/25/87";
#endif lint

/*
 * Copyright 1987 by Digital Equipment Corporation, Maynard, Massachusetts.
 * 
 *                         All Rights Reserved
 * 
 * Permission to use, copy, modify, and distribute this software and its 
 * documentation for any purpose and without fee is hereby granted, 
 * provided that the above copyright notice appear in all copies and that
 * both that copyright notice and this permission notice appear in 
 * supporting documentation, and that the name of Digital Equipment
 * Corporation not be used in advertising or publicity pertaining to
 * distribution of the software without specific, written prior permission.  
 * 
 * 
 * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
 * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
 * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
 * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
 * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
 * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
 * SOFTWARE.
 */


#include "Xlib.h"
#include <stdio.h>
#include "Intrinsic.h"

#define num_error_codes 3

char *XtErrorList[num_error_codes + 1] = {
	/* No error		*/	"",
	/* XtNOMEM		*/	"insufficient resources, bad alloc",
	/* XCNOENT		*/      "No entry in table ",
	/* XtFOPEN              */	"fopen failed ",
};


char *XtErrDescrip (code)
    register int code;
{
    if (code <= num_error_codes && code > 0)
	return (XtErrorList[code]);
    return("Unknown error");
}

int _XtError (errorCode)
    int errorCode;
{
    extern void exit();
    (void) fprintf(stderr, "X Toolkit Error: %s\n", XtErrDescrip (errorCode));
    (void) fprintf(stderr, "         Reference Count: %d\n", XtreferenceCount);
    exit(1);
}


void XtErrorHandler(handler)
    register int (*handler)();
{
    if (handler != NULL) {
	XtErrorFunction = handler;
    }
    else {
	XtErrorFunction = _XtError;
    }
}



unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.