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
566684ea
Commit
566684ea
authored
Jun 14, 2011
by
Paul Eggert
Browse files
* fns.c (Fload_average): Don't assume 100 * load average fits in int.
parent
de41a810
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
4 additions
and
2 deletions
+4
-2
src/ChangeLog
src/ChangeLog
+2
-0
src/fns.c
src/fns.c
+2
-2
No files found.
src/ChangeLog
View file @
566684ea
2011-06-14 Paul Eggert <eggert@cs.ucla.edu>
* fns.c (Fload_average): Don't assume 100 * load average fits in int.
* fns.c: Don't overflow int when computing a list length.
* fns.c (QUIT_COUNT_HEURISTIC): New constant.
(Flength, Fsafe_length): Use EMACS_INT, not int, to avoid unwanted
...
...
src/fns.c
View file @
566684ea
...
...
@@ -2542,8 +2542,8 @@ advisable. */)
while
(
loads
--
>
0
)
{
Lisp_Object
load
=
(
NILP
(
use_floats
)
?
make_number
((
int
)
(
100
.
0
*
load_ave
[
loads
])
)
Lisp_Object
load
=
(
NILP
(
use_floats
)
?
make_number
(
100
.
0
*
load_ave
[
loads
])
:
make_float
(
load_ave
[
loads
]));
ret
=
Fcons
(
load
,
ret
);
}
...
...
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