Rebol Programming/body-of

= USAGE: = BODY-OF value

= DESCRIPTION: = Returns a copy of the body of a function or object.

BODY-OF is a function value. = ARGUMENTS =
 * value -- (Type: any)

= SOURCE CODE = body-of: func [ {Returns a copy of the body of a function or object.} value ][   case [ object? :value [third :value] function? :value [copy/deep second :value] any-function? :value [none] 'else [cause-error 'script 'cannot-use reduce ['reflect type? :value]] ] ]