diff options
| author | jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-11-10 17:08:24 +0000 |
|---|---|---|
| committer | jb <jb@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-11-10 17:08:24 +0000 |
| commit | 15aefa66eea98ad9cfdf9860acb004c18055d46f (patch) | |
| tree | 52a5786807d13e349cc9d6257d66fd9d3c9e3366 /libgfortran/io/write.c | |
| parent | c449f851c5fc2e2e46b98d8a22bde7571a9cedc6 (diff) | |
Let the compiler decide whether to inline.
2011-11-10 Janne Blomqvist <jb@gcc.gnu.org>
* intrinsics/cpu_time.c (__cpu_time_1): Don't force inlining.
* intrinsics/random.c (rnumber_4): Remove inline attribute.
(rnumber_8, rnumber_10, rnumber_16): Likewise.
* intrinsics/system_clock.c (gf_gettime_mono): Likewise.
* intrinsics/time_1.h (ATTRIBUTE_ALWAYS_INLINE): Remove macro.
(gf_cputime): Add inline attribute for MingW version.
* io/format.c (format_hash): Remove inline attribute.
* io/io.h (memset4): Inline function from transfer.c and write.c
moved here.
* io/transfer.c (min_off): Remove inline attribute.
(memset4): Move to io.h.
* io/write.c (memset4): Likewise.
(memcpy4): Remove inline attribute.
* io/write_float.def (calculate_exp): Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181260 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/io/write.c')
| -rw-r--r-- | libgfortran/io/write.c | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/libgfortran/io/write.c b/libgfortran/io/write.c index 95eec84edcb8..8be3a5a72bf5 100644 --- a/libgfortran/io/write.c +++ b/libgfortran/io/write.c @@ -41,15 +41,7 @@ typedef unsigned char uchar; /* Helper functions for character(kind=4) internal units. These are needed by write_float.def. */ -static inline void -memset4 (gfc_char4_t *p, gfc_char4_t c, int k) -{ - int j; - for (j = 0; j < k; j++) - *p++ = c; -} - -static inline void +static void memcpy4 (gfc_char4_t *dest, const char *source, int k) { int j; |