diff options
| author | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-07-13 02:12:08 +0000 |
|---|---|---|
| committer | jvdelisle <jvdelisle@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-07-13 02:12:08 +0000 |
| commit | e0aaacb714856cd3aedd5107e370acfbe0fa4f38 (patch) | |
| tree | 708fe1e3e6e8349ec20c2bbbb436fa48ee645bd2 /libgfortran/io/read.c | |
| parent | 487c959a53968b3e83b2dff6dfccb03dca9db6f6 (diff) | |
| download | gcc-e0aaacb714856cd3aedd5107e370acfbe0fa4f38.tar.gz | |
2010-07-12 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libfortran/37077
* io/read.c: Fix comment.
* io/io.h (is_char4_unit): New macro.
* io/unit.c (get_internal_unit): Call new function open_internal4.
* io/unix.c (mem_alloc_r4): New function. (mem_alloc_w4): New function.
(mem_read4): New function, temporary stub. (mem_write4): New function.
(open_internal4): New function to set stream pointers to use the new
mem functions.
* io/transfer.c (write_block): Use new mem_alloc_w4 to access internal
units of kind=4.
* io/unix.h: Add prototypes for open_internal4, mem_alloc_w4, and
mem_alloc_r4.
* io/write.c (memset4): New helper function. (memcpy4): New helper
function. (write_default_char4): Use new helper functions.
(write_a): Likewise. (write_l): Likewise. (write_boz): Likewise.
(write_decimal): Likewise. (write_x): Likewise.
(write_integer): Likewise.
* io/write_float.def (output_float): Add code blocks to handle internal
unit kind=4 output utilizing gfc_char4_t pointers. (write_infnan): Use
new helper functions. (OUTPUT_FLOAT_FMT_G): Update this macro likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@162123 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'libgfortran/io/read.c')
| -rw-r--r-- | libgfortran/io/read.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/libgfortran/io/read.c b/libgfortran/io/read.c index 12aa0988f6d..92983d51278 100644 --- a/libgfortran/io/read.c +++ b/libgfortran/io/read.c @@ -40,7 +40,7 @@ typedef unsigned char uchar; /* set_integer()-- All of the integer assignments come here to - * actually place the value into memory. */ + actually place the value into memory. */ void set_integer (void *dest, GFC_INTEGER_LARGEST value, int length) |