1539 |
(or (and (symbolp object) (fboundp object) |
(or (and (symbolp object) (fboundp object) |
1540 |
(setq object (indirect-function object)) |
(setq object (indirect-function object)) |
1541 |
(eq (car-safe object) 'autoload) |
(eq (car-safe object) 'autoload) |
1542 |
(not (car-safe (cdr-safe (cdr-safe (cdr-safe (cdr object))))))) |
(not (car-safe (cdr-safe (cdr-safe (cdr-safe (cdr-safe object))))))) |
1543 |
(subrp object) (byte-code-function-p object) |
(subrp object) (byte-code-function-p object) |
1544 |
(eq (car-safe object) 'lambda))) |
(eq (car-safe object) 'lambda))) |
1545 |
|
|