Lines Matching refs:var
387 (defvar byte-compile-not-obsolete-var nil
2848 (defun byte-compile-variable-ref (base-op var)
2849 (when (symbolp var)
2850 (byte-compile-set-symbol-position var))
2851 (if (or (not (symbolp var))
2852 (byte-compile-const-symbol-p var (not (eq base-op 'byte-varref))))
2857 (if (symbolp var) "constant" "nonvariable")
2858 (prin1-to-string var))
2859 (if (and (get var 'byte-obsolete-variable)
2861 (not (eq var byte-compile-not-obsolete-var)))
2862 (let* ((ob (get var 'byte-obsolete-variable))
2864 (byte-compile-warn "`%s' is an obsolete variable%s; %s" var
2871 (push var byte-compile-bound-variables)
2872 (or (boundp var)
2873 (memq var byte-compile-bound-variables)
2875 (or (memq var byte-compile-free-assignments)
2877 (byte-compile-warn "assignment to free variable `%s'" var)
2878 (push var byte-compile-free-assignments)))
2879 (or (memq var byte-compile-free-references)
2881 (byte-compile-warn "reference to free variable `%s'" var)
2882 (push var byte-compile-free-references))))))))
2883 (let ((tmp (assq var byte-compile-variables)))
2885 (setq tmp (list var))
3609 (dolist (var varlist)
3610 (if (consp var)
3611 (byte-compile-form (car (cdr var)))
3615 (dolist (var varlist)
3616 (byte-compile-variable-ref 'byte-varbind (if (consp var) (car var) var)))
3623 (dolist (var varlist)
3624 (if (atom var)
3626 (byte-compile-form (car (cdr var)))
3627 (setq var (car var)))
3628 (byte-compile-variable-ref 'byte-varbind var))
3687 (let* ((var (nth 1 form))
3689 (if var (cons var byte-compile-bound-variables)
3692 (unless (symbolp var)
3694 "`%s' is not a variable-name or nil (in condition-case)" var))
3695 (byte-compile-push-constant var)
3805 (var (nth 1 form))
3819 (push var byte-compile-bound-variables)
3821 (push var byte-compile-const-variables)))
3827 `(push ',var current-load-list))
3831 fun var string))
3832 `(put ',var 'variable-documentation ,string))
3834 (let ((byte-compile-not-obsolete-var var))
3836 ;; `defconst' sets `var' unconditionally.
3837 (let ((tmp (make-symbol "defconst-tmp-var")))
3838 `(funcall '(lambda (,tmp) (defconst ,var ,tmp))
3840 ;; `defvar' sets `var' only when unbound.
3841 `(if (not (default-boundp ',var)) (setq-default ,var ,value))))
3845 `',var))))