Ignore:
Timestamp:
Aug 6, 2005, 10:33:35 AM (13 years ago)
Author:
pguyot (Paul Guyot)
Message:

Fixed a problem introduced with latest commit (-t would no longer work).
darwintrace now reports full paths (but not normalized) using getcwd (which
calls open, btw) and no longer reports directories (thus we don't have the
additional entries created by calls to getcwd).
Added a new feature of -t: tracking created files outside work (except during
install and activate targets). This is not complete (only open is patched) and
still experimental.
Experimental work on getting all the output of darwintrace. The last lines are
sometimes lost.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/base/src/port1.0/portutil.tcl

    r13377 r13378  
    646646                        }
    647647
    648                         # Check dependencies.
     648                        # Check dependencies & files creates outside work.
    649649                        if {([info exists ports_trace] && $ports_trace == "yes")} {
    650650                                set depends {}
     
    652652                               
    653653                                # Determine deptypes to look for based on target
     654                                set target [ditem_key $ditem provides]
    654655                                switch $target {
    655656                                        configure       { set deptypes "depends_lib" }
     
    677678                                # Dependencies are in the form verb:[param:]port
    678679                                set depsPorts {}
    679                                 foreach dep $deps {
     680                                foreach dep $depends {
    680681                                        # grab the portname portion of the depspec
    681682                                        set portname [lindex [split $depspec :] end]
     
    683684                                }
    684685                                trace_check_deps $depsPorts
     686                               
     687                                # Check files that were created.
     688                                if {$target != "activate"
     689                                        || $target != "fetch"
     690                                        || $target != "install"} {
     691                                        trace_check_create
     692                                }
    685693                        }
    686694
Note: See TracChangeset for help on using the changeset viewer.