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
92d3ab7e
Commit
92d3ab7e
authored
Nov 14, 2010
by
Dan Nicolaescu
Browse files
* src/data.c (sign_extend_temp, sign_extend_lisp_int): Remove, unused.
parent
3a7a03ad
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
4 additions
and
15 deletions
+4
-15
src/ChangeLog
src/ChangeLog
+4
-0
src/data.c
src/data.c
+0
-15
No files found.
src/ChangeLog
View file @
92d3ab7e
2010-11-15 Dan Nicolaescu <dann@ics.uci.edu>
* data.c (sign_extend_temp, sign_extend_lisp_int): Remove, unused.
2010-11-14 Chong Yidong <cyd@stupidchicken.com>
* w32fns.c (Fx_create_frame):
...
...
src/data.c
View file @
92d3ab7e
...
...
@@ -135,21 +135,6 @@ args_out_of_range_3 (Lisp_Object a1, Lisp_Object a2, Lisp_Object a3)
xsignal3
(
Qargs_out_of_range
,
a1
,
a2
,
a3
);
}
/* On some machines, XINT needs a temporary location.
Here it is, in case it is needed. */
int
sign_extend_temp
;
/* On a few machines, XINT can only be done by calling this. */
int
sign_extend_lisp_int
(
EMACS_INT
num
)
{
if
(
num
&
(((
EMACS_INT
)
1
)
<<
(
VALBITS
-
1
)))
return
num
|
(((
EMACS_INT
)
(
-
1
))
<<
VALBITS
);
else
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