comparison lisp/simple.el @ 33352:bd48e8729dbb

(byte-compiling-files-p): New function.
author Gerd Moellmann <gerd@gnu.org>
date Thu, 09 Nov 2000 23:01:40 +0000
parents 1e1d6d077288
children 8fc77111dd98
comparison
equal deleted inserted replaced
33351:6d19f06da8a4 33352:bd48e8729dbb
3964 specifying the syntax when calling `modify-syntax-entry'. CODE is the 3964 specifying the syntax when calling `modify-syntax-entry'. CODE is the
3965 corresponing syntax code as it is stored in a syntax cell, and 3965 corresponing syntax code as it is stored in a syntax cell, and
3966 can be used as value of a `syntax-table' property. 3966 can be used as value of a `syntax-table' property.
3967 DESCRIPTION is the descriptive string for the syntax.") 3967 DESCRIPTION is the descriptive string for the syntax.")
3968 3968
3969
3970 ;;; Misc
3971
3972 (defun byte-compiling-files-p ()
3973 "Return t if currently byte-compiling files."
3974 (and (boundp 'byte-compile-current-file)
3975 (stringp byte-compile-current-file)))
3976
3969 ;;; simple.el ends here 3977 ;;; simple.el ends here