From ed436399940768c17ca291b0681a36c52c6d8c20 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Wed, 8 Jan 2020 22:14:53 -0600 Subject: [PATCH] io.pathnames: update windows path word \char: --- core/io/pathnames/pathnames.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/core/io/pathnames/pathnames.factor b/core/io/pathnames/pathnames.factor index f5a9e1f810..e58d19b7b1 100644 --- a/core/io/pathnames/pathnames.factor +++ b/core/io/pathnames/pathnames.factor @@ -221,7 +221,7 @@ HOOK: canonicalize-path-full io-backend ( path -- path' ) 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 ;