Quiet annoying mutex debug logging messages
[clinton/bobotpp.git] / source / Interp.H
index b9a7673..d61ccc2 100644 (file)
@@ -1,6 +1,6 @@
 // Interp.H  -*- C++ -*-
 // Copyright (c) 1998 Etienne BERNARD
-// Copyright (c) 2002 Clinton Ebadi
+// Copyright (c) 2002,2005 Clinton Ebadi
 
 // This program is free software; you can redistribute it and/or modify
 // it under the terms of the GNU General Public License as published by
@@ -14,7 +14,8 @@
 
 // You should have received a copy of the GNU General Public License
 // along with this program; if not, write to the Free Software
-// Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307, USA.
+// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+// 02110-1301, USA.
 
 #ifndef INTERP_H
 #define INTERP_H
 
 #ifdef USESCRIPTS
 
+#include <libguile.h>
+
 #ifdef MULTITHREAD
 #include <pthread.h>
 #endif
 
-#include "Bot.H"
-#include "ScriptCommands.H"
-#include <libguile.h>
+#include "String.H"
+
+class Bot;
 
 struct wrapper_data {
   SCM func;
   SCM args;
 };
 
-SCM scm_apply_wrapper(void *);
-
 class Interp {
 public:
   static Bot *bot;
+  static SCM bot_module;
 #ifdef MULTITHREAD
 private:
   static pthread_mutex_t mutex;
 #endif
 public:
   static void Startup();
+  static void Startup2 (Bot *b);
   static void Shutdown();
   static void Execute(Bot *, String);
   static void LoadScript(Bot *, String);
-  static SCM ErrorHandler(void *, SCM, SCM);
+
+  static SCM LazyApplyWrapper (void *);
+  static SCM EmptyHandler (void *, SCM, SCM);
+  static SCM LazyHandler (void *, SCM, SCM);
+  static SCM ScmApplyWrapper (void *);
 };
 
 #endif