From c18a8d2d43f22ccf0b21461b1f0d3395d4e50c1f Mon Sep 17 00:00:00 2001
From: Karen Arutyunov <karen@codesynthesis.com>
Date: Mon, 24 Jul 2017 14:45:54 +0300
Subject: Change dir_path/string concatenation semantics

---
 tests/value/buildfile   |  2 +-
 tests/value/concat.test | 73 +++++++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 74 insertions(+), 1 deletion(-)
 create mode 100644 tests/value/concat.test

(limited to 'tests/value')

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
+}
-- 
cgit v1.1