diff options
Diffstat (limited to 'tests/name')
-rw-r--r-- | tests/name/extension.testscript | 2 | ||||
-rw-r--r-- | tests/name/pattern.testscript | 35 |
2 files changed, 33 insertions, 4 deletions
diff --git a/tests/name/extension.testscript b/tests/name/extension.testscript index 1583109..6a542fe 100644 --- a/tests/name/extension.testscript +++ b/tests/name/extension.testscript @@ -131,7 +131,7 @@ EOI EOI f.oo - txt{f.oo.} + EOO : default-extension diff --git a/tests/name/pattern.testscript b/tests/name/pattern.testscript index 91fb98d..c1a4ce4 100644 --- a/tests/name/pattern.testscript +++ b/tests/name/pattern.testscript @@ -18,6 +18,35 @@ pat = '*' print "$(pat).txt" EOI +: typed-concat +: +{ + : dir-path + : + touch foo.txt; + $* <'print {$src_base/*.txt}' >/~'%.+/foo\.txt%' + + : path + : + touch foo.txt; + $* <<EOI >/~'%.+/foo\.txt%' + p = [path] $src_base + print {$p/*.txt} + EOI + + : string + : + touch foo.txt; + $* <<EOI >~'%.+/\*\.txt%' + p = [string] "$src_base" + print {$p/*.txt} + EOI + + : not-pattern + : + $* <'print {$src_base/foo.txt}' >/~'%.+/foo\.txt%' +} + : detect : : Test pattern_mode parsing logic. @@ -332,13 +361,13 @@ EOI : { mkdir dir; - $* <'print $d' 'd=*/' >/'dir/' : dir + $* <'print $p.d' 'p.d=*/' >/'dir/' : dir mkdir dir; - $* <'print $d' 'd=dir{*}' >/'dir{dir/}' : dir-type + $* <'print $p.d' 'p.d=dir{*}' >/'dir{dir/}' : dir-type touch foo.txt; - $* <'print $f' 'f=*.txt' >'foo.txt' : feil + $* <'print $p.f' 'p.f=*.txt' >'foo.txt' : feil } : buildspec |