aboutsummaryrefslogtreecommitdiff
path: root/tests/value/reverse.test
diff options
context:
space:
mode:
Diffstat (limited to 'tests/value/reverse.test')
-rw-r--r--tests/value/reverse.test82
1 files changed, 0 insertions, 82 deletions
diff --git a/tests/value/reverse.test b/tests/value/reverse.test
deleted file mode 100644
index 9ea9d09..0000000
--- a/tests/value/reverse.test
+++ /dev/null
@@ -1,82 +0,0 @@
-# file : tests/value/reverse.test
-# copyright : Copyright (c) 2014-2018 Code Synthesis Ltd
-# license : MIT; see accompanying LICENSE file
-
-# Test reversal to canonical/original representation.
-#
-
-.include ../common.test
-
-: 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
- }
-}