Rebol 编程/更多
外观
< Rebol 编程
MORE 'file
打印文件(shell 快捷方式函数)。
MORE 是一个函数值。
- file -- 接受 %file、:variables 和仅单词(作为文件名)(类型:file word path string paren)
- 捕获
more: func [
"Print file (shell shortcut function)."
[catch]
'file [file! word! path! string! paren!] {Accepts %file, :variables and just words (as file names)}
][
if paren? :file [set/any 'file do :file]
print read switch/default type?/word get/any 'file [
file! [file]
string! [to-rebol-file file]
word! path! [to-file file]
] [throw-error 'script 'expect-arg reduce ['more 'file type? get/any 'file]]
]