[49205] trunk/base/src/tclobjc1.0/tclobjc.m

[toby at macports.org]

Revision: 49205
          http://trac.macports.org/changeset/49205
Author:   toby at macports.org
Date:     2009-04-05 03:34:50 -0700 (Sun, 05 Apr 2009)
Log Message:
-----------
comment out debug printfs

Modified Paths:
--------------
    trunk/base/src/tclobjc1.0/tclobjc.m

Modified: trunk/base/src/tclobjc1.0/tclobjc.m
===================================================================
--- trunk/base/src/tclobjc1.0/tclobjc.m	2009-04-05 10:33:06 UTC (rev 49204)
+++ trunk/base/src/tclobjc1.0/tclobjc.m	2009-04-05 10:34:50 UTC (rev 49205)
@@ -60,7 +60,7 @@
 	NSMethodSignature *signature;
 	NSInvocation *invocation;
 
-	fprintf(stderr, "objc = %d\n", objc);
+	/*fprintf(stderr, "objc = %d\n", objc);*/
 
 	if (objc < 2) {
 		Tcl_WrongNumArgs(interp, 1, objv, "arguments");
@@ -74,7 +74,7 @@
 		Tcl_AppendObjToObj(selname, objv[i]);
 	}
 	
-	fprintf(stderr, "selector = %s\n", Tcl_GetString(selname));
+	/*fprintf(stderr, "selector = %s\n", Tcl_GetString(selname));*/
 
 #if defined(GNU_RUNTIME)
 	selector = sel_get_uid(Tcl_GetString(selname));
@@ -101,7 +101,7 @@
 		int arg_num = i / 2 + 1;
 
 		const char* arg_type = tclobjc_getarg_typestring(signature, arg_num);
-		fprintf(stderr, "argument type %s\n", arg_type);
+		/*fprintf(stderr, "argument type %s\n", arg_type);*/
 		if (arg_type[0] == _C_ID) {
 			id obj;
 			if (TclObjC_GetIdFromObj(interp, objv[i], &obj) == TCL_OK) {
@@ -145,7 +145,7 @@
 		const char *result_type;
 
 		[invocation invoke];
-		fprintf(stderr, "result size = %lu\n", (unsigned long)[signature methodReturnLength]);
+		/*fprintf(stderr, "result size = %lu\n", (unsigned long)[signature methodReturnLength]);*/
 		result_ptr = malloc([signature methodReturnLength]);
 		[invocation getReturnValue:result_ptr];
 		
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20090405/7bf83708/attachment.html>