/*
 * living.c
 *
 * Functions to support living objects
 *
 * (C) Frank Schmidt, Jesus@NorseMUD
 *
 */


private static string __living_name;


nomask string __query_living_name() {
  return __living_name;
}


/* set name of living */
static void set_living_name(string name) {
  GLOBAL->set_living_name(name, this_object(), __living_name);
  __living_name = name;
}


/* query name of living */
static string query_living_name(object ob) {
  return ob->__query_living_name();
}


/* is object living? */
static int living(object ob) {
  return (ob->__query_living_name()) != 0;
}


/* find living by name and optionally index */
static varargs object find_living(string name, int i) {
  return GLOBAL->find_living(name, i);
}


/* return array of livings? */
static object *livings() {
  return GLOBAL->livings();
}