From c7145efffe9cfd830ba341d782e8b07ca0a6b40f Mon Sep 17 00:00:00 2001
From: Adam Dickmeiss <adam@indexdata.dk>
Date: Sat, 29 May 2004 07:04:26 +0000
Subject: [PATCH] Use only perl_clone if USE_ITHREADS is defined

---
 SimpleServer.xs |    4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/SimpleServer.xs b/SimpleServer.xs
index f3cd24b..9e27621 100644
--- a/SimpleServer.xs
+++ b/SimpleServer.xs
@@ -1,5 +1,5 @@
 /*
- * $Id: SimpleServer.xs,v 1.25 2004-05-14 04:07:50 adam Exp $ 
+ * $Id: SimpleServer.xs,v 1.26 2004-05-29 07:04:26 adam Exp $ 
  * ----------------------------------------------------------------------
  * 
  * Copyright (c) 2000-2004, Index Data.
@@ -118,6 +118,7 @@ int tst_clones(void)
 #endif
 
 int simpleserver_clone(void) {
+#ifdef USE_ITHREADS
      nmem_mutex_enter(simpleserver_mutex);
      if (1)
      {
@@ -135,6 +136,7 @@ int simpleserver_clone(void) {
          }
      }
      nmem_mutex_leave(simpleserver_mutex);
+#endif
      return 0;
 }
 
-- 
1.7.10.4