src/gras/DataDesc/datadesc.c

   1 /* $Id$ */
   2
   3 /* datadesc - data description in order to send/recv it in GRAS             */
   4
   5 /* Authors: Olivier Aumage, Martin Quinson                                  */
   6 /* Copyright (C) 2003, 2004 the GRAS posse.                                 */
   7
   8 /* This program is free software; you can redistribute it and/or modify it
   9    under the terms of the license (GNU LGPL) which comes with this package. */
  10
  11 #include "DataDesc/datadesc_private.h"
  12
  13 GRAS_LOG_NEW_DEFAULT_SUBCATEGORY(DataDesc,GRAS);
  14 /* FIXME: make this machine-dependent using a trick such as UserData*/
  15 gras_set_t *gras_datadesc_set_local=NULL;
  16
  17 /**
  18  * gras_datadesc_init:
  19  *
  20  * Initialize the datadesc module
  21  **/
  22 void
  23 gras_datadesc_init(void) {
  24   gras_error_t errcode;
  25
  26   VERB0("Initializing DataDesc");
  27
  28   errcode =  gras_dd_typeset_create(GRAS_THISARCH,&gras_datadesc_set_local);
  29   gras_assert0(errcode==no_error,
  30                "Impossible to create the data set containg locally known types");
  31 }
  32
  33 /**
  34  * gras_datadesc_exit:
  35  *
  36  * Finalize the datadesc module
  37  **/
  38 void
  39 gras_datadesc_exit(void) {
  40   VERB0("Exiting DataDesc");
  41   gras_set_free(&gras_datadesc_set_local);
  42 }
  43
  44
  45 /***
  46  *** BOOTSTRAPING FUNCTIONS: known within GRAS only
  47  ***/