aboutsummaryrefslogtreecommitdiff
path: root/tcl_loader.cxx
diff options
context:
space:
mode:
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;