subst_list_type * subst_list_alloc(const void * input_arg) { subst_list_type * subst_list = util_malloc(sizeof * subst_list ); UTIL_TYPE_ID_INIT( subst_list , SUBST_LIST_TYPE_ID); subst_list->parent = NULL; subst_list->func_pool = NULL; subst_list->string_data = vector_alloc_new(); subst_list->func_data = vector_alloc_new(); if (input_arg != NULL) { if (subst_list_is_instance( input_arg )) subst_list_set_parent( subst_list , input_arg ); else if (subst_func_pool_is_instance( input_arg )) subst_list->func_pool = input_arg; else util_abort("%s: run_time cast failed - invalid type on input argument.\n",__func__); } return subst_list; }
void gen_kw_set_subst_parent(gen_kw_type * gen_kw , const subst_list_type * subst_parent) { subst_list_set_parent( gen_kw->subst_list , subst_parent ); }