diff options
Diffstat (limited to 'generic/tk3d.c')
-rw-r--r-- | generic/tk3d.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tk3d.c b/generic/tk3d.c index 3c6492e..dc69662 100644 --- a/generic/tk3d.c +++ b/generic/tk3d.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tk3d.c,v 1.13 2002/08/05 04:30:38 dgp Exp $ + * RCS: @(#) $Id: tk3d.c,v 1.14 2004/01/13 02:06:00 davygrvy Exp $ */ #include "tk3d.h" @@ -392,7 +392,7 @@ Tk_3DBorderGC(tkwin, border, which) } else if (which == TK_3D_DARK_GC){ return borderPtr->darkGC; } - panic("bogus \"which\" value in Tk_3DBorderGC"); + Tcl_Panic("bogus \"which\" value in Tk_3DBorderGC"); /* * The code below will never be executed, but it's needed to @@ -1314,7 +1314,7 @@ Tk_Get3DBorderFromObj(tkwin, objPtr) } error: - panic("Tk_Get3DBorderFromObj called with non-existent border!"); + Tcl_Panic("Tk_Get3DBorderFromObj called with non-existent border!"); /* * The following code isn't reached; it's just there to please compilers. */ @@ -1395,7 +1395,7 @@ TkDebugBorder(tkwin, name) if (hashPtr != NULL) { borderPtr = (TkBorder *) Tcl_GetHashValue(hashPtr); if (borderPtr == NULL) { - panic("TkDebugBorder found empty hash table entry"); + Tcl_Panic("TkDebugBorder found empty hash table entry"); } for ( ; (borderPtr != NULL); borderPtr = borderPtr->nextPtr) { objPtr = Tcl_NewObj(); |