Actual source code: dlregis.h
1: /* $Id: dlregis.h,v 1.8 2001/03/23 23:20:45 balay Exp $ */
2: /*
3: This file is included by all the dlregis.c files to provide common information
4: on the PETSC team.
5: */
7: static char *authors = PETSC_AUTHOR_INFO;
8: static char *version = PETSC_VERSION_NUMBER;
10: EXTERN_C_BEGIN
11: /* --------------------------------------------------------------------------*/
12: int PetscDLLibraryInfo(char *path,char *type,char **mess)
13: {
14: PetscTruth iscon,isaut,isver;
15: int ierr;
19: PetscStrcmp(type,"Contents",&iscon);
20: PetscStrcmp(type,"Authors",&isaut);
21: PetscStrcmp(type,"Version",&isver);
22: if (iscon) *mess = contents;
23: else if (isaut) *mess = authors;
24: else if (isver) *mess = version;
25: else *mess = 0;
27: return(0);
28: }
29: EXTERN_C_END