io.files: 'directory?' uses file-info
parent
080628af9f
commit
21d52749a2
|
@ -94,7 +94,9 @@ SYMBOL: +unknown+
|
|||
|
||||
: exists? ( path -- ? ) file-modified >boolean ;
|
||||
|
||||
: directory? ( path -- ? ) stat 3drop ;
|
||||
! : directory? ( path -- ? ) stat 3drop ;
|
||||
|
||||
: directory? ( path -- ? ) file-info file-info-type +directory+ = ;
|
||||
|
||||
! Current working directory
|
||||
HOOK: cd io-backend ( path -- )
|
||||
|
|
Loading…
Reference in New Issue