summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2010-07-05 09:29:35 -0700
committerDan Nicolaescu <dann@ics.uci.edu>2010-07-05 09:29:35 -0700
commitd2aa42f8be4756cf4efc96b975bb6db9c0bdff94 (patch)
tree6d899bc468ac6031b5aec1f4528344a495a67f26 /src
parentd3da34e0dab1404e80dba5413b3c449a6ea8fa0c (diff)
Convert function definitions and declarations to standard C.
* src/vm-limit.c (memory_warnings): * src/keyboard.c (modify_event_symbol): * src/floatfns.c (rounding_driver, ceiling2, floor2, truncate2) (round2, emacs_rint): * src/process.c (send_process, old_sigpipe): Convert function definitions and declarations to standard C.
Diffstat (limited to 'src')
-rw-r--r--src/ChangeLog10
-rw-r--r--src/floatfns.c29
-rw-r--r--src/keyboard.c5
-rw-r--r--src/process.c6
-rw-r--r--src/vm-limit.c2
5 files changed, 26 insertions, 26 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 5c8db880e6a..7071c62b491 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,13 @@
2010-07-05 Dan Nicolaescu <dann@ics.uci.edu>
- Juanma Barranquero <lekktu@gmail.com>
+
+ * vm-limit.c (memory_warnings):
+ * keyboard.c (modify_event_symbol):
+ * floatfns.c (rounding_driver, ceiling2, floor2, truncate2)
+ (round2, emacs_rint):
+ * process.c (send_process, old_sigpipe): Convert function
+ definitions and declarations to standard C.
+
+2010-07-05 Juanma Barranquero <lekktu@gmail.com>
* buffer.c, cm.c, eval.c, keyboard.c, process.c, term.c, vm-limit.c,
* xdisp.c: Convert function definitions to standard C.
diff --git a/src/floatfns.c b/src/floatfns.c
index af82df0bf5d..96a89337c75 100644
--- a/src/floatfns.c
+++ b/src/floatfns.c
@@ -70,7 +70,7 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
/* This declaration is omitted on some systems, like Ultrix. */
#if !defined (HPUX) && defined (HAVE_LOGB) && !defined (logb)
-extern double logb ();
+extern double logb (double);
#endif /* not HPUX and HAVE_LOGB and no logb macro */
#if defined(DOMAIN) && defined(SING) && defined(OVERFLOW)
@@ -778,11 +778,10 @@ This is the same as the exponent of a float. */)
/* the rounding functions */
static Lisp_Object
-rounding_driver (arg, divisor, double_round, int_round2, name)
- register Lisp_Object arg, divisor;
- double (*double_round) ();
- EMACS_INT (*int_round2) ();
- char *name;
+rounding_driver (Lisp_Object arg, Lisp_Object divisor,
+ double (*double_round) (double),
+ EMACS_INT (*int_round2) (EMACS_INT, EMACS_INT),
+ char *name)
{
CHECK_NUMBER_OR_FLOAT (arg);
@@ -832,8 +831,7 @@ rounding_driver (arg, divisor, double_round, int_round2, name)
integer functions. */
static EMACS_INT
-ceiling2 (i1, i2)
- EMACS_INT i1, i2;
+ceiling2 (EMACS_INT i1, EMACS_INT i2)
{
return (i2 < 0
? (i1 < 0 ? ((-1 - i1) / -i2) + 1 : - (i1 / -i2))
@@ -841,8 +839,7 @@ ceiling2 (i1, i2)
}
static EMACS_INT
-floor2 (i1, i2)
- EMACS_INT i1, i2;
+floor2 (EMACS_INT i1, EMACS_INT i2)
{
return (i2 < 0
? (i1 <= 0 ? -i1 / -i2 : -1 - ((i1 - 1) / -i2))
@@ -850,8 +847,7 @@ floor2 (i1, i2)
}
static EMACS_INT
-truncate2 (i1, i2)
- EMACS_INT i1, i2;
+truncate2 (EMACS_INT i1, EMACS_INT i2)
{
return (i2 < 0
? (i1 < 0 ? -i1 / -i2 : - (i1 / -i2))
@@ -859,8 +855,7 @@ truncate2 (i1, i2)
}
static EMACS_INT
-round2 (i1, i2)
- EMACS_INT i1, i2;
+round2 (EMACS_INT i1, EMACS_INT i2)
{
/* The C language's division operator gives us one remainder R, but
we want the remainder R1 on the other side of 0 if R1 is closer
@@ -880,16 +875,14 @@ round2 (i1, i2)
#define emacs_rint rint
#else
static double
-emacs_rint (d)
- double d;
+emacs_rint (double d)
{
return floor (d + 0.5);
}
#endif
static double
-double_identity (d)
- double d;
+double_identity (double d)
{
return d;
}
diff --git a/src/keyboard.c b/src/keyboard.c
index 069ff4993d9..001ae9f7cef 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -528,8 +528,6 @@ EMACS_TIME timer_check (int do_it_now);
extern Lisp_Object Vhistory_length, Vtranslation_table_for_input;
-extern char *x_get_keysym_name ();
-
static void record_menu_key (Lisp_Object c);
static int echo_length (void);
@@ -611,7 +609,7 @@ Lisp_Object Venable_disabled_menus_and_buttons;
#define READABLE_EVENTS_IGNORE_SQUEEZABLES (1 << 2)
/* Function for init_keyboard to call with no args (if nonzero). */
-void (*keyboard_init_hook) ();
+void (*keyboard_init_hook) (void);
static int read_avail_input (int);
static void get_input_pending (int *, int);
@@ -6583,6 +6581,7 @@ modify_event_symbol (int symbol_num, unsigned int modifiers, Lisp_Object symbol_
#ifdef HAVE_WINDOW_SYSTEM
if (NILP (value))
{
+ extern char *x_get_keysym_name (KeySym keysym);
char *name = x_get_keysym_name (symbol_num);
if (name)
value = intern (name);
diff --git a/src/process.c b/src/process.c
index 313663e5d42..75bc59a30ab 100644
--- a/src/process.c
+++ b/src/process.c
@@ -182,7 +182,7 @@ Lisp_Object Quser, Qgroup, Qetime, Qpcpu, Qpmem, Qtime, Qctime;
#include "syswait.h"
-extern char *get_operating_system_release ();
+extern char *get_operating_system_release (void);
/* Serial processes require termios or Windows. */
#if defined (HAVE_TERMIOS) || defined (WINDOWSNT)
@@ -5606,7 +5606,7 @@ send_process (volatile Lisp_Object proc, unsigned char *volatile buf,
int rv;
struct coding_system *coding;
struct gcpro gcpro1;
- SIGTYPE (*volatile old_sigpipe) ();
+ SIGTYPE (*volatile old_sigpipe) (int);
GCPRO1 (object);
@@ -5719,7 +5719,7 @@ send_process (volatile Lisp_Object proc, unsigned char *volatile buf,
while (this > 0)
{
int outfd = p->outfd;
- old_sigpipe = (SIGTYPE (*) ()) signal (SIGPIPE, send_process_trap);
+ old_sigpipe = (SIGTYPE (*) (int)) signal (SIGPIPE, send_process_trap);
#ifdef DATAGRAM_SOCKETS
if (DATAGRAM_CHAN_P (outfd))
{
diff --git a/src/vm-limit.c b/src/vm-limit.c
index 25f42d9904f..00b041d8ef8 100644
--- a/src/vm-limit.c
+++ b/src/vm-limit.c
@@ -251,7 +251,7 @@ check_memory_limits (void)
void
memory_warnings (POINTER start, void (*warnfun) (char *))
{
- extern void (* __after_morecore_hook) (); /* From gmalloc.c */
+ extern void (* __after_morecore_hook) (void); /* From gmalloc.c */
if (start)
data_space_start = start;