From 5007870b52aa549971824959a55ad3bb886f09e0 Mon Sep 17 00:00:00 2001
From: Boris Kolpackov <boris@codesynthesis.com>
Date: Mon, 3 Sep 2018 16:37:32 +0200
Subject: Rename .test/test{} to .testscript/testscript{}

---
 tests/value/reverse.testscript | 82 ++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 82 insertions(+)
 create mode 100644 tests/value/reverse.testscript

(limited to 'tests/value/reverse.testscript')

diff --git a/tests/value/reverse.testscript b/tests/value/reverse.testscript
new file mode 100644
index 0000000..6294d3f
--- /dev/null
+++ b/tests/value/reverse.testscript
@@ -0,0 +1,82 @@
+# file      : tests/value/reverse.testscript
+# copyright : Copyright (c) 2014-2018 Code Synthesis Ltd
+# license   : MIT; see accompanying LICENSE file
+
+# Test reversal to canonical/original representation.
+#
+
+.include ../common.testscript
+
+: name
+:
+{
+  : dir
+  :
+  $* <<EOI >>EOO
+  x = s/foo/bar/
+  print ([string] $x)
+  print "$x"
+  print -e=$x
+  EOI
+  s/foo/bar/
+  s/foo/bar/
+  -e=s/foo/bar/
+  EOO
+
+  : proj
+  :
+  $* <<EOI >>EOO
+  print ([strings] foo%bar foo% %bar)
+  EOI
+  foo%bar foo% %bar
+  EOO
+
+  : pair
+  :
+  $* <<EOI >>EOO
+  print ([strings] foo@bar foo/@bar/ foo@ @bar @ "@@")
+  EOI
+  foo@bar foo/@bar/ foo@ @bar @ @@
+  EOO
+
+  : combined
+  :
+  $* <<EOI >>EOO
+  print ([strings] xx%foo@yy%bar xx%foo/@yy%bar/)
+  EOI
+  xx%foo@yy%bar xx%foo/@yy%bar/
+  EOO
+}
+
+: dir-path
+:
+{
+  : rel
+  :
+  $* <<EOI >>"EOO"
+  x = [dir_path] foo/bar/
+  print ([string] $x)
+  print "$x"
+  print "-I$x"
+  EOI
+  foo/bar/
+  foo/bar
+  -Ifoo/bar
+  EOO
+
+  : root
+  :
+  if ($cxx.target.class != 'windows')
+  {
+    $* <<EOI >>EOO
+    x = [dir_path] /
+    print ([string] $x)
+    print "$x"
+    print "-I$x"
+    EOI
+    /
+    /
+    -I/
+    EOO
+  }
+}
-- 
cgit v1.1