time_util_fatal__()

int time_util_fatal__	(	char *	caller,
		char *	text,
		time_kernel::ftnlen	caller_len,
		time_kernel::ftnlen	text_len
	)

Definition at line 44 of file cxxtime_util_fatal.cc.

{
  std::string callerstring, textstring;
  int i;
  for (i=0; i<caller_len; i++) { callerstring += *(caller++); }
  for (i=0; i<text_len; i++) { textstring += *(text++); }
  std::string message="ERROR ("+callerstring+"): "+textstring;
  throw(libtime::Exception(message.c_str()));
  return(0);
} /* time_util_fatal__ */