function_body -- gives the body of a user-defined function.
Returns
The function definition in Lisp syntax if the function is user-defined, else nil.
Description
This function shows the body of a user-defined function in Lisp syntax.
Example
Gamma> function g(a,b,c) {(a * b)/c;}
(defun g (a b c) (/ (* a b) c))
Gamma> function_body(g);
#0=((/ (* a b) c))
Gamma> function h(r,s) {sin(r)/cos(s) * tan(s);}
(defun h (r s) (* (/ (sin r) (cos s)) (tan s)))
Gamma> function_body(h);
#0=((* (/ (sin r) (cos s)) (tan s)))
Gamma> function_body(sort);
nil
Gamma>
Copyright 1995-2002 by
Cogent Real-Time Systems, Inc.