boost/build
2
0
Fork 0
mirror of https://github.com/boostorg/build.git synced 2026-02-13 00:12:11 +00:00
Code Issues Projects Releases Wiki Activity

Added list.get-at that returns the value of an item, assumes that the item is a node.

Browse Source 
Added support for n-recursive access to list.at and list.get-at to make access to recursive structures easier.


[SVN r14285]
This commit is contained in:
Rene Rivera
2002-07-02 20:39:20 +00:00
parent b3595b0e70
commit 00a8cf0646
1 changed files with 26 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
src/util/container.jam
View File

@@ -50,9 +50,24 @@ rule list (
return $(self.value[-1]) ;
}
rule at ( index )
rule at ( index : * )
{
return $(self.value[$(index)]) ;
local r = $(self.value[$(index)]) ;
if $(2)
{
r = [ $(r).at $(2) : $(3) : $(4) : $(5) : $(6) : $(7) : $(8) : $(9) ] ;
}
return $(r) ;
}
rule get-at ( index : * )
{
local r = $(self.value[$(index)]) ;
if $(2)
{
r = [ $(r).at $(2) : $(3) : $(4) : $(5) : $(6) : $(7) : $(8) : $(9) ] ;
}
return [ $(r).get ] ;
}
rule push-front ( value )
@@ -147,4 +162,13 @@ local rule __test__ ( )
assert.false $(l2-alias).empty ;
$(l2).pop-back ;
assert.result t : $(l2-alias).back ;
local l3 = [ new list ] ;
$(l3).push-back [ new list 1 2 3 4 5 ] ;
$(l3).push-back [ new list a b c ] ;
$(l3).push-back [ new list [ new list x y z ] [ new list 7 8 9 ] ] ;
assert.result 1 : $(l3).at 1 : 1 ;
assert.result b : $(l3).at 2 : 2 ;
assert.result a b c : $(l3).get-at 2 ;
assert.result 7 8 9 : $(l3).get-at 3 : 2 ;
}