ref: 7ec5af48e7c7fa40c494b5572fcfa04d3a998cba
dir: /lib/std/test/pathjoin.myr/
use std const main = { /* untouched */ norm("foo", "foo") norm("foo/bar", "foo/bar") norm("/foo/bar", "/foo/bar") norm(".", ".") /* empty path becomes "." */ norm("", ".") /* delete //, trailing / */ norm("foo/", "foo") norm("foo//bar/baz", "foo/bar/baz") norm("//foo//bar/", "/foo/bar") /* delete '.' */ norm("foo/./bar", "foo/bar") norm("/foo/bar/.", "/foo/bar") norm("./foo/bar/.", "foo/bar") /* elide '..' */ norm("/../foo/bar", "/foo/bar") norm("../../foo/bar", "../../foo/bar") norm("foo/bar/..", "foo") norm("foo/bar/../..", ".") norm("foo/../bar/../..", "..") norm("/foo/../bar/../..", "/") /* mix all of the above */ norm("./", ".") norm("/../foo//bar", "/foo/bar") norm("..//../foo/bar", "../../foo/bar") norm("foo//./bar/..", "foo") norm("foo/bar/.././..", ".") norm("//foo/../bar/../..", "/") norm("foo/../bar/../..", "..") /* vanilla pathjoin */ eq(std.pathcat("a", "b"), "a/b") eq(std.pathjoin(["a", "b", "c"][:]), "a/b/c") /* pathjoin with empty dirs */ eq(std.pathcat("", "foo"), "foo") eq(std.pathjoin(["", "foo", "bar"][:]), "foo/bar") } const norm = {a, b var p p = std.pathnorm(a) if !std.sleq(p, b) std.fatal("mismatched paths: '{}' => '{}' != '{}'\n", a, p, b) ;; std.slfree(p) } const eq = {a, b if !std.sleq(a, b) std.fatal("mismatched paths: '{}' != '{}'\n", a, b) ;; }