Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
f9b4aacf
Commit
f9b4aacf
authored
Jan 05, 1995
by
Roland McGrath
Browse files
Fix typo in last change.
parent
610f41b7
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
4 additions
and
4 deletions
+4
-4
src/callint.c
src/callint.c
+1
-1
src/doc.c
src/doc.c
+2
-2
src/eval.c
src/eval.c
+1
-1
No files found.
src/callint.c
View file @
f9b4aacf
...
...
@@ -229,7 +229,7 @@ Otherwise, this is done only if an arg is read using the minibuffer.")
}
else
if
(
COMPILEDP
(
fun
))
{
if
(
XVECTOR
(
fun
)
->
size
&
PSEUDOVECTOR_SIZE_MASK
<=
COMPILED_INTERACTIVE
)
if
(
(
XVECTOR
(
fun
)
->
size
&
PSEUDOVECTOR_SIZE_MASK
)
<=
COMPILED_INTERACTIVE
)
goto
lose
;
specs
=
XVECTOR
(
fun
)
->
contents
[
COMPILED_INTERACTIVE
];
}
...
...
src/doc.c
View file @
f9b4aacf
...
...
@@ -279,7 +279,7 @@ string is passed through `substitute-command-keys'.")
}
else
if
(
COMPILEDP
(
fun
))
{
if
(
XVECTOR
(
fun
)
->
size
&
PSEUDOVECTOR_SIZE_MASK
<=
COMPILED_DOC_STRING
)
if
(
(
XVECTOR
(
fun
)
->
size
&
PSEUDOVECTOR_SIZE_MASK
)
<=
COMPILED_DOC_STRING
)
return
Qnil
;
tem
=
XVECTOR
(
fun
)
->
contents
[
COMPILED_DOC_STRING
];
if
(
STRINGP
(
tem
))
...
...
@@ -394,7 +394,7 @@ store_function_docstring (fun, offset)
{
/* This bytecode object must have a slot for the
docstring, since we've found a docstring for it. */
if
(
XVECTOR
(
fun
)
->
size
&
PSEUDOVECTOR_SIZE_MASK
>
COMPILED_DOC_STRING
)
if
(
(
XVECTOR
(
fun
)
->
size
&
PSEUDOVECTOR_SIZE_MASK
)
>
COMPILED_DOC_STRING
)
XSETFASTINT
(
XVECTOR
(
fun
)
->
contents
[
COMPILED_DOC_STRING
],
offset
);
}
}
...
...
src/eval.c
View file @
f9b4aacf
...
...
@@ -1392,7 +1392,7 @@ Also, a symbol satisfies `commandp' if its function definition does so.")
have an element whose index is COMPILED_INTERACTIVE, which is
where the interactive spec is stored. */
else if (COMPILEDP (fun))
return (XVECTOR (fun)->size & PSEUDOVECTOR_SIZE_MASK > COMPILED_INTERACTIVE
return
(
(XVECTOR (fun)->size & PSEUDOVECTOR_SIZE_MASK
)
> COMPILED_INTERACTIVE
? Qt : Qnil);
/* Strings and vectors are keyboard macros. */
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment