[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r100713: Fix comments and whitespace.
From: |
Juanma Barranquero |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r100713: Fix comments and whitespace. |
Date: |
Sun, 04 Jul 2010 15:51:05 +0200 |
User-agent: |
Bazaar (2.0.3) |
------------------------------------------------------------
revno: 100713
committer: Juanma Barranquero <address@hidden>
branch nick: trunk
timestamp: Sun 2010-07-04 15:51:05 +0200
message:
Fix comments and whitespace.
modified:
src/data.c
src/doc.c
src/editfns.c
src/keymap.c
src/lread.c
=== modified file 'src/data.c'
--- a/src/data.c 2010-07-04 07:50:25 +0000
+++ b/src/data.c 2010-07-04 13:51:05 +0000
@@ -941,10 +941,6 @@
static void
store_symval_forwarding (union Lisp_Fwd *valcontents, register Lisp_Object
newval, struct buffer *buf)
- /* struct Lisp_Symbol *symbol; */
-
-
-
{
switch (XFWDTYPE (valcontents))
{
=== modified file 'src/doc.c'
--- a/src/doc.c 2010-07-04 07:50:25 +0000
+++ b/src/doc.c 2010-07-04 13:51:05 +0000
@@ -511,9 +511,7 @@
static void
store_function_docstring (Lisp_Object fun, EMACS_INT offset)
-
- /* Use EMACS_INT because we get this from pointer subtraction. */
-
+/* Use EMACS_INT because we get offset from pointer subtraction. */
{
fun = indirect_function (fun);
=== modified file 'src/editfns.c'
--- a/src/editfns.c 2010-07-04 07:50:25 +0000
+++ b/src/editfns.c 2010-07-04 13:51:05 +0000
@@ -1436,7 +1436,7 @@
}
char *
-get_operating_system_release(void)
+get_operating_system_release (void)
{
if (STRINGP (Voperating_system_release))
return (char *) SDATA (Voperating_system_release);
@@ -3592,7 +3592,7 @@
string itself, will not be used. Element NARGS, corresponding to
no argument, *will* be assigned to in the case that a `%' and `.'
occur after the final format specifier. */
- int *precision = (int *) (alloca((nargs + 1) * sizeof (int)));
+ int *precision = (int *) (alloca ((nargs + 1) * sizeof (int)));
int longest_format;
Lisp_Object val;
int arg_intervals = 0;
@@ -3763,7 +3763,7 @@
string will finally appear (Bug#5710). */
actual_width = lisp_string_width (args[n], -1, NULL, NULL);
if (precision[n] != -1)
- actual_width = min(actual_width,precision[n]);
+ actual_width = min (actual_width, precision[n]);
}
/* Would get MPV otherwise, since Lisp_Int's `point' to low memory. */
else if (INTEGERP (args[n]) && *format != 's')
@@ -3876,7 +3876,7 @@
discarded[format - format_start] = 1;
format++;
- while (index("-+0# ", *format))
+ while (index ("-+0# ", *format))
{
if (*format == '-')
{
=== modified file 'src/keymap.c'
--- a/src/keymap.c 2010-07-04 07:50:25 +0000
+++ b/src/keymap.c 2010-07-04 13:51:05 +0000
@@ -2088,9 +2088,7 @@
static void
accessible_keymaps_1 (Lisp_Object key, Lisp_Object cmd, Lisp_Object args, void
*data)
-
- /* Use void* to be compatible with map_keymap_function_t. */
-
+/* Use void* data to be compatible with map_keymap_function_t. */
{
struct accessible_keymaps_data *d = data; /* Cast! */
Lisp_Object maps = d->maps;
=== modified file 'src/lread.c'
--- a/src/lread.c 2010-07-04 07:50:25 +0000
+++ b/src/lread.c 2010-07-04 13:51:05 +0000
@@ -1899,9 +1899,7 @@
calls. */
static Lisp_Object
read_internal_start (Lisp_Object stream, Lisp_Object start, Lisp_Object end)
-
- /* Only used when stream is a string. */
- /* Only used when stream is a string. */
+/* start, end only used when stream is a string. */
{
Lisp_Object retval;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r100713: Fix comments and whitespace.,
Juanma Barranquero <=