diff options
Diffstat (limited to 'src/interp/pathname.boot')
| -rw-r--r-- | src/interp/pathname.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/pathname.boot b/src/interp/pathname.boot index fa30d4dc..c1b9d868 100644 --- a/src/interp/pathname.boot +++ b/src/interp/pathname.boot @@ -71,7 +71,7 @@ pathnameTypeId p == pathnameDirectory p == null p => nil - NAMESTRING MAKE_-PATHNAME(KEYWORD::DIRECTORY,PATHNAME_-DIRECTORY pathname p) + NAMESTRING MAKE_-PATHNAME(directory <- PATHNAME_-DIRECTORY pathname p) isExistingFile f == -- p := pathname f |