source/Interp.H

   1 // Interp.H  -*- C++ -*-
   2 // Copyright (c) 1998 Etienne BERNARD
   3 // Copyright (c) 2002 Clinton Ebadi
   4
   5 // This program is free software; you can redistribute it and/or modify
   6 // it under the terms of the GNU General Public License as published by
   7 // the Free Software Foundation; either version 2 of the License, or
   8 // (at your option) any later version.
   9
  10 // This program is distributed in the hope that it will be useful,
  11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 // GNU General Public License for more details.
  14
  15 // You should have received a copy of the GNU General Public License
  16 // along with this program; if not, write to the Free Software
  17 // Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
  18
  19 #ifndef INTERP_H
  20 #define INTERP_H
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include "config.h"
  24 #endif
  25
  26 #ifdef USESCRIPTS
  27
  28 #ifdef MULTITHREAD
  29 #include <pthread.h>
  30 #endif
  31
  32 #include "Bot.H"
  33 #include "ScriptCommands.H"
  34 #include <libguile.h>
  35
  36 struct wrapper_data {
  37   SCM func;
  38   SCM args;
  39 };
  40
  41 SCM lazy_apply_wrapper(void *);
  42 SCM empty_handler(void *, SCM, SCM);
  43
  44 class Interp {
  45 public:
  46   static Bot *bot;
  47   static SCM bot_module;
  48 #ifdef MULTITHREAD
  49 private:
  50   static pthread_mutex_t mutex;
  51 #endif
  52 public:
  53   static void Startup();
  54   static void Shutdown();
  55   static void Execute(Bot *, String);
  56   static void LoadScript(Bot *, String);
  57   static SCM ErrorHandler(void *, SCM, SCM);
  58
  59   friend SCM scm_apply_wrapper (void*);
  60 };
  61
  62 #endif
  63 #endif