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
a0ed95ea
Commit
a0ed95ea
authored
Sep 17, 1994
by
Richard M. Stallman
Browse files
(sign_extend_lisp_int): Use EMACS_INT.
parent
132b9337
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
4 additions
and
4 deletions
+4
-4
src/data.c
src/data.c
+4
-4
No files found.
src/data.c
View file @
a0ed95ea
...
...
@@ -147,12 +147,12 @@ int sign_extend_temp;
int
sign_extend_lisp_int (num)
int
num
;
EMACS_INT
num;
{
if
(
num
&
(
1
<<
(
VALBITS
-
1
)))
return
num
|
((
-
1
)
<<
VALBITS
);
if (num & (
((EMACS_INT) 1)
<< (VALBITS - 1)))
return num | (
((EMACS_INT)
(-1)
)
<< VALBITS);
else
return
num
&
((
1
<<
VALBITS
)
-
1
);
return num & ((
((EMACS_INT) 1)
<< VALBITS) - 1);
}
/* Data type predicates */
...
...
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