불행하게도 정말 what
함수에서 반환 값이 없다.
대신에, 당신이 할 수있는 것은 반환 what
source what
의 소스 보는 것입니다 :
what: func [
"Prints a list of globally-defined functions."
/local vals args here total
][
total: copy []
vals: second system/words
foreach word first system/words [
if any-function? first vals [
args: first first vals
if here: find args /local [args: copy/part args here]
append total reduce [word mold args]
]
vals: next vals
]
foreach [word args] sort/skip total 2 [print [word args]]
exit
]
이는 값을 반환하지 않습니다 (이 기능은 인쇄 것을보기 그것 찾기) 원하는대로 스크립트를 수정할 수 있습니다 :
new-what: func [
"Returns a list of globally-defined functions."
/local vals args here total collected
][
collected: copy []
total: copy []
vals: second system/words
foreach word first system/words [
if any-function? first vals [
args: first first vals
if here: find args /local [args: copy/part args here]
append total reduce [word mold args]
]
vals: next vals
]
foreach [word args] sort/skip total 2 [append collected reduce [word tab args newline]]
write %filename.txt collected
exit
]
이 기능은 다음과 같습니다. 약간 hackish (파일 이름이 설정되어 있지만 원하는 것을 반환합니다). 파일 이름을 수락하거나 원하는대로 수행하도록 함수를 확장 할 수 있습니다. tab
및 newline
은 파일 출력을 더 예쁘게 만듭니다.
중요 사항이에서주의 사항 :
- 인쇄 기능을 한 번에 파일에 값을 기록합니다
write %filename value
을 무엇을 알아 해제
- 사용
source
반환합니다. 파일이 open
인 경우 더 많은 시간을 쓸 수 있습니다.