From 66b73c46e4e93847f72d414e5e63b882b2ce5152 Mon Sep 17 00:00:00 2001
From: hadaq <hadaq>
Date: Wed, 6 Apr 2005 13:59:48 +0000
Subject: [PATCH] error messages

---
 allParam/tcl/tclParam.c | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/allParam/tcl/tclParam.c b/allParam/tcl/tclParam.c
index abe80a7..8afba65 100644
--- a/allParam/tcl/tclParam.c
+++ b/allParam/tcl/tclParam.c
@@ -1,4 +1,4 @@
-static const char rcsId[] = "$Header: /misc/hadesprojects/daq/cvsroot/eventbuilder/allParam/tcl/tclParam.c,v 1.31 2005-01-10 15:54:45 hadaq Exp $";
+static const char rcsId[] = "$Header: /misc/hadesprojects/daq/cvsroot/eventbuilder/allParam/tcl/tclParam.c,v 1.32 2005-04-06 13:59:48 hadaq Exp $";
 #define _POSIX_C_SOURCE 199509L
 
 #if HAVE_CONFIG_H
@@ -56,7 +56,7 @@ static void defaultLogMsg(int priority, const char *message, ...)
 	}
 }
 
-void (*ourLogMsg) (int, const char *, ...) = defaultLogMsg;
+static void (*ourLogMsg) (int, const char *, ...) = defaultLogMsg;
 
 void Param_registerLogMsg(void (*f) (int, const char *, ...))
 {
@@ -362,6 +362,12 @@ int Param_getStringArray(const Param * my, const char *name, const char *idx, in
 		pthread_mutex_unlock(((TclParam *) (my->specParam))->interpLock);
 	}
 #endif							/* PTHREADS */
+	if (*rows == 0) {
+		char s[512];
+
+		sprintf(s, "Parameter %s(%s*) not found", lname, lidx);
+		Param_strerror((Param *) my, s);
+	}
 	return retVal;
 }
 
-- 
2.43.0