Rebol Programming/what

= USAGE: = WHAT

= DESCRIPTION: = Prints a list of globally-defined functions.

WHAT is a function value. = SOURCE CODE = 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 ]