From c55b9177676c95016def3121b0e74d798d91625a Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Sun, 7 Mar 1999 19:34:28 +0100
Subject: [PATCH] Added a fatal().
Rev: src/program.c:1.115
---
src/program.c | 9 ++++++++-
1 file changed, 8 insertions(+), 1 deletion(-)
diff --git a/src/program.c b/src/program.c
index 439fcc498d..23e44f24c8 100644
--- a/src/program.c
+++ b/src/program.c
@@ -5,7 +5,7 @@
\*/
/**/
#include "global.h"
-RCSID("$Id: program.c,v 1.114 1999/03/05 02:15:04 hubbe Exp $");
+RCSID("$Id: program.c,v 1.115 1999/03/07 18:34:28 grubba Exp $");
#include "program.h"
#include "object.h"
#include "dynamic_buffer.h"
@@ -2017,6 +2017,13 @@ static struct ff_hash cache[FIND_FUNCTION_HASHSIZE];
int find_shared_string_identifier(struct pike_string *name,
struct program *prog)
{
+#ifdef PIKE_DEBUG
+ if (!prog) {
+ fatal("find_shared_string_identifier(): No program!\n"
+ "Identifier: %s%s%s\n",
+ name?"\"":"", name?name->str:"NULL", name?"\"":"");
+ }
+#endif /* PIKE_DEBUG */
#ifdef FIND_FUNCTION_HASHSIZE
if(prog -> flags & PROGRAM_FIXED)
{
--
GitLab