Age | Commit message (Collapse) | Author |
|
* io/write.c (extract_int): Use memcpy to access buffer.
(extract_uint): Ditto.
(extract_real): Ditto.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104000 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* All files: Update FSF address.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103194 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* io/write.c (write_real): Add default formats for real(10) and
real(16).
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102590 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* io/write.c (write_float): Revise output of IEEE exceptional
values to comply with F95 and F2003 standards.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102324 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* io/write.c (write_float): Fix field width checks for
printing 'Infinity' or 'Inf'.
(output_float): Fix typo in comment.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102115 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
PR libfortran/16435
* transfer.c (formatted_transfer): Correct the problems
with X- and T-editting that caused TLs followed by TRs
to overwrite data, which caused NIST FM908.FOR to fail
on many tests.
(data_transfer_init): Zero X- and T-editting counters at
the start of formatted IO.
* write.c (write_x): Write specified number of skips with
specified number of spaces at the end.
2005-07-12 Paul Thomas <pault@gcc.gnu.org>
PR libfortran/16435
* gfortran.dg/tl_editting.f90: New.
* gfortran.dg/g77/f77-edit-x-out.f: Remove XFAIL.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102008 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* io/write.c (otoa): Bias p by SCRATCH_SIZE, not
sizeof (SCRATCH_SIZE).
(btoa): Same.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101908 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
Thomas Koenig <Thomas.Koenig@online.de>
PR libfortran/22217
* io/write.c (extract_unit): New function; extract
ints as unsigned signed int of the correct size.
* io/write.c (write_int): Use it.
* runtime/error.c: Adjust copyright years.
Adjust size of buffer to maximum that can occur.
2005-07-07 Thomas Koenig <Thomas.Koenig@online.de>
PR libfortran/22217
* gfortran.dg/negative-z-descriptor.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101829 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
systems where this is not available.
* c99_protos.h: Prototype for log10l function.
* libgfortran.h: Use generated kinds.h to define GFC_INTEGER_*,
GFC_UINTEGER_*, GFC_LOGICAL_*, GFC_REAL_*, GFC_COMPLEX_*. Update
prototypes for gfc_itoa and xtoa.
* io/io.h: Update prototypes for set_integer and max_value.
* io/list_read.c (convert_integer): Use new
GFC_(INTEGER|REAL)_LARGEST type.
* io/read.c (set_integer): Likewise.
(max_value): Likewise.
(convert_real): Likewise.
(real_l): Likewise.
(next_char): Likewise.
(read_decimal): Likewise.
(read_radix): Likewise.
(read_f): Likewise.
* io/write.c (extract_int): Use new GFC_INTEGER_LARGEST type.
(extract_real): Use new GFC_REAL_LARGEST type.
(calculate_exp): Likewise.
(calculate_G_format): Likewise.
(output_float): Likewise. Use log10l for long double values.
Add comment for sprintf format. Use GFC_REAL_LARGEST_FORMAT.
(write_l): Use new GFC_INTEGER_LARGEST type.
(write_float): Use new GFC_REAL_LARGEST type.
(write_int): Remove useless special case for (len < 8).
(write_decimal): Use GFC_INTEGER_LARGEST.
(otoa): Use GFC_UINTEGER_LARGEST as argument.
(btoa): Use GFC_UINTEGER_LARGEST as argument.
* runtime/error.c (gfc_itoa): Use GFC_INTEGER_LARGEST as
argument.
(xtoa): Use GFC_UINTEGER_LARGEST as argument.
* Makefile.am: Use mk-kinds-h.sh to generate header kinds.h
with all Fortran kinds available.
* configure.ac: Check for strtold and log10l.
* Makefile.in: Regenerate.
* aclocal.m4: Regenerate.
* configure: Regenerate.
* config.h.in: Regenerate.
* mk-kinds-h.sh: Configuration script for available integer
and real kinds.
* lib/target-supports.exp: Add
check_effective_target_fortran_large_real and
check_effective_target_fortran_large_int to check for
corresponding effective targets.
* gfortran.dg/large_integer_kind_1.f90: New test.
* gfortran.dg/large_real_kind_1.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101274 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* io/write.c (output_float): Rework logic to avoid call to log10
with argument equal to zero.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@100068 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* configure: Regenerate.
* io/write.c (calculate_G_format): Remove unused parameter.
(output_float): Remove unused parameter.
(write_float): Change callers.
(nml_write_obj): Avoid signed warning.
Make variable const to support -Wwrite-strings.
* io/unix.c (fd_alloc, mmap_open, mmap_sfree, mem_sfree,
mem_truncate): Mark argument as unused.
* io/unit.c (get_unit): Mark argument as unused.
(init_units): Avoid warning about signed comparision.
* io/transfer.c (next_record_r): Remove unused parameter.
(next_record_w): Remove unused parameter.
(next_record): Change callers.
(iolength_transfer): Mark arguments as unused.
* io/open.c: Add initializer.
* io/list_read.c (read_character): Mark argument as unused.
(nml_match_name): Add const to make compile with -Wwrite-strings.
* io/format.c: Add initializer.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@99839 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
missing returns, reformat a bit.
* io/write.c (nml_write_obj): Use %d again - and cast to int,
st_sprintf does not handle %ld.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@99722 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@99720 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
list.
* intrinsics/random.c (KISS_DEFAULT_SEED): Remove extra semicolon.
* io/transfer.c: Do not use empty initializers for global objects.
Add missing initializers.
* io/lock.c: Do not use empty initializers for global objects.
* io/close.c: Add missing initializers.
* runtime/environ.c: Add missing initializers. Do not use empty
initializers for global object.
(init_string): Mark argument as unused.
* runtime/main.c (cleanup): Fix parameter list.
* io/io.h: Fix parameter lists.
* m4/transpose.m4, m4/matmul.m4: Fix pointer cast to avoid
warning.
* generated/transpose_c4.c, generated/transpose_c8.c,
generated/transpose_i4.c, generated/transpose_i8.c,
generated/matmul_c4.c, generated/matmul_c8.c,
generated/matmul_i4.c, generated/matmul_i8.c,
generated/matmul_r4.c, generated/matmul_r8.c: Regenerated.
* io/write.c (nml_write_obj): Fix 64-bit problem.
* io/list_read.c (nml_get_obj_data): Add missing braces around
initializer to avoid warnings.
* intrinsics/etime.c (etime_sub): Remove unused variable.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@99719 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@98610 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@98287 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* write.c (write_float): A G edit descriptor may locally change
the scale factor, but it needs to be restored afterwards.
* gfortran.dg/pr20755.f: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@97627 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@96958 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* write.c (output_float): Handling the "F0.d" format similarly as
commercial compilers.
* pr18025.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@96953 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
EN and ES formats.
* pr20480.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@96566 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
PR libfortran/20124
* gfortran.dg/pr20124.f90: New Test
2005-03-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
PR libfortran/20124
* write.c (output_float): Adds a nzero_real variable to store
the number of leading zeros whatever the format width is. Corrects
the rounding of numbers less than 10^(-width). Fixes typo in an
error message. Updates copyright years
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@96291 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@95630 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
2005-02-27 Fran��ois-Xavier Coudert <coudert@clipper.ens.fr>
PR libfortran/20101
* write.c (output_float): Adding special check for value 0.0 in
PE format.
gcc/testsuite/
2005-02-27 Fran��ois-Xavier Coudert <coudert@clipper.ens.fr>
PR libfortran/20101
* gfortran.dg/write_0_pe_format.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@95628 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* io/write.c (output_float): Fix typo in condition.
gcc/testsuite/
* gfortran.dg/e_d_fmt.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@95615 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@95343 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
PR libfortran/19280
c99_protos.h: License changed to GPL+exception.
libgfortran.h: Ditto.
intrinsics/abort.c: Ditto.
intrinsics/args.c: Ditto.
intrinsics/associated.c: Ditto.
intrinsics/bessel.c: Ditto.
intrinsics/c99_functions.c: Ditto.
intrinsics/cpu_time.c: Ditto.
intrinsics/cshift0.c: Ditto.
intrinsics/date_and_time.c: Ditto.
intrinsics/env.c: Ditto.
intrinsics/eoshift0.c: Ditto.
intrinsics/eoshift2.c: Ditto.
intrinsics/erf.c: Ditto.
intrinsics/etime.c: Ditto.
intrinsics/exit.c: Ditto.
intrinsics/flush.c: Ditto.
intrinsics/fnum.c: Ditto.
intrinsics/getXid.c: Ditto.
intrinsics/getcwd.c: Ditto.
intrinsics/ishftc.c: Ditto.
intrinsics/mvbits.c: Ditto.
intrinsics/pack_generic.c: Ditto.
intrinsics/rand.c: Ditto.
intrinsics/random.c: Ditto.
intrinsics/reshape_generic.c: Ditto.
intrinsics/reshape_packed.c: Ditto.
intrinsics/size.c: Ditto.
intrinsics/spread_generic.c: Ditto.
intrinsics/stat.c: Ditto.
intrinsics/string_intrinsics.c: Ditto.
intrinsics/system.c: Ditto.
intrinsics/system_clock.c: Ditto.
intrinsics/transpose_generic.c: Ditto.
intrinsics/umask.c: Ditto.
intrinsics/unlink.c: Ditto.
intrinsics/unpack_generic.c: Ditto.
io/backspace.c: Ditto.
io/close.c: Ditto.
io/endfile.c: Ditto.
io/format.c: Ditto.
io/inquire.c: Ditto.
io/io.h: Ditto.
io/list_read.c: Ditto.
io/lock.c: Ditto.
io/open.c: Ditto.
io/read.c: Ditto.
io/rewind.c: Ditto.
io/transfer.c: Ditto.
io/unit.c: Ditto.
io/unix.c: Ditto.
io/write.c: Ditto.
m4/all.m4: Ditto.
m4/any.m4: Ditto.
m4/cexp.m4: Ditto.
m4/chyp.m4: Ditto.
m4/count.m4: Ditto.
m4/cshift1.m4: Ditto.
m4/ctrig.m4: Ditto.
m4/dotprod.m4: Ditto.
m4/dotprodc.m4: Ditto.
m4/dotprodl.m4: Ditto.
m4/eoshift1.m4: Ditto.
m4/eoshift3.m4: Ditto.
m4/exponent.m4: Ditto.
m4/fraction.m4: Ditto.
m4/head.m4: Ditto.
m4/iforeach.m4: Ditto.
m4/ifunction.m4: Ditto.
m4/in_pack.m4: Ditto.
m4/in_unpack.m4: Ditto.
m4/iparm.m4: Ditto.
m4/matmul.m4: Ditto.
m4/matmull.m4: Ditto.
m4/maxloc0.m4: Ditto.
m4/maxloc1.m4: Ditto.
m4/maxval.m4: Ditto.
m4/minloc0.m4: Ditto.
m4/minloc1.m4: Ditto.
m4/minval.m4: Ditto.
m4/mtype.m4: Ditto.
m4/nearest.m4: Ditto.
m4/pow.m4: Ditto.
m4/product.m4: Ditto.
m4/reshape.m4: Ditto.
m4/set_exponent.m4: Ditto.
m4/shape.m4: Ditto.
m4/specific.m4: Ditto.
m4/specific2.m4: Ditto.
m4/sum.m4: Ditto.
m4/transpose.m4: Ditto.
m4/types.m4: Ditto.
runtime/environ.c: Ditto.
runtime/error.c: Ditto.
runtime/in_pack_generic.c: Ditto.
runtime/in_unpack_generic.c: Ditto.
runtime/main.c: Ditto.
runtime/memory.c: Ditto.
runtime/normalize.c: Ditto.
runtime/pause.c: Ditto.
runtime/select.c: Ditto.
runtime/stop.c: Ditto.
runtime/string.c: Ditto.
generated/_abs_c4.f90: Regenerated.
generated/_abs_c8.f90: Regenerated.
generated/_abs_i4.f90: Regenerated.
generated/_abs_i8.f90: Regenerated.
generated/_abs_r4.f90: Regenerated.
generated/_abs_r8.f90: Regenerated.
generated/_acos_r4.f90: Regenerated.
generated/_acos_r8.f90: Regenerated.
generated/_aint_r4.f90: Regenerated.
generated/_aint_r8.f90: Regenerated.
generated/_anint_r4.f90: Regenerated.
generated/_anint_r8.f90: Regenerated.
generated/_asin_r4.f90: Regenerated.
generated/_asin_r8.f90: Regenerated.
generated/_atan2_r4.f90: Regenerated.
generated/_atan2_r8.f90: Regenerated.
generated/_atan_r4.f90: Regenerated.
generated/_atan_r8.f90: Regenerated.
generated/_conjg_c4.f90: Regenerated.
generated/_conjg_c8.f90: Regenerated.
generated/_cos_c4.f90: Regenerated.
generated/_cos_c8.f90: Regenerated.
generated/_cos_r4.f90: Regenerated.
generated/_cos_r8.f90: Regenerated.
generated/_cosh_r4.f90: Regenerated.
generated/_cosh_r8.f90: Regenerated.
generated/_dim_i4.f90: Regenerated.
generated/_dim_i8.f90: Regenerated.
generated/_dim_r4.f90: Regenerated.
generated/_dim_r8.f90: Regenerated.
generated/_exp_c4.f90: Regenerated.
generated/_exp_c8.f90: Regenerated.
generated/_exp_r4.f90: Regenerated.
generated/_exp_r8.f90: Regenerated.
generated/_log10_r4.f90: Regenerated.
generated/_log10_r8.f90: Regenerated.
generated/_log_c4.f90: Regenerated.
generated/_log_c8.f90: Regenerated.
generated/_log_r4.f90: Regenerated.
generated/_log_r8.f90: Regenerated.
generated/_mod_i4.f90: Regenerated.
generated/_mod_i8.f90: Regenerated.
generated/_mod_r4.f90: Regenerated.
generated/_mod_r8.f90: Regenerated.
generated/_sign_i4.f90: Regenerated.
generated/_sign_i8.f90: Regenerated.
generated/_sign_r4.f90: Regenerated.
generated/_sign_r8.f90: Regenerated.
generated/_sin_c4.f90: Regenerated.
generated/_sin_c8.f90: Regenerated.
generated/_sin_r4.f90: Regenerated.
generated/_sin_r8.f90: Regenerated.
generated/_sinh_r4.f90: Regenerated.
generated/_sinh_r8.f90: Regenerated.
generated/_sqrt_c4.f90: Regenerated.
generated/_sqrt_c8.f90: Regenerated.
generated/_sqrt_r4.f90: Regenerated.
generated/_sqrt_r8.f90: Regenerated.
generated/_tan_r4.f90: Regenerated.
generated/_tan_r8.f90: Regenerated.
generated/_tanh_r4.f90: Regenerated.
generated/_tanh_r8.f90: Regenerated.
generated/all_l4.c: Regenerated.
generated/all_l8.c: Regenerated.
generated/any_l4.c: Regenerated.
generated/any_l8.c: Regenerated.
generated/count_4_l4.c: Regenerated.
generated/count_4_l8.c: Regenerated.
generated/count_8_l4.c: Regenerated.
generated/count_8_l8.c: Regenerated.
generated/cshift1_4.c: Regenerated.
generated/cshift1_8.c: Regenerated.
generated/dotprod_c4.c: Regenerated.
generated/dotprod_c8.c: Regenerated.
generated/dotprod_i4.c: Regenerated.
generated/dotprod_i8.c: Regenerated.
generated/dotprod_l4.c: Regenerated.
generated/dotprod_l8.c: Regenerated.
generated/dotprod_r4.c: Regenerated.
generated/dotprod_r8.c: Regenerated.
generated/eoshift1_4.c: Regenerated.
generated/eoshift1_8.c: Regenerated.
generated/eoshift3_4.c: Regenerated.
generated/eoshift3_8.c: Regenerated.
generated/exp_c4.c: Regenerated.
generated/exp_c8.c: Regenerated.
generated/exponent_r4.c: Regenerated.
generated/exponent_r8.c: Regenerated.
generated/fraction_r4.c: Regenerated.
generated/fraction_r8.c: Regenerated.
generated/hyp_c4.c: Regenerated.
generated/hyp_c8.c: Regenerated.
generated/in_pack_i4.c: Regenerated.
generated/in_pack_i8.c: Regenerated.
generated/in_unpack_i4.c: Regenerated.
generated/in_unpack_i8.c: Regenerated.
generated/matmul_c4.c: Regenerated.
generated/matmul_c8.c: Regenerated.
generated/matmul_i4.c: Regenerated.
generated/matmul_i8.c: Regenerated.
generated/matmul_l4.c: Regenerated.
generated/matmul_l8.c: Regenerated.
generated/matmul_r4.c: Regenerated.
generated/matmul_r8.c: Regenerated.
generated/maxloc0_4_i4.c: Regenerated.
generated/maxloc0_4_i8.c: Regenerated.
generated/maxloc0_4_r4.c: Regenerated.
generated/maxloc0_4_r8.c: Regenerated.
generated/maxloc0_8_i4.c: Regenerated.
generated/maxloc0_8_i8.c: Regenerated.
generated/maxloc0_8_r4.c: Regenerated.
generated/maxloc0_8_r8.c: Regenerated.
generated/maxloc1_4_i4.c: Regenerated.
generated/maxloc1_4_i8.c: Regenerated.
generated/maxloc1_4_r4.c: Regenerated.
generated/maxloc1_4_r8.c: Regenerated.
generated/maxloc1_8_i4.c: Regenerated.
generated/maxloc1_8_i8.c: Regenerated.
generated/maxloc1_8_r4.c: Regenerated.
generated/maxloc1_8_r8.c: Regenerated.
generated/maxval_i4.c: Regenerated.
generated/maxval_i8.c: Regenerated.
generated/maxval_r4.c: Regenerated.
generated/maxval_r8.c: Regenerated.
generated/minloc0_4_i4.c: Regenerated.
generated/minloc0_4_i8.c: Regenerated.
generated/minloc0_4_r4.c: Regenerated.
generated/minloc0_4_r8.c: Regenerated.
generated/minloc0_8_i4.c: Regenerated.
generated/minloc0_8_i8.c: Regenerated.
generated/minloc0_8_r4.c: Regenerated.
generated/minloc0_8_r8.c: Regenerated.
generated/minloc1_4_i4.c: Regenerated.
generated/minloc1_4_i8.c: Regenerated.
generated/minloc1_4_r4.c: Regenerated.
generated/minloc1_4_r8.c: Regenerated.
generated/minloc1_8_i4.c: Regenerated.
generated/minloc1_8_i8.c: Regenerated.
generated/minloc1_8_r4.c: Regenerated.
generated/minloc1_8_r8.c: Regenerated.
generated/minval_i4.c: Regenerated.
generated/minval_i8.c: Regenerated.
generated/minval_r4.c: Regenerated.
generated/minval_r8.c: Regenerated.
generated/nearest_r4.c: Regenerated.
generated/nearest_r8.c: Regenerated.
generated/pow_c4_i4.c: Regenerated.
generated/pow_c4_i8.c: Regenerated.
generated/pow_c8_i4.c: Regenerated.
generated/pow_c8_i8.c: Regenerated.
generated/pow_i4_i4.c: Regenerated.
generated/pow_i4_i8.c: Regenerated.
generated/pow_i8_i4.c: Regenerated.
generated/pow_i8_i8.c: Regenerated.
generated/pow_r4_i4.c: Regenerated.
generated/pow_r4_i8.c: Regenerated.
generated/pow_r8_i4.c: Regenerated.
generated/pow_r8_i8.c: Regenerated.
generated/product_c4.c: Regenerated.
generated/product_c8.c: Regenerated.
generated/product_i4.c: Regenerated.
generated/product_i8.c: Regenerated.
generated/product_r4.c: Regenerated.
generated/product_r8.c: Regenerated.
generated/reshape_i4.c: Regenerated.
generated/reshape_i8.c: Regenerated.
generated/set_exponent_r4.c: Regenerated.
generated/set_exponent_r8.c: Regenerated.
generated/shape_i4.c: Regenerated.
generated/shape_i8.c: Regenerated.
generated/sum_c4.c: Regenerated.
generated/sum_c8.c: Regenerated.
generated/sum_i4.c: Regenerated.
generated/sum_i8.c: Regenerated.
generated/sum_r4.c: Regenerated.
generated/sum_r8.c: Regenerated.
generated/transpose_i4.c: Regenerated.
generated/transpose_i8.c: Regenerated.
generated/trig_c4.c: Regenerated.
generated/trig_c8.c: Regenerated.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@93235 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* io/write.c (itoa): Same.
* runtime/environ.c (itoa): Same.
* runtime/error.c (itoa): Same.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@92380 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
intrinsics/eoshift2.c, intrinsics/exit.c, intrinsics/flush.c,
intrinsics/ishftc.c, intrinsics/mvbits.c, intrinsics/pack_generic.c,
intrinsics/random.c, intrinsics/reshape_generic.c, intrinsics/size.c,
intrinsics/spread_generic.c, intrinsics/stat.c,
intrinsics/string_intrinsics.c, intrinsics/system_clock.c,
intrinsics/transpose_generic.c, intrinsics/unlink.c,
intrinsics/unpack_generic.c, io/backspace.c, io/format.c,
io/list_read.c, io/lock.c, io/open.c, io/transfer.c, io/unix.c,
io/write.c, runtime/environ.c, runtime/error.c,
runtime/in_pack_generic.c, runtime/in_unpack_generic.c, runtime/main.c,
runtime/memory.c, runtime/pause.c, runtime/stop.c,
runtime/string.c: Whitespace fixes.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@91794 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* configure.ac: Check for finite in libm.
* libgfortran.h: Define isfinite macro if not defined.
* intrinsics/c99_functions.c: Use defined(fpclassify) instead of
HAVE_FPCLASSIFY.
* io/write.c (write_float): Use isfinite instead of finite.
* configure, config.h.in: Rebuilt.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@91064 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@90975 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* acinclude.m4 (LIBGFOR_TARGET_ILP32): New check.
* configure.ac: Include LIBGFOR_TARGET_ILP32.
* configure: Regenerate.
* config.h.in: Likewise.
* libgfortran.h: Provide default definitions for C99 types
on ILP32 targets that don't have them.
PR target/17999
* configure.ac: Check for snprintf.
* configure: Regenerate.
* config.h.in: Likewise.
* intrinsics/date_and_time.c (date_and_time): Do not
use snprinf if it is not available.
* io/write.c (output_float): Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@90964 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
Bud Davis <bdavis9659@comcast.net>
PR fortran/17706
PR fortran/16434
* io/format.c (parse_format_list): Set repeat count for S, SP, SS,
BN and BZ formats.
* io/write.c (output_float): Don't output minus zero.
libgfortran/
* gfortran/pr17706.f90: New test.
* gfortran.dg/g77/f77-edit-s-out.f: Remove xfail.
Actually apply the patch this time.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88513 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* intrinsics/abort.c ("libgfortran.h"): Move.
* intrinsics/date_and_time.c ("libgfortran.h"): Same.
* intrinsics/write.c ("libgfortran.h"): Same.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88444 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* io/write.c (output_float): Typo in comment. Remove debugging
printf. Fix format for FP of form 1e10.
2004-09-06 Paul Brook <paul@codesourcery.com>
* gfortran.dg/edit_real_1.f90: Add new test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@87119 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* write.c (output_float): Fix condition. Correctly handle nonzero
scale factor.
testsuite/
* gfortran.dg/edit_real_1.f90: Add new tests.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86952 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* libgfortran.h (rtoa): Remove prototype.
* runtime/error.c (rtoa): Remove.
* io/write.c (calculate_G_format): Don't add blanks if E format is
used. Add correct number of blanks when exponent width is specified.
(output_float): Rewrite.
testsuite/
* gfortran.dg/edit_real_1.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86701 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
Fix formatting issues, update copyright years.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86425 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
PR fortran/13278
* trans-io.c (transfer_namelist_element): New. Recursively handle
derived-type variables. Pass string lengths.
(build_dt): Code moved to build_namelist, with some
changes and additions.
(gfc_build_io_library_fndecls): Declare the fifth
argument in st_set_nml_var_char -- string_length.
libgfortran/
* io/transfer.c (st_set_nml_var)
* io/write.c (namelist_write): Allow var_name and var_name_len to be
null. For strings, use string_length field instead of len.
* io/io.h (struct namelist_type): New field string_length.
(st_set_nml_var_char): New argument string_length.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86166 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
in preference to isinf.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@85407 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* libgfortran/io/write.c: (write_float): Added length check.
Remove pointless memset calls.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@84308 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
PR gfortran/12839
* io/write.c (write_float): check signbit for Infinity.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@83757 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
PR gfortran/12839
* gfortran.fortran-torture/execute/nan_inf_fmt.f90: New test.
* io/write.c(write_float): format inf and nan IAW F2003.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@83024 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@81922 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
(write_integer): Base field width on kind.
(list_formatted_write): Output initial blank.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@81914 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
* io/write.c (write_a): right justify A edit output.
libgfortran/
* gfortran.fortran-torture/execute/write_a_1.f90: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@81895 138bc75d-0d04-0410-961f-82ee72b054a4
|
|
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@81764 138bc75d-0d04-0410-961f-82ee72b054a4
|