diff options
author | Boris Kolpackov <boris@codesynthesis.com> | 2016-12-01 12:07:18 +0200 |
---|---|---|
committer | Boris Kolpackov <boris@codesynthesis.com> | 2016-12-01 12:07:18 +0200 |
commit | 0ed86c76239d4f2904ea4ae1a77902a9e0db2a6d (patch) | |
tree | 5e8e1d43a0140f5739b21be7cbe120ebb9360d4f /old-tests/variable/dir-path/buildfile | |
parent | 12fc75188cc1f0a8c4c443c04e7a022131198c36 (diff) |
Move old tests to old-tests/
Diffstat (limited to 'old-tests/variable/dir-path/buildfile')
-rw-r--r-- | old-tests/variable/dir-path/buildfile | 45 |
1 files changed, 45 insertions, 0 deletions
diff --git a/old-tests/variable/dir-path/buildfile b/old-tests/variable/dir-path/buildfile new file mode 100644 index 0000000..5c99f07 --- /dev/null +++ b/old-tests/variable/dir-path/buildfile @@ -0,0 +1,45 @@ +# Untyped dir path reversability. +# +x = s/foo/bar/ +print -e=$x +print -e $x + +y = $x +print -e=$y +print -e $y +print + +# Typed dir path reversability and expansion. +# +x = [dir_path] foo/bar/ +print -I$x +print -I$x/baz +print -I $x +print [strings] -I $x +print -I $x/baz +print + +y = $x # No longer typed but still not original. +print -I$y +print -I$y/baz +print -I $y +print [strings] -I $y +print -I $y/baz +print + +z = [strings] $x # Re-typed. +print $z +print + +# The root case. +# +r = [dir_path] / +print $r/foo + +r += foo +print [strings] $r + +r += bar +print [strings] $r + +./: |