aboutsummaryrefslogtreecommitdiff
path: root/tcl_loader.cxx
diff options
context:
space:
mode:
authormescalinum <mescalinum@users.sourceforge.net>2009-08-29 17:07:13 +0000
committermescalinum <mescalinum@users.sourceforge.net>2009-08-29 17:07:13 +0000
commit8b65741620bae448b96eb8ce59b85a7b1bb36c44 (patch)
tree6b22e262f1152965a656855478c4ad1a9c58aef0 /tcl_loader.cxx
parent066a639c0bb28d759c017ab2e00624dfb0a64b3f (diff)
tidy up!
svn path=/trunk/externals/tclpd/; revision=12133
Diffstat (limited to 'tcl_loader.cxx')
-rw-r--r--tcl_loader.cxx6
1 files changed, 4 insertions, 2 deletions
diff --git a/tcl_loader.cxx b/tcl_loader.cxx
index fececed..e7f22ff 100644
--- a/tcl_loader.cxx
+++ b/tcl_loader.cxx
@@ -2,8 +2,10 @@
#include <string.h>
#include <unistd.h>
-extern "C" int tclpd_do_load_lib(t_canvas *canvas, char *objectname)
-{
+extern "C" int tclpd_do_load_lib(t_canvas *canvas, char *objectname) {
+#ifdef DEBUG
+ post("Tcl loader: registering tcl class loader mechanism");
+#endif
char filename[MAXPDSTRING], dirbuf[MAXPDSTRING],
*classname, *nameptr;
int fd;