io.backend: remove unused normalize-directory word.
parent
180bb32e86
commit
5abccb1391
|
@ -21,12 +21,8 @@ HOOK: init-stdio io-backend ( -- )
|
||||||
|
|
||||||
HOOK: io-multiplex io-backend ( nanos -- )
|
HOOK: io-multiplex io-backend ( nanos -- )
|
||||||
|
|
||||||
HOOK: normalize-directory io-backend ( path -- path' )
|
|
||||||
|
|
||||||
HOOK: normalize-path io-backend ( path -- path' )
|
HOOK: normalize-path io-backend ( path -- path' )
|
||||||
|
|
||||||
M: object normalize-directory normalize-path ;
|
|
||||||
|
|
||||||
: set-io-backend ( io-backend -- )
|
: set-io-backend ( io-backend -- )
|
||||||
io-backend set-global init-io init-stdio
|
io-backend set-global init-io init-stdio
|
||||||
"io.files" startup-hooks get at call( -- ) ;
|
"io.files" startup-hooks get at call( -- ) ;
|
||||||
|
|
Loading…
Reference in New Issue