From 4dff31857a7d96e3c024f3733eda9085f030b135 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Matthias=20K=C3=B6ppe?= <mkoeppe@mail.math.uni-magdeburg.de>
Date: Sat, 18 Mar 2006 01:56:18 +0000
Subject: [PATCH] #ifdef out debugging statement.

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@9011 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 Source/Modules/allegrocl.cxx | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/Source/Modules/allegrocl.cxx b/Source/Modules/allegrocl.cxx
index 984628912..d79ecd9dc 100644
--- a/Source/Modules/allegrocl.cxx
+++ b/Source/Modules/allegrocl.cxx
@@ -2396,8 +2396,10 @@ int ALLEGROCL :: emit_defun(Node *n, File *f_cl) {
 
 	// String *lisptype=get_lisp_type(argtype, argname);
 	String *lisptype=get_lisp_type(Getattr(p,"type"), Getattr(p,"name"));
+#ifdef ALLEGROCL_DEBUG
 	Printf(stderr,"lisptype of '%s' '%s' = '%s'\n", argtype, Getattr(p,"name"), lisptype);
-      
+#endif
+	
 	// while we're walking the parameters, generating LIN
 	// wrapper code...
 	Setattr(p,"lname",NewStringf("SWIG_arg%d", largnum));