X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=pym.el;h=c895ef24e9947f22fbd897c76c26fb05383fc065;hb=6e972cf6c7ba473c4a83d9caaaa25e2aa31e9c7c;hp=b8d45ada1b1d721563b8bcfa52067f30de14a08c;hpb=10e12214b24c13b8c8699b0ae63403ff38c5b80d;p=elisp%2Fapel.git

diff --git a/pym.el b/pym.el
index b8d45ad..c895ef2 100644
--- a/pym.el
+++ b/pym.el
@@ -27,12 +27,15 @@
 
 ;; This module provides `def*-maybe' macros for conditional definition.
 ;;
-;; Many APEL modules use these macros to provide emulation version of
-;; Emacs builtins (both C primitives and lisp subroutines) for backward
-;; compatibility.  While compilation time, if `def*-maybe' find that
-;; functions/variables being defined is already provided by Emacs used
-;; for compilation, it does not leave the definitions in compiled code
-;; and resulting .elc will be highly specialized for your environment.
+;; Many APEL modules use these macros to provide the emulating version
+;; of the Emacs builtins (both C primitives and lisp subroutines) for
+;; backward compatibility.  While compilation time, if `def*-maybe'
+;; find that functions/variables being defined is already provided by
+;; Emacs used for compilation, it does not leave the definitions in
+;; compiled code and resulting .elc files will be highly specialized
+;; for your environment.  Lisp programmers should be aware that these
+;; macros will never provide functions or variables at run-time if they
+;; are defined for some reason (or by accident) at compilation time.
 
 ;; For `find-function' lovers, the following definitions may work with
 ;; `def*-maybe'.
@@ -268,13 +271,12 @@ Both SYMBOL and SPEC are unevaluated. The SPEC can be 0, t, a symbol
 	   &rest (&rest sexp)))
 
 ;; edebug-spec for `static-*' macros are also defined here.
-;; XXX: not defined yet.  FIXME!
-;; (def-edebug-spec static-if ...)
-;; (def-edebug-spec static-when ...)
-;; (def-edebug-spec static-unless ...)
-;; (def-edebug-spec static-condition-case ...)
-;; (def-edebug-spec static-defconst ...)
-;; (def-edebug-spec static-cond ...)
+(def-edebug-spec static-if t) 
+(def-edebug-spec static-when when)
+(def-edebug-spec static-unless unless)
+(def-edebug-spec static-condition-case condition-case)
+(def-edebug-spec static-defconst defconst)
+(def-edebug-spec static-cond cond)
 
 
 ;;; for backward compatibility.