Actual source code: dlregis.c

  1: /*$Id: dlregis.c,v 1.14 2001/03/23 23:21:18 balay Exp $*/

  3: #include "petscvec.h"

  5: EXTERN_C_BEGIN
  6: /*
  7:   PetscDLLibraryRegister - This function is called when the dynamic library it is in is opened.

  9:   This one registers all the vector types that are in the basic PETSc libpetscvec
 10:   library.

 12:   Input Parameter:
 13:   path - library path
 14:  */
 15: int PetscDLLibraryRegister(char *path)
 16: {

 19:   PetscInitializeNoArguments(); if (ierr) return 1;

 22:   /*
 23:       If we got here then PETSc was properly loaded
 24:   */
 25:   VecRegisterAll(path);
 26:   return(0);
 27: }
 28: EXTERN_C_END

 30: /* --------------------------------------------------------------------------*/
 31: static char *contents = "PETSc vector library. n
 32:      PETSc#VecSeq, PETSc#VecMPI, PETSc#VecShared ...n";

 34: #include "src/sys/src/utils/dlregis.h"