;;; python-mode.el --- Major mode for editing Python programs ;; Copyright (C) 1992,1993,1994  Tim Peters ;; Author: 1995-2002 Barry A. Warsaw;;         1992-1994 Tim Peters;; Maintainer: python-mode@python.org;; Created:    Feb 1992;; Keywords:   python languages oop (defconst py-version "$Revision: 34960 $"  "`python-mode' version number.") ;; This software is provided as-is, without express or implied;; warranty.  Permission to use, copy, modify, distribute or sell this;; software, without fee, for any purpose and by any individual or;; organization, is hereby granted, provided that the above copyright;; notice and this paragraph appear in all copies. ;;; Commentary: ;; This is a major mode for editing Python programs.  It was developed;; by Tim Peters after an original idea by Michael A. Guravage.  Tim;; subsequently left the net; in 1995, Barry Warsaw inherited the mode;; and is the current maintainer.  Tim's now back but disavows all;; responsibility for the mode.  Smart Tim :-) ;; pdbtrack support contributed by Ken Manheimer, April 2001. ;; Please use the SourceForge Python project to submit bugs or;; patches:;;;;     http://sourceforge.net/projects/python ;; FOR MORE INFORMATION: ;; There is some information on python-mode.el at ;;     http://www.python.org/emacs/python-mode/;;;; It does contain links to other packages that you might find useful,;; such as pdb interfaces, OO-Browser links, etc. ;; BUG REPORTING: ;; As mentioned above, please use the SourceForge Python project for;; submitting bug reports or patches.  The old recommendation, to use;; C-c C-b will still work, but those reports have a higher chance of;; getting buried in my mailbox.  Please include a complete, but;; concise code sample and a recipe for reproducing the bug.  Send;; suggestions and other comments to python-mode@python.org. ;; When in a Python mode buffer, do a C-h m for more help.  It's;; doubtful that a texinfo manual would be very useful, but if you;; want to contribute one, I'll certainly accept it! ;;; Code: (require 'comint)(require 'custom)(require 'cl)(require 'compile) ;; user definable variables;; vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvv (defgroup python nil  "Support for the Python programming language, <http://www.python.org/>"  :group 'languages  :prefix "py-") (defcustom py-python-command "python"  "*Shell command used to start Python interpreter."  :type 'string  :group 'python) (defcustom py-jpython-command "jpython"  "*Shell command used to start the JPython interpreter."  :type 'string  :group 'python  :tag "JPython Command") (defcustom py-default-interpreter 'cpython  "*Which Python interpreter is used by default.The value for this variable can be either `cpython' or `jpython'. When the value is `cpython', the variables `py-python-command' and`py-python-command-args' are consulted to determine the interpreterand arguments to use. When the value is `jpython', the variables `py-jpython-command' and`py-jpython-command-args' are consulted to determine the interpreterand arguments to use. Note that this variable is consulted only the first time that a Pythonmode buffer is visited during an Emacs session.  After that, use\\[py-toggle-shells] to change the interpreter shell."  :type '(choice (const :tag "Python (a.k.a. CPython)" cpython)		 (const :tag "JPython" jpython))  :group 'python) (defcustom py-python-command-args '("-i")  "*List of string arguments to be used when starting a Python shell."  :type '(repeat string)  :group 'python) (defcustom py-jpython-command-args '("-i")  "*List of string arguments to be used when starting a JPython shell."  :type '(repeat string)  :group 'python  :tag "JPython Command Args") (defcustom py-indent-offset 4  "*Amount of offset per level of indentation.`\\[py-guess-indent-offset]' can usually guess a good value whenyou're editing someone else's Python code."  :type 'integer  :group 'python) (defcustom py-continuation-offset 4  "*Additional amount of offset to give for some continuation lines.Continuation lines are those that immediately follow a backslashterminated line.  Only those continuation lines for a block openingstatement are given this extra offset."  :type 'integer  :group 'python) (defcustom py-smart-indentation t  "*Should `python-mode' try to automagically set some indentation variables?When this variable is non-nil, two things happen when a buffer is setto `python-mode':     1. `py-indent-offset' is guessed from existing code in the buffer.       Only guessed values between 2 and 8 are considered.  If a valid       guess can't be made (perhaps because you are visiting a new       file), then the value in `py-indent-offset' is used.     2. `indent-tabs-mode' is turned off if `py-indent-offset' does not       equal `tab-width' (`indent-tabs-mode' is never turned on by       Python mode).  This means that for newly written code, tabs are       only inserted in indentation if one tab is one indentation       level, otherwise only spaces are used. Note that both these settings occur *after* `python-mode-hook' is run,so if you want to defeat the automagic configuration, you must alsoset `py-smart-indentation' to nil in your `python-mode-hook'."  :type 'boolean  :group 'python) (defcustom py-align-multiline-strings-p t  "*Flag describing how multi-line triple quoted strings are aligned.When this flag is non-nil, continuation lines are lined up under thepreceding line's indentation.  When this flag is nil, continuationlines are aligned to column zero."  :type '(choice (const :tag "Align under preceding line" t)		 (const :tag "Align to column zero" nil))  :group 'python) (defcustom py-block-comment-prefix "##"  "*String used by \\[comment-region] to comment out a block of code.This should follow the convention for non-indenting comment lines sothat the indentation commands won't get confused (i.e., the stringshould be of the form `#x...' where `x' is not a blank or a tab, and`...' is arbitrary).  However, this string should not end in whitespace."  :type 'string  :group 'python) (defcustom py-honor-comment-indentation t  "*Controls how comment lines influence subsequent indentation. When nil, all comment lines are skipped for indentation purposes, andif possible, a faster algorithm is used (i.e. X/Emacs 19 and beyond). When t, lines that begin with a single `#' are a hint to subsequentline indentation.  If the previous line is such a comment line (asopposed to one that starts with `py-block-comment-prefix'), then itsindentation is used as a hint for this line's indentation.  Lines thatbegin with `py-block-comment-prefix' are ignored for indentationpurposes. When not nil or t, comment lines that begin with a single `#' are usedas indentation hints, unless the comment character is in column zero."  :type '(choice	  (const :tag "Skip all comment lines (fast)" nil)	  (const :tag "Single # `sets' indentation for next line" t)	  (const :tag "Single # `sets' indentation except at column zero"		 other)	  )  :group 'python) (defcustom py-temp-directory  (let ((ok '(lambda (x)	       (and x		    (setq x (expand-file-name x)) ; always true		    (file-directory-p x)		    (file-writable-p x)		    x))))    (or (funcall ok (getenv "TMPDIR"))	(funcall ok "/usr/tmp")	(funcall ok "/tmp")	(funcall ok "/var/tmp")	(funcall ok  ".")	(error	 "Couldn't find a usable temp directory -- set `py-temp-directory'")))  "*Directory used for temporary files created by a *Python* process.By default, the first directory from this list that exists and that youcan write into: the value (if any) of the environment variable TMPDIR,/usr/tmp, /tmp, /var/tmp, or the current directory."  :type 'string  :group 'python) (defcustom py-beep-if-tab-change t  "*Ring the bell if `tab-width' is changed.If a comment of the form   \t# vi:set tabsize=<number>: is found before the first code line when the file is entered, and thecurrent value of (the general Emacs variable) `tab-width' does notequal <number>, `tab-width' is set to <number>, a message saying so isdisplayed in the echo area, and if `py-beep-if-tab-change' is non-nilthe Emacs bell is also rung as a warning."  :type 'boolean  :group 'python) (defcustom py-jump-on-exception t  "*Jump to innermost exception frame in *Python Output* buffer.When this variable is non-nil and an exception occurs when runningPython code synchronously in a subprocess, jump immediately to thesource code of the innermost traceback frame."  :type 'boolean  :group 'python) (defcustom py-ask-about-save t  "If not nil, ask about which buffers to save before executing some code.Otherwise, all modified buffers are saved without asking."  :type 'boolean  :group 'python) (defcustom py-backspace-function 'backward-delete-char-untabify  "*Function called by `py-electric-backspace' when deleting backwards."  :type 'function  :group 'python) (defcustom py-delete-function 'delete-char  "*Function called by `py-electric-delete' when deleting forwards."  :type 'function  :group 'python) (defcustom py-imenu-show-method-args-p nil   "*Controls echoing of arguments of functions & methods in the Imenu buffer.When non-nil, arguments are printed."  :type 'boolean  :group 'python)(make-variable-buffer-local 'py-indent-offset) (defcustom py-pdbtrack-do-tracking-p t  "*Controls whether the pdbtrack feature is enabled or not.When non-nil, pdbtrack is enabled in all comint-based buffers,e.g. shell buffers and the *Python* buffer.  When using pdb to debug aPython program, pdbtrack notices the pdb prompt and displays thesource file and line that the program is stopped at, much the same wayas gud-mode does for debugging C programs with gdb."  :type 'boolean  :group 'python)(make-variable-buffer-local 'py-pdbtrack-do-tracking-p) (defcustom py-pdbtrack-minor-mode-string " PDB"  "*String to use in the minor mode list when pdbtrack is enabled."  :type 'string  :group 'python) (defcustom py-import-check-point-max  20000  "Maximum number of characters to search for a Java-ish import statement.When `python-mode' tries to calculate the shell to use (either aCPython or a JPython shell), it looks at the so-called `shebang' line-- i.e. #! line.  If that's not available, it looks at some of thefile heading imports to see if they look Java-like."  :type 'integer  :group 'python  ) (defcustom py-jpython-packages  '("java" "javax" "org" "com")  "Imported packages that imply `jpython-mode'."  :type '(repeat string)  :group 'python)  ;; Not customizable(defvar py-master-file nil  "If non-nil, execute the named file instead of the buffer's file.The intent is to allow you to set this variable in the file's localvariable section, e.g.:     # Local Variables:    # py-master-file: \"master.py\"    # End: so that typing \\[py-execute-buffer] in that buffer executes the namedmaster file instead of the buffer's file.  If the file name has arelative path, the value of variable `default-directory' for thebuffer is prepended to come up with a file name.")(make-variable-buffer-local 'py-master-file) (defcustom py-pychecker-command "pychecker"  "*Shell command used to run Pychecker."  :type 'string  :group 'python  :tag "Pychecker Command") (defcustom py-pychecker-command-args '("--stdlib")  "*List of string arguments to be passed to pychecker."  :type '(repeat string)  :group 'python  :tag "Pychecker Command Args") (defvar py-shell-alist  '(("jpython" . 'jpython)    ("jython" . 'jpython)    ("python" . 'cpython))  "*Alist of interpreters and python shells. Used by `py-choose-shell'to select the appropriate python interpreter mode for a file.") ;; ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^;; NO USER DEFINABLE VARIABLES BEYOND THIS POINT (defconst py-emacs-features  (let (features)   features)  "A list of features extant in the Emacs you are using.There are many flavors of Emacs out there, with different levels ofsupport for features needed by `python-mode'.") ;; Face for None, True, False, self, and Ellipsis(defvar py-pseudo-keyword-face 'py-pseudo-keyword-face  "Face for pseudo keywords in Python mode, like self, True, False, Ellipsis.")(make-face 'py-pseudo-keyword-face) (defun py-font-lock-mode-hook ()  (or (face-differs-from-default-p 'py-pseudo-keyword-face)      (copy-face 'font-lock-keyword-face 'py-pseudo-keyword-face)))(add-hook 'font-lock-mode-hook 'py-font-lock-mode-hook) (defvar python-font-lock-keywords  (let ((kw1 (mapconcat 'identity			'("and"      "assert"   "break"   "class"			  "continue" "def"      "del"     "elif"			  "else"     "except"   "exec"    "for"			  "from"     "global"   "if"      "import"			  "in"       "is"       "lambda"  "not"			  "or"       "pass"     "print"   "raise"			  "return"   "while"    "yield"			  )			"\\|"))	(kw2 (mapconcat 'identity			'("else:" "except:" "finally:" "try:")			"\\|"))	(kw3 (mapconcat 'identity			'("ArithmeticError" "AssertionError"			  "AttributeError" "DeprecationWarning" "EOFError"			  "Ellipsis" "EnvironmentError" "Exception" "False"			  "FloatingPointError" "FutureWarning" "IOError"			  "ImportError" "IndentationError" "IndexError"			  "KeyError" "KeyboardInterrupt" "LookupError"			  "MemoryError" "NameError" "None" "NotImplemented"			  "NotImplementedError" "OSError" "OverflowError"			  "OverflowWarning" "PendingDeprecationWarning"			  "ReferenceError" "RuntimeError" "RuntimeWarning"			  "StandardError" "StopIteration" "SyntaxError"			  "SyntaxWarning" "SystemError" "SystemExit"			  "TabError" "True" "TypeError" "UnboundLocalError"			  "UnicodeDecodeError" "UnicodeEncodeError"			  "UnicodeError" "UnicodeTranslateError"			  "UserWarning" "ValueError" "Warning"			  "ZeroDivisionError" "__debug__"			  "__import__" "__name__" "abs" "apply" "basestring"			  "bool" "buffer" "callable" "chr" "classmethod"			  "cmp" "coerce" "compile" "complex" "copyright"			  "delattr" "dict" "dir" "divmod"			  "enumerate" "eval" "execfile" "exit" "file"			  "filter" "float" "getattr" "globals" "hasattr"			  "hash" "hex" "id" "input" "int" "intern"			  "isinstance" "issubclass" "iter" "len" "license"			  "list" "locals" "long" "map" "max" "min" "object"			  "oct" "open" "ord" "pow" "property" "range"			  "raw_input" "reduce" "reload" "repr" "round"			  "setattr" "slice" "staticmethod" "str" "sum"			  "super" "tuple" "type" "unichr" "unicode" "vars"			  "xrange" "zip")			"\\|"))	)    (list     ;; keywords     (cons (concat "\\b\\(" kw1 "\\)\\b[ \n\t(]") 1)     ;; builtins when they don't appear as object attributes     (cons (concat "\\(\\b\\|[.]\\)\\(" kw3 "\\)\\b[ \n\t(]") 2)     ;; block introducing keywords with immediately following colons.     ;; Yes "except" is in both lists.     (cons (concat "\\b\\(" kw2 "\\)[ \n\t(]") 1)     ;; `as' but only in "import foo as bar"     '("[ \t]*\\(\\bfrom\\b.*\\)?\\bimport\\b.*\\b\\(as\\)\\b" . 2)     ;; classes     '("\\bclass[ \t]+\\([a-zA-Z_]+[a-zA-Z0-9_]*\\)"       1 font-lock-type-face)     ;; functions     '("\\bdef[ \t]+\\([a-zA-Z_]+[a-zA-Z0-9_]*\\)"       1 font-lock-function-name-face)     ;; pseudo-keywords     '("\\b\\(self\\|None\\|True\\|False\\|Ellipsis\\)\\b"       1 py-pseudo-keyword-face)     ))  "Additional expressions to highlight in Python mode.")(put 'python-mode 'font-lock-defaults '(python-font-lock-keywords)) ;; have to bind py-file-queue before installing the kill-emacs-hook(defvar py-file-queue nil  "Queue of Python temp files awaiting execution.Currently-active file is at the head of the list.") (defvar py-pdbtrack-is-tracking-p nil)(defvar py-pdbtrack-last-grubbed-buffer nil  "Record of the last buffer used when the source path was invalid. This buffer is consulted before the buffer-list history for satisfying`py-pdbtrack-grub-for-buffer', since it's the most often the likelyprospect as debugging continues.")(make-variable-buffer-local 'py-pdbtrack-last-grubbed-buffer)(defvar py-pychecker-history nil)  ;; Constants (defconst py-stringlit-re  (concat   ;; These fail if backslash-quote ends the string (not worth   ;; fixing?).  They precede the short versions so that the first two   ;; quotes don't look like an empty short string.   ;;   ;; (maybe raw), long single quoted triple quoted strings (SQTQ),   ;; with potential embedded single quotes   "[rR]?'''[^']*\\(\\('[^']\\|''[^']\\)[^']*\\)*'''"   "\\|"   ;; (maybe raw), long double quoted triple quoted strings (DQTQ),   ;; with potential embedded double quotes   "[rR]?\"\"\"[^\"]*\\(\\(\"[^\"]\\|\"\"[^\"]\\)[^\"]*\\)*\"\"\""   "\\|"   "[rR]?'\\([^'\n\\]\\|\\\\.\\)*'"	; single-quoted   "\\|"				; or   "[rR]?\"\\([^\"\n\\]\\|\\\\.\\)*\""	; double-quoted   )  "Regular expression matching a Python string literal.") (defconst py-continued-re  ;; This is tricky because a trailing backslash does not mean  ;; continuation if it's in a comment  (concat   "\\(" "[^#'\"\n\\]" "\\|" py-stringlit-re "\\)*"   "\\\\$")  "Regular expression matching Python backslash continuation lines.")  (defconst py-blank-or-comment-re "[ \t]*\\($\\|#\\)"  "Regular expression matching a blank or comment line.") (defconst py-outdent-re  (concat "\\(" (mapconcat 'identity			   '("else:"			     "except\\(\\s +.*\\)?:"			     "finally:"			     "elif\\s +.*:")			   "\\|")	  "\\)")  "Regular expression matching statements to be dedented one level.")  (defconst py-block-closing-keywords-re  "\\(return\\|raise\\|break\\|continue\\|pass\\)"  "Regular expression matching keywords which typically close a block.") (defconst py-no-outdent-re  (concat   "\\("   (mapconcat 'identity	      (list "try:"		    "except\\(\\s +.*\\)?:"		    "while\\s +.*:"		    "for\\s +.*:"		    "if\\s +.*:"		    "elif\\s +.*:"		    (concat py-block-closing-keywords-re "[ \t\n]")		    )	      "\\|")	  "\\)")  "Regular expression matching lines not to dedent after.") (defconst py-defun-start-re  "^\\([ \t]*\\)def[ \t]+\\([a-zA-Z_0-9]+\\)\\|\\(^[a-zA-Z_0-9]+\\)[ \t]*="  ;; If you change this, you probably have to change py-current-defun

Lines 1–500 of 3768. Load more