io.pathnames: update windows path word \char:
parent
ae15ed674e
commit
ed43639994
|
@ -221,7 +221,7 @@ HOOK: canonicalize-path-full io-backend ( path -- path' )
|
||||||
|
|
||||||
M: object canonicalize-path-full canonicalize-path canonicalize-drive ;
|
M: object canonicalize-path-full canonicalize-path canonicalize-drive ;
|
||||||
|
|
||||||
: >windows-path ( path -- path' ) H{ { CHAR: / CHAR: \\ } } substitute ;
|
: >windows-path ( path -- path' ) H{ { char: / char: \\ } } substitute ;
|
||||||
|
|
||||||
TUPLE: pathname string ;
|
TUPLE: pathname string ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue