--- users/toby/objcports/MPParser.m 2009-06-30 19:53:20 UTC (rev 53176)
+++ users/toby/objcports/MPParser.m 2009-06-30 20:16:09 UTC (rev 53177)
@@ -54,7 +54,7 @@
}
for (NSString *var in [_port variables]) {
- Tcl_TraceVar(_interp, [var UTF8String], TCL_TRACE_READS, variable_read, port);
+ Tcl_TraceVar(_interp, [var UTF8String], TCL_TRACE_READS, variable_read, _port);
}
// bogus targets