aboutsummaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorKaren Arutyunov <karen@codesynthesis.com>2017-07-24 14:45:54 +0300
committerKaren Arutyunov <karen@codesynthesis.com>2017-07-24 14:45:54 +0300
commitc18a8d2d43f22ccf0b21461b1f0d3395d4e50c1f (patch)
treec0fc2219e14bab2dea2052a13718efd12f7c34f3 /tests
parent9728b252c5ec85b924811f9c12df596d4e1c474e (diff)
Change dir_path/string concatenation semantics
Diffstat (limited to 'tests')
-rw-r--r--tests/value/buildfile2
-rw-r--r--tests/value/concat.test73
2 files changed, 74 insertions, 1 deletions
diff --git a/tests/value/buildfile b/tests/value/buildfile
index ce246a4..ac45282 100644
--- a/tests/value/buildfile
+++ b/tests/value/buildfile
@@ -2,4 +2,4 @@
# copyright : Copyright (c) 2014-2017 Code Synthesis Ltd
# license : MIT; see accompanying LICENSE file
-./: test{*}
+./: test{*} $b
diff --git a/tests/value/concat.test b/tests/value/concat.test
new file mode 100644
index 0000000..8cf6e38
--- /dev/null
+++ b/tests/value/concat.test
@@ -0,0 +1,73 @@
+# file : tests/value/concat.test
+# copyright : Copyright (c) 2014-2017 Code Synthesis Ltd
+# license : MIT; see accompanying LICENSE file
+
+.include ../common.test
+
+: dir_path
+:
+{
+ : name
+ :
+ $* <<EOI >>/EOO
+ d = [dir_path] foo
+ f = bar
+ print $d/$f
+ EOI
+ foo/bar
+ EOO
+
+ : string
+ :
+ $* <<EOI >>/EOO
+ d = [dir_path] foo
+ f = [string] bar
+ print $d/$f
+ EOI
+ foo/bar
+ EOO
+
+ : leading-separator
+ :
+ $* <<EOI >>/EOO
+ d = [dir_path] foo
+ f = /bar
+ print $d/$f
+ EOI
+ foo/bar
+ EOO
+
+ : not-separated
+ :
+ $* <<EOI >>/EOO
+ d = [dir_path] foo
+ f = bar
+ print $d$f
+ EOI
+ foo/bar
+ EOO
+}
+
+: path
+:
+{
+ : separated
+ :
+ $* <<EOI >>/EOO
+ d = [path] foo
+ f = bar
+ print $d/$f
+ EOI
+ foo/bar
+ EOO
+
+ : not-separated
+ :
+ $* <<EOI >>/EOO
+ d = [path] foo
+ f = bar
+ print $d$f
+ EOI
+ foobar
+ EOO
+}