comparison lisp/emacs-lisp/bytecomp.el @ 22578:f330ab785b83

(byte-compile-generate-call-tree): Use `other' widget type.
author Andreas Schwab <schwab@suse.de>
date Wed, 24 Jun 1998 09:02:58 +0000
parents 745759e4e099
children 2d69ba7d76f4
comparison
equal deleted inserted replaced
22577:c129b4c40a0c 22578:f330ab785b83
7 ;; Maintainer: FSF 7 ;; Maintainer: FSF
8 ;; Keywords: lisp 8 ;; Keywords: lisp
9 9
10 ;;; This version incorporates changes up to version 2.10 of the 10 ;;; This version incorporates changes up to version 2.10 of the
11 ;;; Zawinski-Furuseth compiler. 11 ;;; Zawinski-Furuseth compiler.
12 (defconst byte-compile-version "$Revision: 2.45 $") 12 (defconst byte-compile-version "$Revision: 2.46 $")
13 13
14 ;; This file is part of GNU Emacs. 14 ;; This file is part of GNU Emacs.
15 15
16 ;; GNU Emacs is free software; you can redistribute it and/or modify 16 ;; GNU Emacs is free software; you can redistribute it and/or modify
17 ;; it under the terms of the GNU General Public License as published by 17 ;; it under the terms of the GNU General Public License as published by
356 The call tree also lists those functions which are not known to be called 356 The call tree also lists those functions which are not known to be called
357 \(that is, to which no calls have been compiled). Functions which can be 357 \(that is, to which no calls have been compiled). Functions which can be
358 invoked interactively are excluded from this list." 358 invoked interactively are excluded from this list."
359 :group 'bytecomp 359 :group 'bytecomp
360 :type '(choice (const :tag "Yes" t) (const :tag "No" nil) 360 :type '(choice (const :tag "Yes" t) (const :tag "No" nil)
361 (const :tag "Ask" lambda))) 361 (other :tag "Ask" lambda)))
362 362
363 (defconst byte-compile-call-tree nil "Alist of functions and their call tree. 363 (defconst byte-compile-call-tree nil "Alist of functions and their call tree.
364 Each element looks like 364 Each element looks like
365 365
366 \(FUNCTION CALLERS CALLS\) 366 \(FUNCTION CALLERS CALLS\)