diff options
Diffstat (limited to 'libbuild2/build/script/parser+depdb.test.testscript')
| -rw-r--r-- | libbuild2/build/script/parser+depdb.test.testscript | 49 |
1 files changed, 49 insertions, 0 deletions
diff --git a/libbuild2/build/script/parser+depdb.test.testscript b/libbuild2/build/script/parser+depdb.test.testscript index 38c4236..573ba6d 100644 --- a/libbuild2/build/script/parser+depdb.test.testscript +++ b/libbuild2/build/script/parser+depdb.test.testscript @@ -88,3 +88,52 @@ test.options += -d EOI } } + +: impure-function +: +{ + : var-assignment + : + $* <<EOI 2>>~%EOE% != 0 + v = $getenv('VAR') + EOI + buildfile:11:6: error: call to impure function getenv is only allowed in depdb preamble + % info: .+% + EOE + + : quoted + : + $* <<EOI 2>>~%EOE% != 0 + v = "$getenv('VAR')" + EOI + buildfile:11:7: error: call to impure function getenv is only allowed in depdb preamble + % info: .*% + EOE + + : if-cond + : + $* <<EOI 2>>~%EOE% != 0 + if ($getenv('VAR') == 'yes') + foo + end + EOI + buildfile:11:6: error: call to impure function getenv is only allowed in depdb preamble + % info: .+% + EOE + + : command + : + $* <<EOI 2>>~%EOE% != 0 + $getenv('VAR') + EOI + buildfile:11:2: error: call to impure function getenv is only allowed in depdb preamble + % info: .+% + EOE + + : non-functions + : + { + $* <'$getenv' : var + $* <'$getenv (v ? a : b)' : eval + } +} |