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
6e5fd493
Commit
6e5fd493
authored
Sep 11, 2014
by
Dmitry Antipov
Browse files
* lisp.h (make_local_string): Nitpick indent.
* print.c (Fprin1_to_string): Remove unused GCPROs.
parent
b3ed13e8
Changes
3
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
7 additions
and
5 deletions
+7
-5
src/ChangeLog
src/ChangeLog
+5
-0
src/lisp.h
src/lisp.h
+2
-2
src/print.c
src/print.c
+0
-3
No files found.
src/ChangeLog
View file @
6e5fd493
2014-09-11 Dmitry Antipov <dmantipov@yandex.ru>
* lisp.h (make_local_string): Nitpick indent.
* print.c (Fprin1_to_string): Remove unused GCPROs.
2014-09-11 Paul Eggert <eggert@cs.ucla.edu>
Pacify --enable-gcc-warnings when no window system is used.
...
...
src/lisp.h
View file @
6e5fd493
...
...
@@ -4594,8 +4594,8 @@ verify (sizeof (struct Lisp_Cons) == sizeof (union Aligned_Cons));
Lisp_Object string_; \
if (nbytes_ <= MAX_ALLOCA - sizeof (struct Lisp_String) - 1) \
{ \
struct Lisp_String *ptr_
= alloca (sizeof (struct Lisp_String) + 1
\
+ nbytes_);
\
struct Lisp_String *ptr_
\
= alloca (sizeof (struct Lisp_String) + 1
+ nbytes_); \
string_ = local_string_init (ptr_, data_, nbytes_); \
} \
else \
...
...
src/print.c
View file @
6e5fd493
...
...
@@ -583,7 +583,6 @@ A printed representation of an object is text which describes that object. */)
{
Lisp_Object
printcharfun
;
bool
prev_abort_on_gc
;
/* struct gcpro gcpro1, gcpro2; */
Lisp_Object
save_deactivate_mark
;
ptrdiff_t
count
=
SPECPDL_INDEX
();
struct
buffer
*
previous
;
...
...
@@ -597,7 +596,6 @@ A printed representation of an object is text which describes that object. */)
but we don't want to deactivate the mark just for that.
No need for specbind, since errors deactivate the mark. */
save_deactivate_mark
=
Vdeactivate_mark
;
/* GCPRO2 (object, save_deactivate_mark); */
prev_abort_on_gc
=
abort_on_gc
;
abort_on_gc
=
1
;
...
...
@@ -621,7 +619,6 @@ A printed representation of an object is text which describes that object. */)
set_buffer_internal
(
previous
);
Vdeactivate_mark
=
save_deactivate_mark
;
/* UNGCPRO; */
abort_on_gc
=
prev_abort_on_gc
;
return
unbind_to
(
count
,
object
);
...
...
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