Revision
138172
Author
ijackson@macports.org
Date
2015-07-01 00:50:33 -0700 (Wed, 01 Jul 2015)

Log Message

WIP: Dependency Calculation using libsolv
Create a list 'jobs' which will return the list of
packages to be installed. Remove unwanted puts statements.

Modified Paths

Diff

Modified: branches/gsoc15-dependency/base/src/macports1.0/macports_libsolv.tcl (138171 => 138172)


--- branches/gsoc15-dependency/base/src/macports1.0/macports_libsolv.tcl	2015-07-01 07:41:29 UTC (rev 138171)
+++ branches/gsoc15-dependency/base/src/macports1.0/macports_libsolv.tcl	2015-07-01 07:50:33 UTC (rev 138172)
@@ -163,7 +163,6 @@
                             ## Add Conflicts to the solvables
                             if {[info exists portinfo(conflicts)]} {
                                 foreach conf $portinfo(conflicts) {
-                                    puts "Conflicts: $conf"
                                     $solvable add_deparray $solv::SOLVABLE_CONFLICTS \
                                     [$pool str2id $conf 1]
                                 }
@@ -171,7 +170,6 @@
                             ## Add Obsoletes(replaced_by) to the solvables
                             if {[info exists portinfo(replaced_by)]} {
                                 foreach conf $portinfo(replaced_by) {
-                                    puts "Conflicts: $conf"
                                     $solvable add_deparray $solv::SOLVABLE_OBSOLETES \
                                     [$pool str2id $conf 1]
                                 }
@@ -287,6 +285,10 @@
     ## Dependency calculation using libsolv
     proc dep_calc {portname} {
         ui_msg -nonewline "$macports::ui_prefix Computing dependencies for $portname using libsolv"
-
+        set jobs [list]
+        foreach arg $portname {
+            lappend jobs [$solv::pool_Job $solv::Job_SOLVER_SOLVABLE [$arg cget -id]]
+            puts "Jobs = $jobs"
+        }
     }
 }