stress_var_expand.jam

来自「Boost provides free peer-reviewed portab」· JAM 代码 · 共 15 行

#~ Copyright 2006 Rene Rivera.
#~ Distributed under the Boost Software License, Version 1.0.
#~ (See accompanying file LICENSE_1_0.txt or http://www.boost.org/LICENSE_1_0.txt)

ECHO --- Testing var expansion... ;

local i = 0 ;
local v = one two ;
while $(i) != 4
{
    i = [ CALC $(i) + 1 ] ;
    v = $(v)$(v) ;
    assert $(i) : (==) : $(i) ;
}