[137379] branches/gsoc15-dependency/base/src/macports1.0

[ijackson at macports.org]

Revision: 137379
          https://trac.macports.org/changeset/137379
Author:   ijackson at macports.org
Date:     2015-06-10 13:52:57 -0700 (Wed, 10 Jun 2015)
Log Message:
-----------
WIP: Implement search using libsolv
Add check for -l option in mportsearch.
Currently prints a value $solv::Job_SOLVER_SOLVABLE(==1)
to test the working with option -l set and if libsolv is
working correctly.

Modified Paths:
--------------
    branches/gsoc15-dependency/base/src/macports1.0/macports.tcl
    branches/gsoc15-dependency/base/src/macports1.0/macports_libsolv.tcl

Modified: branches/gsoc15-dependency/base/src/macports1.0/macports.tcl
===================================================================
--- branches/gsoc15-dependency/base/src/macports1.0/macports.tcl	2015-06-10 20:22:05 UTC (rev 137378)
+++ branches/gsoc15-dependency/base/src/macports1.0/macports.tcl	2015-06-10 20:52:57 UTC (rev 137379)
@@ -2739,6 +2739,11 @@
     set matches [list]
     set easy [expr {$field eq "name"}]
 
+    if {[info exists macports::global_options(ports_depengine)]} {
+        if {$macports::global_options(ports_depengine) eq "libsolv"} {
+            macports::libsolv::print
+        }
+    }
     set found 0
     foreach source $sources {
         set source [lindex $source 0]

Modified: branches/gsoc15-dependency/base/src/macports1.0/macports_libsolv.tcl
===================================================================
--- branches/gsoc15-dependency/base/src/macports1.0/macports_libsolv.tcl	2015-06-10 20:22:05 UTC (rev 137378)
+++ branches/gsoc15-dependency/base/src/macports1.0/macports_libsolv.tcl	2015-06-10 20:52:57 UTC (rev 137379)
@@ -38,14 +38,15 @@
 ## Testing solv.dylib
 #global solv::Job_SOLVER_SOLVABLE
 
-proc print {} {
-    puts $solv::Job_SOLVER_SOLVABLE
-}
 
 #set pool [solv::Pool]
 #puts $pool
 
 namespace eval macports::libsolv {
+    proc print {} {
+        puts $solv::Job_SOLVER_SOLVABLE
+    }
+
     proc create_pool {} {
         global macports::sources
         set pool [solv::Pool]
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.macosforge.org/pipermail/macports-changes/attachments/20150610/b61c8613/attachment.html>