[69989] trunk/base/src

[jmr at macports.org]

Revision: 69989
          http://trac.macports.org/changeset/69989
Author:   jmr at macports.org
Date:     2010-07-25 07:14:55 -0700 (Sun, 25 Jul 2010)
Log Message:
-----------
fix a couple of tracelib errors

Modified Paths:
--------------
    trunk/base/src/pextlib1.0/tracelib.c
    trunk/base/src/port1.0/porttrace.tcl

Modified: trunk/base/src/pextlib1.0/tracelib.c
===================================================================
--- trunk/base/src/pextlib1.0/tracelib.c	2010-07-25 14:11:31 UTC (rev 69988)
+++ trunk/base/src/pextlib1.0/tracelib.c	2010-07-25 14:14:55 UTC (rev 69989)
@@ -535,7 +535,7 @@
 	return TCL_OK;
 }
 
-static int TracelibCleanCmd(Tcl_Interp * interp)
+static int TracelibCleanCmd(Tcl_Interp * interp UNUSED)
 {
 	#define safe_free(x) do{free(x); x=0;}while(0);
 	cleanuping=1;
@@ -559,7 +559,6 @@
 	enable_fence=0;
 	#undef safe_free
 	cleanuping=0;
-	Tcl_Eval(interp, "registry::close_file_map");
 	return TCL_OK;
 }
 

Modified: trunk/base/src/port1.0/porttrace.tcl
===================================================================
--- trunk/base/src/port1.0/porttrace.tcl	2010-07-25 14:11:31 UTC (rev 69988)
+++ trunk/base/src/port1.0/porttrace.tcl	2010-07-25 14:14:55 UTC (rev 69989)
@@ -181,6 +181,8 @@
     thread::send $trace_thread "package require registry 1.0"
     # and this file as well.
     thread::send $trace_thread "package require porttrace 1.0"
+    # slave needs ui_warn and ui_debug...
+    thread::send $trace_thread "macports::ui_init warn; macports::ui_init debug"
 
     # Initialize the slave
     thread::send $trace_thread "porttrace::slave_init $trace_fifo $workpath"
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.macosforge.org/pipermail/macports-changes/attachments/20100725/926f98b8/attachment.html>