From f29876bba06c24d6fe543941ad6f683c61910555 Mon Sep 17 00:00:00 2001 From: Jerry DeLisle Date: Tue, 11 Apr 2017 14:51:25 +0000 Subject: close.c: Fix white space in pointer declarations and comment formats where applicable. 2017-04-11 Jerry DeLisle * close.c: Fix white space in pointer declarations and comment formats where applicable. * fbuf.c: Likewise. * fbuf.h: Likewise. * format.c: Likewise. * inquire.c: Likewise. * intrinsics.c: Likewise. * list_read.c: Likewise. * lock.c: Likewise. * open.c: Likewise. * read.c: Likewise. * transfer.c: Likewise. * unit.c: Likewise. * unix.c: Likewise. * unix.h: Likewise. * write.c: Likewise. From-SVN: r246842 --- libgfortran/io/fbuf.c | 26 +++++++++++++------------- 1 file changed, 13 insertions(+), 13 deletions(-) (limited to 'libgfortran/io/fbuf.c') diff --git a/libgfortran/io/fbuf.c b/libgfortran/io/fbuf.c index 931558c..944469d 100644 --- a/libgfortran/io/fbuf.c +++ b/libgfortran/io/fbuf.c @@ -33,7 +33,7 @@ see the files COPYING3 and COPYING.RUNTIME respectively. If not, see void -fbuf_init (gfc_unit * u, int len) +fbuf_init (gfc_unit *u, int len) { if (len == 0) len = 512; /* Default size. */ @@ -46,7 +46,7 @@ fbuf_init (gfc_unit * u, int len) void -fbuf_destroy (gfc_unit * u) +fbuf_destroy (gfc_unit *u) { if (u->fbuf == NULL) return; @@ -58,7 +58,7 @@ fbuf_destroy (gfc_unit * u) static void #ifdef FBUF_DEBUG -fbuf_debug (gfc_unit * u, const char * format, ...) +fbuf_debug (gfc_unit *u, const char *format, ...) { va_list args; va_start(args, format); @@ -73,8 +73,8 @@ fbuf_debug (gfc_unit * u, const char * format, ...) fprintf (stderr, "''\n"); } #else -fbuf_debug (gfc_unit * u __attribute__ ((unused)), - const char * format __attribute__ ((unused)), +fbuf_debug (gfc_unit *u __attribute__ ((unused)), + const char *format __attribute__ ((unused)), ...) {} #endif @@ -85,7 +85,7 @@ fbuf_debug (gfc_unit * u __attribute__ ((unused)), modified. */ int -fbuf_reset (gfc_unit * u) +fbuf_reset (gfc_unit *u) { int seekval = 0; @@ -111,7 +111,7 @@ fbuf_reset (gfc_unit * u) reallocating if necessary. */ char * -fbuf_alloc (gfc_unit * u, int len) +fbuf_alloc (gfc_unit *u, int len) { int newlen; char *dest; @@ -119,7 +119,7 @@ fbuf_alloc (gfc_unit * u, int len) if (u->fbuf->pos + len > u->fbuf->len) { /* Round up to nearest multiple of the current buffer length. */ - newlen = ((u->fbuf->pos + len) / u->fbuf->len + 1) * u->fbuf->len; + newlen = ((u->fbuf->pos + len) / u->fbuf->len + 1) *u->fbuf->len; u->fbuf->buf = xrealloc (u->fbuf->buf, newlen); u->fbuf->len = newlen; } @@ -136,7 +136,7 @@ fbuf_alloc (gfc_unit * u, int len) mode. Return value is 0 for success, -1 on failure. */ int -fbuf_flush (gfc_unit * u, unit_mode mode) +fbuf_flush (gfc_unit *u, unit_mode mode) { int nwritten; @@ -175,7 +175,7 @@ fbuf_flush (gfc_unit * u, unit_mode mode) Return value is 0 for success, -1 on failure. */ int -fbuf_flush_list (gfc_unit * u, unit_mode mode) +fbuf_flush_list (gfc_unit *u, unit_mode mode) { int nwritten; @@ -207,7 +207,7 @@ fbuf_flush_list (gfc_unit * u, unit_mode mode) int -fbuf_seek (gfc_unit * u, int off, int whence) +fbuf_seek (gfc_unit *u, int off, int whence) { if (!u->fbuf) return -1; @@ -248,7 +248,7 @@ fbuf_seek (gfc_unit * u, int off, int whence) of bytes actually processed. */ char * -fbuf_read (gfc_unit * u, int * len) +fbuf_read (gfc_unit *u, int *len) { char *ptr; int oldact, oldpos; @@ -279,7 +279,7 @@ fbuf_read (gfc_unit * u, int * len) reading. Never call this function directly. */ int -fbuf_getc_refill (gfc_unit * u) +fbuf_getc_refill (gfc_unit *u) { int nread; char *p; -- cgit v1.1