io: minor doc fixes throughout

release
Slava Pestov 2010-09-11 18:21:18 -07:00
parent f3b264522c
commit e5b30b7518
3 changed files with 16 additions and 4 deletions

View File

@ -24,7 +24,18 @@ HELP: file-system-info
{ $values { $values
{ "path" "a pathname string" } { "path" "a pathname string" }
{ "file-system-info" file-system-info } } { "file-system-info" file-system-info } }
{ $description "Returns a platform-specific object describing the file-system that contains the path. The cross-platform slot is " { $slot "free-space" } "." } ; { $description "Returns a platform-specific object describing the file-system that contains the path. The cross-platform slot is " { $slot "free-space" } "." }
{ $examples
{ $unchecked-example
"USING: io.files.info io.pathnames math prettyprint ;"
"IN: scratchpad"
""
": gb ( m -- n ) 30 2^ * ;"
""
"home file-system-info free-space>> 100 gb < ."
"f"
}
} ;
ARTICLE: "io.files.info" "File system meta-data" ARTICLE: "io.files.info" "File system meta-data"
"File meta-data:" "File meta-data:"

View File

@ -44,7 +44,7 @@ HELP: with-mapped-array
{ $values { $values
{ "path" "a pathname string" } { "c-type" c-type } { "quot" quotation } { "path" "a pathname string" } { "c-type" c-type } { "quot" quotation }
} }
{ $description "Memory-maps a file for reading and writing as a mapped-array of the given c-type. The mapped file is disposed of when the quotation returns, or if an error is thrown." } { $description "Memory-maps a file for reading and writing, wrapping it in a specialized array with the given element type. The mapped file is disposed of when the quotation returns, or if an error is thrown." }
{ $examples { $examples
{ $unchecked-example { $unchecked-example
"USING: alien.c-types io.mmap prettyprint specialized-arrays ;" "USING: alien.c-types io.mmap prettyprint specialized-arrays ;"
@ -81,7 +81,7 @@ ARTICLE: "io.mmap.examples" "Memory-mapped file examples"
"" ""
"\"mydata.dat\" char [" "\"mydata.dat\" char ["
" 4 <sliced-groups>" " 4 <sliced-groups>"
" [ reverse! drop ] map! drop" " [ reverse! drop ] each"
"] with-mapped-array" "] with-mapped-array"
} }
"Normalize a file containing packed quadrupes of floats:" "Normalize a file containing packed quadrupes of floats:"

View File

@ -117,8 +117,9 @@ $nl
"An example which watches a directory for changes:" "An example which watches a directory for changes:"
{ $code { $code
"USE: io.monitors" "USE: io.monitors"
""
": watch-loop ( monitor -- )" ": watch-loop ( monitor -- )"
" dup next-change path>> print nl nl flush watch-loop ;" " dup next-change path>> print flush watch-loop ;"
"" ""
": watch-directory ( path -- )" ": watch-directory ( path -- )"
" [ t [ watch-loop ] with-monitor ] with-monitors ;" " [ t [ watch-loop ] with-monitor ] with-monitors ;"