[Boost-commit] svn:boost r44343 - trunk/tools/build/v2/tools

From: roland.schwarz_at_[hidden]
Date: 2008-04-12 07:02:36

Author: speedsnail
Date: 2008-04-12 07:02:35 EDT (Sat, 12 Apr 2008)
New Revision: 44343
URL: http://svn.boost.org/trac/boost/changeset/44343

Log:
Fixed a bug in for seldom used argument <property:/property-name/> in rule format-name.
Added /property-name/ may be a regex.
Text files modified: 
   trunk/tools/build/v2/tools/common.jam |    16 ++++++++++------                        
   1 files changed, 10 insertions(+), 6 deletions(-)

Modified: trunk/tools/build/v2/tools/common.jam
==============================================================================
--- trunk/tools/build/v2/tools/common.jam	(original)
+++ trunk/tools/build/v2/tools/common.jam	2008-04-12 07:02:35 EDT (Sat, 12 Apr 2008)
@@ -643,7 +643,8 @@
 #           value as the version number.
 #   <property:/property-name/>[joiner]
 #       ::  Direct lookup of the given property-name value in the
-#           build properties.
+#           build properties. /property-name/ is a regular expression.
+#           e.g. <property:toolset-.*:flavor> will match every toolset.
 #   /otherwise/
 #       ::  The literal value of the format argument.
 #
@@ -693,12 +694,15 @@
 
                 case <property:*> :
                 local key = [ MATCH <property:(.*)> : $(f:G) ] ;
-                local p = [ $(property-set).get [ MATCH <property:(.*)> : $(f:G) ] ] ;
-                if $(p)
-                {
-                    result += [ join-tag $(f:G=) : $(p) ] ;
+                local p0 = [ MATCH <($(key))> : [ $(property-set).raw ] ] ;
+                if $(p0) {
+                    local p = [ $(property-set).get <$(p0)> ] ;
+                    if $(p)
+                    {
+                        result += [ join-tag $(f:G=) : $(p) ] ;
+                    }
                 }
-
+                
                 case * :
                 result += $(f:G=) ;
             }