diff options
| author | Pavel Janík | 2001-10-20 15:11:10 +0000 |
|---|---|---|
| committer | Pavel Janík | 2001-10-20 15:11:10 +0000 |
| commit | 39f624fabd6ffe3f79aa6b66588b48af368494be (patch) | |
| tree | 40afd4f9f179c8f5636796bbc9159ff735270110 /src/bytecode.c | |
| parent | 54800acbf3ed5419cc813ca50ddd2c13816bc7f9 (diff) | |
| download | emacs-39f624fabd6ffe3f79aa6b66588b48af368494be.tar.gz emacs-39f624fabd6ffe3f79aa6b66588b48af368494be.zip | |
Change doc-string comments to `new style' [w/`doc:' keyword].
Diffstat (limited to 'src/bytecode.c')
| -rw-r--r-- | src/bytecode.c | 32 |
1 files changed, 16 insertions, 16 deletions
diff --git a/src/bytecode.c b/src/bytecode.c index f8ecc4f64c0..c356eb3a262 100644 --- a/src/bytecode.c +++ b/src/bytecode.c | |||
| @@ -412,12 +412,12 @@ unmark_byte_stack () | |||
| 412 | 412 | ||
| 413 | 413 | ||
| 414 | DEFUN ("byte-code", Fbyte_code, Sbyte_code, 3, 3, 0, | 414 | DEFUN ("byte-code", Fbyte_code, Sbyte_code, 3, 3, 0, |
| 415 | "Function used internally in byte-compiled code.\n\ | 415 | doc: /* Function used internally in byte-compiled code. |
| 416 | The first argument, BYTESTR, is a string of byte code;\n\ | 416 | The first argument, BYTESTR, is a string of byte code; |
| 417 | the second, VECTOR, a vector of constants;\n\ | 417 | the second, VECTOR, a vector of constants; |
| 418 | the third, MAXDEPTH, the maximum stack depth used in this function.\n\ | 418 | the third, MAXDEPTH, the maximum stack depth used in this function. |
| 419 | If the third argument is incorrect, Emacs may crash.") | 419 | If the third argument is incorrect, Emacs may crash. */) |
| 420 | (bytestr, vector, maxdepth) | 420 | (bytestr, vector, maxdepth) |
| 421 | Lisp_Object bytestr, vector, maxdepth; | 421 | Lisp_Object bytestr, vector, maxdepth; |
| 422 | { | 422 | { |
| 423 | int count = specpdl_ptr - specpdl; | 423 | int count = specpdl_ptr - specpdl; |
| @@ -1746,18 +1746,18 @@ syms_of_bytecode () | |||
| 1746 | #ifdef BYTE_CODE_METER | 1746 | #ifdef BYTE_CODE_METER |
| 1747 | 1747 | ||
| 1748 | DEFVAR_LISP ("byte-code-meter", &Vbyte_code_meter, | 1748 | DEFVAR_LISP ("byte-code-meter", &Vbyte_code_meter, |
| 1749 | "A vector of vectors which holds a histogram of byte-code usage.\n\ | 1749 | doc: /* A vector of vectors which holds a histogram of byte-code usage. |
| 1750 | \(aref (aref byte-code-meter 0) CODE) indicates how many times the byte\n\ | 1750 | \(aref (aref byte-code-meter 0) CODE) indicates how many times the byte |
| 1751 | opcode CODE has been executed.\n\ | 1751 | opcode CODE has been executed. |
| 1752 | \(aref (aref byte-code-meter CODE1) CODE2), where CODE1 is not 0,\n\ | 1752 | \(aref (aref byte-code-meter CODE1) CODE2), where CODE1 is not 0, |
| 1753 | indicates how many times the byte opcodes CODE1 and CODE2 have been\n\ | 1753 | indicates how many times the byte opcodes CODE1 and CODE2 have been |
| 1754 | executed in succession."); | 1754 | executed in succession. */); |
| 1755 | 1755 | ||
| 1756 | DEFVAR_BOOL ("byte-metering-on", &byte_metering_on, | 1756 | DEFVAR_BOOL ("byte-metering-on", &byte_metering_on, |
| 1757 | "If non-nil, keep profiling information on byte code usage.\n\ | 1757 | doc: /* If non-nil, keep profiling information on byte code usage. |
| 1758 | The variable byte-code-meter indicates how often each byte opcode is used.\n\ | 1758 | The variable byte-code-meter indicates how often each byte opcode is used. |
| 1759 | If a symbol has a property named `byte-code-meter' whose value is an\n\ | 1759 | If a symbol has a property named `byte-code-meter' whose value is an |
| 1760 | integer, it is incremented each time that symbol's function is called."); | 1760 | integer, it is incremented each time that symbol's function is called. */); |
| 1761 | 1761 | ||
| 1762 | byte_metering_on = 0; | 1762 | byte_metering_on = 0; |
| 1763 | Vbyte_code_meter = Fmake_vector (make_number (256), make_number (0)); | 1763 | Vbyte_code_meter = Fmake_vector (make_number (256), make_number (0)); |