diff options
Diffstat (limited to 'gdb/p-lang.c')
-rw-r--r-- | gdb/p-lang.c | 28 |
1 files changed, 7 insertions, 21 deletions
diff --git a/gdb/p-lang.c b/gdb/p-lang.c index db33eb787b7..57ee5b88444 100644 --- a/gdb/p-lang.c +++ b/gdb/p-lang.c @@ -36,10 +36,7 @@ static void pascal_one_char (int, struct ui_file *, int *); In_quotes is reset to 0 if a char is written with #4 notation */ static void -pascal_one_char (c, stream, in_quotes) - register int c; - struct ui_file *stream; - int *in_quotes; +pascal_one_char (register int c, struct ui_file *stream, int *in_quotes) { c &= 0xFF; /* Avoid sign bit follies */ @@ -72,10 +69,7 @@ static void pascal_emit_char (int c, struct ui_file *stream, int quoter); characters and strings is language specific. */ static void -pascal_emit_char (c, stream, quoter) - register int c; - struct ui_file *stream; - int quoter; +pascal_emit_char (register int c, struct ui_file *stream, int quoter) { int in_quotes = 0; pascal_one_char (c, stream, &in_quotes); @@ -84,9 +78,7 @@ pascal_emit_char (c, stream, quoter) } void -pascal_printchar (c, stream) - int c; - struct ui_file *stream; +pascal_printchar (int c, struct ui_file *stream) { int in_quotes = 0; pascal_one_char (c, stream, &in_quotes); @@ -100,12 +92,8 @@ pascal_printchar (c, stream) had to stop before printing LENGTH characters, or if FORCE_ELLIPSES. */ void -pascal_printstr (stream, string, length, width, force_ellipses) - struct ui_file *stream; - char *string; - unsigned int length; - int width; - int force_ellipses; +pascal_printstr (struct ui_file *stream, char *string, unsigned int length, + int width, int force_ellipses) { register unsigned int i; unsigned int things_printed = 0; @@ -222,9 +210,7 @@ pascal_printstr (stream, string, length, width, force_ellipses) struct type * -pascal_create_fundamental_type (objfile, typeid) - struct objfile *objfile; - int typeid; +pascal_create_fundamental_type (struct objfile *objfile, int typeid) { register struct type *type = NULL; @@ -424,7 +410,7 @@ const struct language_defn pascal_language_defn = }; void -_initialize_pascal_language () +_initialize_pascal_language (void) { add_language (&pascal_language_defn); } |