1 # Copyright 2002, 2003, 2004, 2006 Vladimir Prus
2 # Copyright 2008, 2012 Jurko Gospodnetic
3 # Distributed under the Boost Software License, Version 1.0.
4 # (See accompanying file LICENSE_1_0.txt or http://www.boost.org/LICENSE_1_0.txt)
15 return "$(.major).$(.minor)-git" ;
21 if [ verify-engine-version ]
23 ECHO "Boost.Build" [ boost-build ] ;
28 rule verify-engine-version ( )
30 local v = [ modules.peek : JAM_VERSION ] ;
32 if $(v[1]) != $(.major) || $(v[2]) != $(.minor)
34 local argv = [ modules.peek : ARGV ] ;
35 local e = $(argv[1]) ;
36 local l = [ modules.binding version ] ;
39 ECHO "warning: mismatched versions of Boost.Build engine and core" ;
40 ECHO "warning: Boost.Build engine ($(e)) is $(v:J=.)" ;
41 ECHO "warning: Boost.Build core (at $(l)) is" [ boost-build ] ;
50 # Utility rule for testing whether all elements in a sequence are equal to 0.
52 local rule is-all-zeroes ( sequence * )
54 local result = "true" ;
55 for local e in $(sequence)
66 # Returns "true" if the first version is less than the second one.
68 rule version-less ( lhs + : rhs + )
70 numbers.check $(lhs) ;
71 numbers.check $(rhs) ;
76 while ! $(done) && $(lhs) && $(rhs)
78 if [ numbers.less $(lhs[1]) $(rhs[1]) ]
83 else if [ numbers.less $(rhs[1]) $(lhs[1]) ]
93 if ( ! $(done) && ! $(lhs) && ! [ is-all-zeroes $(rhs) ] )
102 # Returns "true" if the current JAM version version is at least the given
105 rule check-jam-version ( version + )
107 local version-tag = $(version:J=.) ;
111 errors.error Invalid version specifier: : $(version:E="(undefined)") ;
114 if ! $(.jam-version-check.$(version-tag))-is-defined
116 local jam-version = [ modules.peek : JAM_VERSION ] ;
120 errors.error "Unable to deduce Boost Jam version. Your Boost Jam"
121 "installation is most likely terribly outdated." ;
123 .jam-version-check.$(version-tag) = "true" ;
124 if [ version-less [ modules.peek : JAM_VERSION ] : $(version) ]
126 .jam-version-check.$(version-tag) = "" ;
129 return $(.jam-version-check.$(version-tag)) ;
137 local jam-version = [ modules.peek : JAM_VERSION ] ;
138 local future-version = $(jam-version) ;
139 future-version += "1" ;
141 assert.true check-jam-version $(jam-version) ;
142 assert.false check-jam-version $(future-version) ;
144 assert.true version-less 0 : 1 ;
145 assert.false version-less 0 : 0 ;
146 assert.true version-less 1 : 2 ;
147 assert.false version-less 1 : 1 ;
148 assert.false version-less 2 : 1 ;
149 assert.true version-less 3 1 20 : 3 4 10 ;
150 assert.false version-less 3 1 10 : 3 1 10 ;
151 assert.false version-less 3 4 10 : 3 1 20 ;
152 assert.true version-less 3 1 20 5 1 : 3 4 10 ;
153 assert.false version-less 3 1 10 5 1 : 3 1 10 ;
154 assert.false version-less 3 4 10 5 1 : 3 1 20 ;
155 assert.true version-less 3 1 20 : 3 4 10 5 1 ;
156 assert.true version-less 3 1 10 : 3 1 10 5 1 ;
157 assert.false version-less 3 4 10 : 3 1 20 5 1 ;
158 assert.false version-less 3 1 10 : 3 1 10 0 0 ;
159 assert.false version-less 3 1 10 0 0 : 3 1 10 ;
160 assert.false version-less 3 1 10 0 : 3 1 10 0 0 ;
161 assert.false version-less 3 1 10 0 : 03 1 10 0 0 ;
162 assert.false version-less 03 1 10 0 : 3 1 10 0 0 ;
164 # TODO: Add tests for invalid input data being sent to version-less.