Mercurial > emacs
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 |