Rebol Programming/title-of

USAGE: edit

TITLE-OF value 

DESCRIPTION: edit

Returns a copy of the title of a function.

TITLE-OF is a function value.

ARGUMENTS edit

  • value -- (Type: any)

SOURCE CODE edit

title-of: func [
    "Returns a copy of the title of a function." 
    value
][
    case [
        object? :value [cause-error 'script 'invalid-arg 'title] 
        any-function? :value [if string? value: pick third :value 1 [copy value]] 
        'else [cause-error 'script 'cannot-use reduce ['reflect type? :value]]
    ]
]