Actual source code: aodataalias.c

 2:  #include src/dm/ao/aoimpl.h

  6: /*@C
  7:     AODataAddAlias - Allows accessing a key or field using an alternative
  8:           name.

 10:     Not collective

 12:     Input Parameters:
 13: +   ao - the AOData database
 14: .   alias - substitute name that may be used
 15: -   name - name the alias replaces

 17:    Level: intermediate

 19: .keywords: aliases, keys, fields

 21: .seealso:  
 22: @*/
 23: PetscErrorCode AODataAddAlias(AOData ao,char *alias,char *name)
 24: {
 25:   AODataAlias *aoalias,*t;


 31:   PetscNew(AODataAlias,&aoalias);
 32:   PetscStrallocpy(alias,&aoalias->alias);
 33:   PetscStrallocpy(name,&aoalias->name);
 34:   aoalias->next = PETSC_NULL;

 36:   if (!ao->aliases) {
 37:     ao->aliases = aoalias;
 38:   } else {
 39:     t = ao->aliases;
 40:     while (t->next) t = t->next;
 41:     t->next = aoalias;
 42:   }

 44:   return(0);
 45: }