src/gras/Virtu/rl_process.c

   1 /* $Id$ */
   2
   3 /* process_rl - GRAS process handling on real life                         */
   4
   5 /* Authors: Martin Quinson                                                  */
   6 /* Copyright (C) 2003,2004 da 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 "gras/Virtu/virtu_rl.h"
  12
  13 GRAS_LOG_EXTERNAL_CATEGORY(process);
  14 GRAS_LOG_DEFAULT_CATEGORY(process);
  15
  16 /* globals */
  17 static gras_procdata_t *_gras_procdata = NULL;
  18
  19 gras_error_t gras_process_init() {
  20   gras_error_t errcode;
  21
  22   if (!(_gras_procdata=gras_new(gras_procdata_t,1)))
  23     RAISE_MALLOC;
  24
  25   TRY(gras_procdata_init());
  26   return no_error;
  27 }
  28 gras_error_t gras_process_exit() {
  29   gras_procdata_exit();
  30   return no_error;
  31 }
  32
  33 /* **************************************************************************
  34  * Process data
  35  * **************************************************************************/
  36
  37 gras_procdata_t *gras_procdata_get(void) {
  38   gras_assert0(_gras_procdata,"Run gras_process_init!");
  39
  40   return _gras_procdata;
  41 }