]> gcc.gnu.org Git - gcc.git/blame - gcc/fortran/ChangeLog
* error.c (gfc_warning): Fix typo in comment.
[gcc.git] / gcc / fortran / ChangeLog
CommitLineData
e88763d1
FXC
12005-05-22 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2
3 * error.c (gfc_warning): Fix typo in comment.
4
8f4dc7af
TK
52005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
6
7 PR libfortran/21127
8 * fortran/iresolve.c (gfc_resolve_reshape): Add
9 gfc_type_letter (BT_COMPLEX) for complex to
10 to resolved function name.
11
acc75ae3
EE
122005-05-18 Erik Edelmann <erik.edelmann@iki.fi>
13
14 * array.c (gfc_match_array_constructor): Support [ ... ]
15 style array constructors.
16
e743d142
TS
172005-05-18 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
18
19 * f95-lang.c (gfc_init_builtin_functions): Define BUILT_IN_TRUNC
20 and BUILT_IN_TRUNCF instead of BUILT_IN_FLOOR and BUILT_IN_FLOORF.
21 * trans-intrinsic.c (build_fix_expr): Change 'op' argument
22 to correct enum type.
23 (gfc_conv_intrinsic_aint): Likewise. Clarify comment in front of
24 function. Add default case to switch, deal with FIX_TRUNC_EXPR
25 instead of FIX_FLOOR_EXPR.
26
1e7d0a64
FW
272005-05-18 Feng Wang <fengwang@nudt.edu.cn>
28
29 PR fortran/20954
30 * trans-const.c (gfc_conv_const_charlen): Use gfc_charlen_type_node to
31 build character length.
32
b4838d29
ZD
332005-05-17 Zdenek Dvorak <dvorakz@suse.cz>
34
35 * trans-types.c (gfc_array_range_type): New variable.
36 (gfc_init_types): Initialize gfc_array_range_type.
37 (gfc_get_array_type_bounds): Use gfc_array_range_type.
38
8de1f441
JJ
392005-05-17 Jakub Jelinek <jakub@redhat.com>
40
41 PR fortran/15080
42 * trans-stmt.c (generate_loop_for_temp_to_lhs): Remove SIZE and COUNT2
43 arguments. If LSS is gfc_ss_terminator, increment COUNT1 by 1, instead
44 of incrementing COUNT2 and using COUNT1+COUNT2 increment COUNT1 and use
45 just that as index.
46 (generate_loop_for_rhs_to_temp): Likewise.
47 (compute_overall_iter_number): Add INNER_SIZE_BODY argument.
48 It non-NULL, add it to body.
49 (allocate_temp_for_forall_nest_1): New function, split from
50 allocate_temp_for_forall_nest.
51 (allocate_temp_for_forall_nest): Add INNER_SIZE_BODY argument,
52 propagate it down to compute_overall_iter_number. Use
53 allocate_temp_for_forall_nest_1.
54 (gfc_trans_assign_need_temp): Remove COUNT2. Call
55 compute_inner_temp_size into a new stmtblock_t. Adjust calls to
56 allocate_temp_for_forall_nest, generate_loop_for_rhs_to_temp
57 and generate_loop_for_temp_to_lhs.
58 (gfc_trans_pointer_assign_need_temp): Adjust calls to
59 allocate_temp_for_forall_nest.
60 (gfc_evaluate_where_mask): Call compute_inner_temp_size into a new
61 stmtblock_t. Call compute_overall_iter_number just once, then
62 allocate_temp_for_forall_nest_1 twice with the same size.
63 Initialize mask indexes if nested_forall_info != NULL.
64 (gfc_trans_where_2): Initialize mask indexes before calling
65 gfc_trans_nested_forall_loop.
66
b078dfbf
FW
672005-05-15 Feng Wang <fengwang@nudt.edu.cn>
68 Jerry DeLisle <jvdelisle@verizon.net>
69
70 PR fortran/17432
71 * trans-stmt.c (gfc_trans_label_assign): fix pointer type, to
72 resolve ICE on assign of format label.
73 * trans-io.c (set_string): add fold-convert to properly
74 handle assigned format label in write.
75
cafa34aa
PB
762005-05-13 Paul Brook <paul@codesourcery.com>
77
78 * trans-stmt.c (gfc_trans_forall_1): Fix comment typo.
79
4588b604
TS
802005-05-12 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
81
82 * trans-types.c (gfc_is_nodesc_array): Remove redundant check.
83
b160dd28
TS
842005-05-11 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
85
86 PR fortran/21260
87 * io.c (check_format): Look for literal characters inside
88 hollerith constant.
89
09e7f686
TS
902005-05-11 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
91
92 * resolve.c (resolve_symbol): Copy 'pointer' and 'dimension'
93 attribute from result symbol to function symbol.
3da7937d
TS
94 * trans-expr.c (gfc_conv_function_call): Look at sym->attr.dimension
95 instead of sym->result->attr.dimension.
09e7f686 96
973ff4c0
TS
972005-05-10 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
98
99 PR fortran/20178
100 * gfortran.h (gfc_option): Add flag_f2c.
101 * invoke.texi: Document '-ff2c' command line option. Adapt
102 documentation for '-fno-second-underscore' and '-fno-underscoring'.
103 * lang.opt (ff2c): New entry.
104 * options.c (gfc-init_options): Set default calling convention
105 to -fno-f2c. Mark -fsecond-underscore unset.
106 (gfc_post_options): Set -fsecond-underscore if not explicitly set
107 by user.
108 (handle_options): Set gfc_option.flag_f2c according to requested
109 calling convention.
110 * trans-decl.c (gfc_get_extern_function_decl): Use special f2c
111 intrinsics where necessary.
112 (gfc_trans_deferred_vars): Change todo error to assertion.
113 * trans-expr.c (gfc_conv_variable): Dereference access
114 to hidden result argument.
115 (gfc_conv_function_call): Add hidden result argument to argument
116 list if f2c calling conventions requested. Slightly restructure
117 tests. Convert result of default REAL function to requested type
118 if f2c calling conventions are used. Dereference COMPLEX result
119 if f2c cc are used.
120 * trans-types.c (gfc_sym_type): Return double for default REAL
121 function if f2c cc are used.
122 (gfc_return_by_reference): Slightly restructure logic. Return
123 COMPLEX by reference depending on calling conventions.
124 (gfc_get_function_type): Correctly make hidden result argument a
125 pass-by-reference argument for COMPLEX. Remove old code which does
126 this for derived types.
127
7f42f27f
TS
1282005-05-09 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
129
130 * match.c (gfc_match_return): Only require space after keyword when
131 it is obligatory. Only give stdwarn to after matching is successful.
132 * dump-parse-tree.c (gfc_show_symbol): Deal with alternate returns.
133
357877ed
KH
1342005-05-08 Kazu Hirata <kazu@cs.umass.edu>
135
136 * intrinsic.texi: Fix typos.
137
a6334742
SK
1382005-05-07 Steven G. Kargl <kargls@comcast.net>
139
140 * intrinsic.texi: Document ASSOCIATED and ATAN2. Update Bessel function
141 description to include information about scalar arguments.
142
aa990c83
KH
1432005-05-03 Kazu Hirata <kazu@cs.umass.edu>
144
145 * Make-lang.in, dump-parse-tree.c, invoke.texi, lang.opt,
146 match.h, trans-array.h: Update copyright.
147
22e8617b
TT
1482005-04-29 Tom Tromey <tromey@redhat.com>
149
150 * f95-lang.c (poplevel): Updated for change to build_block.
151
d198b59a
JJ
1522005-04-29 Jakub Jelinek <jakub@redhat.com>
153
154 PR fortran/13082
155 PR fortran/18824
156 * trans-expr.c (gfc_conv_variable): Handle return values in functions
157 with alternate entry points.
158 * resolve.c (resolve_entries): Remove unnecessary string termination
159 after snprintf. Set result of entry master.
160 If all entries have the same type, set entry master's type
161 to that common type, otherwise set mixed_entry_master attribute.
162 * trans-types.c (gfc_get_mixed_entry_union): New function.
163 (gfc_get_function_type): Use it for mixed_entry_master functions.
164 * gfortran.h (symbol_attribute): Add mixed_entry_master bit.
165 * decl.c (gfc_match_entry): Set entry->result properly for
166 function ENTRY.
167 * trans-decl.c (gfc_get_symbol_decl): For entry_master, skip over
168 __entry argument.
169 (build_entry_thunks): Handle return values in entry thunks.
170 Clear BT_CHARACTER's ts.cl->backend_decl, so that it is not
171 shared between multiple contexts.
172 (gfc_get_fake_result_decl): Use DECL_ARGUMENTS from
173 current_function_decl instead of sym->backend_decl. Skip over
174 entry master's entry id argument. For mixed_entry_master entries or
175 their results, return a COMPONENT_REF of the fake result.
176 (gfc_trans_deferred_vars): Don't warn about missing return value if
177 at least one entry point uses RESULT.
178 (gfc_generate_function_code): For entry master returning
179 CHARACTER, copy ts.cl->backend_decl to all entry result syms.
180 * trans-array.c (gfc_trans_dummy_array_bias): Don't consider return
181 values optional just because they are in entry master.
182
4c1f4f52
FXC
1832005-04-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
184
185 * gfortran.h (gfc_namespace): Add seen_implicit_none field,
186 Tobias forgot this in previous commit.
187
1a7bfcc3
PB
1882005-04-29 Paul Brook <paul@codesourcery.com>
189
190 * trans-expr.c (gfc_conv_expr_present): Fix broken assert. Update
191 comment.
192
438e1428
TS
1932005-04-29 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
194
195 * gfortran.h (gfc_namespace): Add seen_implicit_none field.
196 * symbol.c (gfc_set_implicit_none): Give error if there's a previous
197 IMPLICIT NONE, set seen_implicit_none.
198 (gfc_merge_new_implicit): Error if there's an IMPLICIT NONE statement.
199
973a384d
TS
2002005-04-28 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
201
202 * gfortran.h (gfc_gsymbol): Make name a const char *.
203 * symbol.c (gfc_get_gsymbol): Allocate gsymbol name via
204 gfc_get_string.
205
781e1004
FXC
2062005-04-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
207
208 PR fortran/20865
209 * resolve.c (resolve_actual_arglist): Issue an error if a statement
210 functions is used as actual argument.
211
90aeadcb
FXC
2122005-04-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
213
214 PR fortran/21177
215 * interface.c (compare_parameter): Ignore type for EXPR_NULL
216 only if type is BT_UNKNOWN.
217
860c8f3b
PB
2182005-04-25 Paul Brook <paul@codesourcery.com>
219 Steven G. Kargl <kargls@comcast.net>
220
221 PR fortran/20879
222 * check.c (gfc_check_ichar_iachar): New function.
223 * instinsic.h (gfc_check_ichar_iachar): Add prototype.
224 * intrinsic.c (add_functions): Use it.
225 * primary.c (match_varspec, gfc_match_rvalue): Clear incorrect
226 character expression lengths.
227
eb83e811
TS
2282005-04-24 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
229
230 PR fortran/20059
231 * trans-common.c (translate_common): Cast offset and
232 common_segment->offset to type int for warning message.
233
d4ee4d25
DD
2342005-04-23 DJ Delorie <dj@redhat.com>
235
236 * trans-decl.c: Adjust warning() callers.
237
855a145c
TS
2382005-04-23 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
239
240 * trans-const.c (gfc_conv_mpfr_to_tree): Use hexadecimal string as
beceb652 241 intermediate representation. Fix typo in comment.
855a145c 242
c41993e8
SK
2432005-04-21 Steven G. Kargl <kargls@comcast.net>
244
245 * trans-const.c (gfc_conv_mpfr_to_tree): Remove unneeded computation;
246 simplify logic; Add a gcc_assert.
247
6c08eb63
SK
2482005-04-19 Steven G. Kargl <kargls@comcast.net>
249
250 * trans-const.c (gfc_conv_mpz_to_tree): Fix comment.
251
3010be13
AD
2522005-04-19 Arnaud Desitter <arnaud.desitter@ouce.ox.ac.uk>
253 Steven G. Kargl <kargls@comcast.net>
254
255 * invoke.texi: Update -Waliasing description
256
009e94d4
FXC
2572005-04-19 Francois-Xavier Coudert <coudert@clipper.ens.fr>
258
259 PR fortran/16861
260 * resolve.c (resolve_variable): If e->symtree is not set, this
261 ought to be a FAILURE, and not a segfault.
262
29dc5138
PT
2632005-04-17 Paul Thomas <pault@gcc.gnu.org>
264
265 PR fortran/17472
266 PR fortran/18209
267 PR fortran/18396
268 PR fortran/19467
269 PR fortran/19657
8a731165
TS
270 * fortran/trans-io.c (gfc_build_io_library_fndecls): Create
271 declaration for st_set_nml_var and st_set_nml_var_dim. Remove
272 declarations of old namelist functions.
29dc5138 273 (build_dt): Simplified call to transfer_namelist_element.
8a731165
TS
274 (nml_get_addr_expr): Generates address expression for start of
275 object data. New function.
276 (nml_full_name): Qualified name for derived type components. New
277 function.
278 (transfer_namelist_element): Modified for calls to new functions
279 and improved derived type handling.
29dc5138 280
a34938be
RG
2812005-04-17 Richard Guenther <rguenth@gcc.gnu.org>
282
283 * scanner.c (gfc_next_char_literal): Reset truncation flag
284 for lines ending in a comment for both fixed and free form.
285 (load_line): Do not set truncated flag if only truncating
286 the EOL marker.
287
ba1defa5
RG
2882005-04-15 Richard Guenther <rguenth@gcc.gnu.org>
289
290 PR fortran/14569
291 * gfortran.h (gfc_linebuf): Add truncated field.
292 * parse.c (next_statement): Handle warning for truncated
293 lines.
294 * scanner.c (load_line): Return if line was truncated.
295 No longer warn for truncated lines. Remove unused parameters.
296 (load_file): Store load_line return value to linebuf.
297 (gfc_error_recovery): Do not advance line at the end.
298
2d0aa65f
SK
2992005-04-14 Steven G. Kargl <kargls@comcast.net>
300
301 * gfortran.h (gfc_real_info): Add subnormal struct member.
302 * arith.c (gfc_arith_init_1): Set it.
303 (gfc_check_real_range): Use it.
304 * simplify.c (gfc_simplify_nearest): Fix nearest(0.,1.).
305
c33063e8
KH
3062005-04-12 Kazu Hirata <kazu@cs.umass.edu>
307
308 * simplify.c: Fix a comment typo.
309
0b026622
RS
3102005-04-11 Richard Sandiford <rsandifo@redhat.com>
311
312 * lang.opt: Refer to the GCC internals documentation instead of c.opt.
313
9f32d037
TS
3142005-04-11 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
315
316 * simplify.c (gfc_simplify_nearest): Overhaul.
317
6892757c
KH
3182005-04-10 Kazu Hirata <kazu@cs.umass.edu>
319
320 * interface.c: Fix a comment typo.
321
51c3f0f6
FXC
3222005-04-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
323
324 * match.c (match_arithmetic_if): Arithmetic IF is obsolete in
325 Fortran 95.
326
8e1fa5d6
SK
3272005-04-09 Steven G. Kargl <kargls@comcast.net>
328
329 * simplify.c (gfc_simplify_anint): Use mpfr_round()
330 (gfc_simplify_dnint): ditto.
331 (gfc_simplify_nint): ditto.
332
53d8a8ac
AP
3332005-04-09 Andrew Pinski <pinskia@physics.uc.edu>
334
335 PR fortran/13257
336 * io.c (check_format): Allow an optional comma
337 between descriptors.
338
835d64ab
FXC
3392005-04-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
340
341 * match.c (match_arithmetic_if): Remove gfc_ prefix and correct
342 comment according to GNU coding style.
907d22fd
FXC
343 (gfc_match_if): Remove gfc_ prefix in call to
344 match_arithmetic_if.
835d64ab 345
f55e72ce
DN
3462005-04-08 Diego Novillo <dnovillo@redhat.com>
347
348 * match.c (gfc_match_arithmetic_if): Declare static.
349
43e1c5f7
FXC
3502005-04-08 Francois-Xavier Coudert <coudert@clipper.ens.fr>
351
352 PR fortran/17229
353 * match.c (gfc_match_arithmetic_if): New function to match an
354 arithmetic IF statement.
355 (gfc_match_if): Use gfc_match_arithmetic_if to match an
356 arithmetic IF statement embedded in a simple IF statement.
357
01ae8930
SK
3582005-04-07 Steven G. Kargl <kargls@comcast.net>
359
360 * simplify.c (gfc_simplify_exponent): Fix exponent(tiny(x))
361
53ae8e14
SK
3622005-04-06 Steven G. Kargl <kargls@comcast.net>
363
364 * invoke.texi: Remove documentation of -std=f90
365
ccccdb8d
TS
3662005-04-06 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
367
368 * expr.c (gfc_check_assign): Don't allow NULL as rhs in a
369 non-pointer assignment.
370
bd024745
FW
3712005-04-05 Feng Wang <fengwang@nudt.edu.cn>
372
373 PR fortran/15959
374 PR fortran/20713
375
376 * array.c (resolve_character_array_constructor): New function. Set
377 constant character array's character length.
378 (gfc_resolve_array_constructor): Use it.
379 * decl.c (add_init_expr_to_sym): Set symbol and initializer character
380 length.
381 (gfc_set_constant_character_len): New function. Set constant character
382 expression according the given length.
383 * match.h (gfc_set_constant_character_len): Add prototype.
384
c6db4d01
FXC
3852005-04-04 Francois-Xavier Coudert <coudert@clipper.ens.fr>
386
387 * intrinsic.texi: BES?? functions are not in the f95 standard.
388
a5d58aeb
FXC
3892005-04-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
390
391 * intrinsic.texi: Document COS, EXP, LOG, LOG10, SIN, SQRT, TAN.
392
f7cdcbf1
FXC
3932005-04-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
394
395 * intrinsic.texi: Document BESJ0, BESJ1, BESJN, BESY0, BESY1,
396 BESYN, ATAN, COSH, ERF, ERC, SINH, TANH.
397
6230d276
SK
3982005-04-02 Steven G. Kargl <kargls@comcast.net>
399
400 * intrinsic.texi: Document ALLOCATED, ANINT, ANY, ASIN; fix typos
401
69de3b83
KH
4022005-04-01 Kazu Hirata <kazu@cs.umass.edu>
403
404 * decl.c, f95-lang.c, interface.c, module.c, trans-stmt.c,
405 trans.h: Fix comment typos.
406
3ae9eb27
SK
4072005-03-29 Steven G. Kargl <kargls@comcast.net>
408
409 * gfortran.h (option_t): Change d8, i8, r8 to flag_default_double,
410 flag_default_integer, flag_default_real
411 * invoke.texi: Update documentation
412 * lang.opt: Remove d8, i8, r8 definitions; Add fdefault-double-8
413 fdefault-integer-8, and fdefault-real-8 definitions.
414 * options.c (gfc_init_options): Set option defaults
415 (gfc_handle_option): Handle command line options.
416 * trans-types.c (gfc_init_kinds): Use options.
417
8bb46326
DN
4182005-03-29 Keith Besaw <kbesaw@us.ibm.com>
419
420 * f95-lang.c (builtin_function): Process the attrs parameter
421 and apply the "const" attribute to the builtin if found.
422
6b32f9fc
SK
4232005-03-27 Steven G. Kargl <kargls@comcast.net>
424
425 * intrinsic.texi: Document AIMAG, AINT, ALL
426
4c54501b
SK
4272005-03-26 Steven G. Kargl <kargls@comcast.net>
428
429 * arith.c (check_result): Fix illogical logic.
430
a3122424
CY
4312005-03-26 Canqun Yang <canqun@nudt.edu.cn>
432
433 * trans-common.c (create_common): Build RECORD_NODE for common blocks
434 contain no equivalence objects.
435 (add_equivalences): New argument saw_equiv.
436 (trans_common): New local variable saw_equiv.
437 (finish_equivalences): Add a local variable dummy, Always pass true
438 for the 3rd parameter to create_common.
439
7b4047a0
SK
4402005-03-25 Steven G. Kargl <kargls@comcast.net>
441
442 * intrinsic.texi: Fix "make dvi"
443
4442005-03-24 Steven G. Kargl <kargls@comcast.net>
8db2ba40
SK
445
446 * intrinsic.texi: New file.
447 * gfortran.texi: Include it; white space change; fix typo.
448
d101034c
JM
4492005-03-23 Joseph S. Myers <joseph@codesourcery.com>
450
451 * f95-lang.c (LANG_HOOKS_TRUTHVALUE_CONVERSION): Remove.
452
10c7a96f
SB
4532005-03-23 Steven Bosscher <stevenb@suse.de>
454
455 * convert.c (convert): Replace fold (buildN (...)) with fold_buildN.
456 * trans-array.c (gfc_trans_allocate_array_storage,
457 gfc_trans_allocate_temp_array gfc_trans_array_constructor_value,
458 gfc_conv_array_index_ref, gfc_trans_array_bound_check,
459 gfc_conv_array_index_offset, gfc_conv_scalarized_array_ref,
460 gfc_conv_array_ref, gfc_trans_preloop_setup, gfc_conv_ss_startstride,
461 gfc_conv_loop_setup, gfc_array_init_size, gfc_trans_array_bounds,
462 gfc_trans_auto_array_allocation, gfc_trans_dummy_array_bias,
463 gfc_conv_expr_descriptor): Likewise.
464 * trans-expr.c (gfc_conv_powi, gfc_conv_string_tmp,
465 gfc_conv_concat_op, gfc_conv_expr_op): Likewise.
466 * trans-intrinsic.c (build_round_expr, gfc_conv_intrinsic_bound,
467 gfc_conv_intrinsic_cmplx, gfc_conv_intrinsic_sign,
468 gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_minmaxval,
469 gfc_conv_intrinsic_btest, gfc_conv_intrinsic_bitop,
470 gfc_conv_intrinsic_singlebitop, gfc_conv_intrinsic_ibits,
471 gfc_conv_intrinsic_ishft, gfc_conv_intrinsic_ishftc,
472 gfc_conv_intrinsic_merge, prepare_arg_info,
473 gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_repeat): Likewise.
474 * trans-stmt.c (gfc_trans_simple_do, gfc_trans_do, gfc_trans_do_while,
475 gfc_trans_forall_loop, gfc_do_allocate, generate_loop_for_temp_to_lhs,
476 generate_loop_for_rhs_to_temp, compute_inner_temp_size,
477 allocate_temp_for_forall_nest, gfc_trans_pointer_assign_need_temp,
478 gfc_trans_forall_1, gfc_evaluate_where_mask, gfc_trans_where_assign):
479 Likewise.
480 * trans-types.c (gfc_get_dtype, gfc_get_array_type_bounds): Likewise.
481 * trans.c (gfc_add_modify_expr): Likewise.
482
f77b6ca3
FXC
4832005-03-22 Francois-Xavier Coudert <coudert@clipper.ens.fr>
484
485 * check.c (gfc_check_chdir, gfc_check_chdir_sub, gfc_check_kill,
486 gfc_check_kill_sub, gfc_check_link, gfc_check_link_sub,
487 gfc_check_symlnk, gfc_check_symlnk_sub, gfc_check_rename,
488 gfc_check_rename_sub, gfc_check_sleep_sub, gfc_check_gerror,
489 gfc_check_getlog, gfc_check_hostnm, gfc_check_hostnm_sub,
490 gfc_check_perror): new functions to check newly implemented
491 g77 intrinsics.
492 * gfortran.h: adding symbols for new intrinsics.
493 * intrinsic.c (add_functions): adding new intrinsics.
494 (add_subroutines): adding new intrinsics.
495 * intrinsic.h: prototype for all checking and resolving
496 functions.
497 * iresolve.c (gfc_resolve_chdir, gfc_resolve_chdir_sub,
498 gfc_resolve_hostnm, gfc_resolve_ierrno, gfc_resolve_kill,
499 gfc_resolve_link, gfc_resolve_rename, gfc_resolve_symlnk,
500 gfc_resolve_time, gfc_resolve_time8, gfc_resolve_rename_sub,
501 gfc_resolve_kill_sub, gfc_resolve_link_sub,
502 gfc_resolve_symlnk_sub, gfc_resolve_sleep_sub,
503 gfc_resolve_gerror, gfc_resolve_getlog, gfc_resolve_hostnm_sub,
504 gfc_resolve_perror): new functions to resolve intrinsics.
505 * trans-intrinsic.c (gfc_conv_intrinsic_function): add case
506 for new symbols.
507
e76d0ec6 5082005-03-19 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
9439ae41
TS
509
510 * dump-parse-tree.c (gfc_show_expr): Dump name of namespace
511 in which the variable is declared.
512
513 PR fortran/18525
514 * resolve.c (was_declared): Also check for dummy attribute.
515
e76d0ec6 5162005-03-19 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
0de27aac
TS
517
518 * gfortran.h (arith): Remove ARITH_0TO0.
519 * arith.c (gfc_arith_error): Remove handling of ARITH_0TO0.
520 (gfc_arith_power): Remove special casing of zero to integral
521 power zero.
522
ffee7efd
KG
5232005-03-18 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
524
525 * Make-lang.in (fortran-warn): Remove -Wno-error.
526 (expr.o-warn, resolve.o-warn, simplify.o-warn,
527 trans-common.o-warn): Specify -Wno-error.
528
df7df328
TS
5292005-03-17 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
530
531 * trans-array.c (gfc_trans_static_array_pointer,
532 get_array_ctor_var_strlen, gfc_conv_array_index_offset): Fix
533 comment and formatting typos.
534
d3ec5cb6
FXC
5352005-03-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
536
537 * invoke.texi: Fix typos.
538
a1286ef5
ZW
5392005-03-15 Zack Weinberg <zack@codesourcery.com>
540
541 * Make-lang.in (GFORTRAN_TEXI): Add gcc-vers.texi.
542
223c8158
FW
5432005-03-15 Feng Wang <fengwang@nudt.edu.cn>
544
545 * trans-stmt.c (gfc_trans_label_assign): Don't set DECL_ARTIFICIAL flag
546 to zero on label_tree.
547
ce2df7c6
FW
5482005-03-15 Feng Wang <fengwang@nudt.edu.cn>
549
550 PR fortran/18827
551 * io.c (resolve_tag): Add checking on assigned label.
552 (match_dt_format): Does not set symbol assign attribute.
553 * match.c (gfc_match_goto):Does not set symbol assign attribute.
554 * resolve.c (resolve_code): Add checking on assigned label.
555 * trans-common.c (build_field): Deals with common variable assigned
556 a label.
557 * trans-stmt.c (gfc_conv_label_variable): New function.
558 (gfc_trans_label_assign): Use it.
559 (gfc_trans_goto): Ditto.
560 * trans-io.c (set_string): Ditto.
561 * trans.h (gfc_conv_label_variable): Add prototype.
562
2bb02bf0
TS
5632005-03-14 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
564
565 PR fortran/20467
566 * symbol.c (check_conflict): A dummy argument can't be a statement
567 function.
568
f1b19062
ZD
5692005-03-14 Zdenek Dvorak <dvorakz@suse.cz>
570
571 * fortran/trans-intrinsic.c (gfc_conv_intrinsic_ishft): Convert
572 the argument of the shift to the unsigned type.
573
ee943062
TS
5742005-03-13 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
575
576 PR fortran/16907
577 * resolve.c (gfc_resolve_index): Allow REAL indices as an extension.
578
8f9c06ca
TS
5792005-03-13 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
580
581 PR fortran/20323
582 * resolve.c (gfc_resolve): Check if character lengths are
583 specification expressions.
584
bae88af6
TS
5852005-03-12 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
586
587 PR fortran/20361
588 * trans-array.c (gfc_stack_space_left): Remove unused variable.
589 (gfc_can_put_var_on_stack): Move to trans-decl.c, remove #if 0'ed
590 code.
591 * trans-array.h (gfc_stack_space_left, gfc_can_put_var_on_stack):
592 Remove declaration / prototype.
593 * trans-common.c (build_equiv_decl): Give union a name. Check if
594 it can be put on the stack.
595 * trans-decl.c (gfc_stack_space_left): Move function here.
596 (gfc_build_qualified_array): Fix comment typo.
597 * trans.h (gfc_put_var_on_stack): Add prototype.
598
5f42ddb0
KG
5992005-03-11 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
600
601 * Make-lang.in (fortran-warn): Set to $(STRICT_WARN) -Wno-error.
602 * decl.c, trans.c: Don't use C++ style comments.
603 * gfortran.h (sym_flavor, procedure_type, sym_intent, gfc_access,
604 ifsrc): Give names to enums and use ENUM_BITFIELD.
605 (gfc_access): Remove trailing comma.
606
87ebdf2f
SK
6072005-03-05 Steven G. Kargl <kargls@comcast.net>
608
609 PR 19936
610 * primary.c (match_complex_constant): Mangled complex constant may
611 be an implied do-loop. Give implied do-loop matcher a chance.
612
a1286ef5 6132005-03-05 Steven G. Kargl <kargls@comcast.net>
2c5ed587
SK
614
615 PR fortran/19754
616 * resolve.c (compare_shapes): New function.
617 (resolve_operator): Use it.
618
19db01bb
TS
6192005-03-05 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
620
621 * trans-const.c (gfc_conv_constant_to_tree): Use correct tree
622 type for COMPLEX constants.
623
3852e8b8
TS
6242005-03-04 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
625
626 PR fortran/19673
627 * trans-expr.c (gfc_conv_function_call): Correctly dereference
628 argument from a pointer function also if it has a result clause.
629
6302005-03-04 Steven G. Kargl <kargls@comcast.net>
37e860a2
SK
631
632 * expr.c (gfc_copy_shape_excluding): Change && to ||.
633
4b9b6210
TS
6342005-03-04 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
635
636 * trans-intrinsic.c (gfc_get_symbol_for_expr): Fix comment typo,
637 clarify comment.
638
2a4a7830
TS
6392005-02-28 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
640 (port from g95)
641
642 PR fortran/19479
643 * simplify.c (gfc_simplify_bound): Rename to ...
644 (simplify_bound): ... this and overhaul.
645
d436d3de
SK
6462005-02-28 Steven G. Kargl <kargl@gcc.gnu.org>
647
648 * trans-intrinsic.c (gfc_conv_intrinsic_iargc): remove boolean argument.
649 (gfc_conv_intrinsic_function): update function calls
650
f4e7375a
SK
6512005-02-27 Steven G. Kargl <kargl@gcc.gnu.org>
652
653 PR fortran/20058
654 * trans-types.c (gfc_max_integer_kind): Declare
655 (gfc_init_kinds): Initialize it.
656 * gfortran.h (gfc_max_integer_kind): extern it.
657 * primary.c (match_boz_constant): Use it; remove gfortran extension
658 of kind suffixes on BOZ literal constants
659
660
5a95dfde
SK
6612005-02-27 Steven G. Kargl <kargls@comcast.net>
662
663 * arith.c (gfc_check_real_range): Remove multiple returns
664 (check_result): New function.
665 (gfc_arith_uminus,gfc_arith_plus,gfc_arith_times,
666 gfc_arith_divide,gfc_arith_power,gfc_arith_minus): Use it.
667
668
2054fc29
VR
6692005-02-24 Volker Reichelt <reichelt@igpm.rwth-aachen.de>
670
671 * decl.c, resolve.c, trans-array.c, trans.h: Fix comment typo(s).
672
9c6a7ecc
TS
673
6742005-02-24 Tobias Schl"uter <tobias.schlueter@physik.uni-meunchen.de>
675
676 Unrevert previously reverted patch. Adding this fix:
677 * module.c (find_true_name): Deal with NULL module.
678
f5e9e99c
TS
6792005-02-24 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
680
681 Revert yesterday's patch:
682 2005-02-23 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
683
684 * gfortran.h (gfc_component, gfc_actual_arglist, ...
685 ... argument. Copy string instead of pointing to it.
686
0366dfe9
TS
6872005-02-23 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
688
689 * gfortran.h (gfc_get_namespace): Add second argument to prototype.
690 * intrinsic.c (gfc_intrinsic_init_1): Pass second argument to
691 gfc_get_namespace.
692 * module.c (mio_namespace_ref, load_needed): Likewise.
693 * parse.c (parse_interface, parse_contained): Likewise. Here the
694 correct second argument matters.
695 * symbol.c (gfc_get_namespace): Add parent_types argument, only copy
696 parent's implicit types if this is set.
697 (gfc_symbol_init_2): Pass second argument to gfc_get_namespace.
698 * trans-common.c (build_common_decl): Likewise.
699
d1303acd
TS
700 * gfortran.h (symbol_attribute): New 'untyped' field, fix comment
701 formatting.
702 * symbol.c (gfc_set_default_type): Issue error only once, by setting
703 and checking 'untyped' attribute.
704
58b03ab2
TS
705 * gfortran.h (gfc_expr): Move 'operator', 'op1', 'op2', and 'uop'
706 fields into new struct 'op' inside the 'value' union.
707 * arith.c (eval_intrinsic): Adapt all users.
708 * dependency.c (gfc_check_dependency): Likewise.
709 * dump-parse-tree.c (gfc_show_expr): Likewise.
710 * expr.c (gfc_get_expr): Don't clear removed fields.
711 (free_expr0, gfc_copy_expr, gfc_type_convert_binary,
712 gfc_is_constant_expr, simplify_intrinsic_op, check_init_expr,
713 check_intrinsic_op): Adapt to new field names.
714 * interface.c (gfc_extend_expr): Likewise. Also explicitly
715 nullify 'esym' and 'isym' fields of new function call.
716 * iresolve.c (gfc_resolve_dot_product, gfc_resolve_matmul):
717 Adapt to renamed structure fields.
718 * matchexp.c (build_node, match_level_1, match_expr): Likewise.
719 * module.c (mio_expr): Likewise.
720 * resolve.c (resolve_operator): Likewise.
721 (gfc_find_forall_index): Likewise. Only look through operands
722 if dealing with EXPR_OP
723 * trans-array.c (gfc_walk_op_expr): Adapt to renamed fields.
724 * trans-expr.c (gfc_conv_unary_op, gfc_conv_power_op,
725 gfc_conv_concat_op, gfc_conv_expr_op): Likewise.
726
f5e9e99c 727 [ Reverted ]
e9444bd5
TS
728 * gfortran.h (gfc_component, gfc_actual_arglist, gfc_user_op): Make
729 'name' a 'const char *'.
730 (gfc_symbol): Likewise, also for 'module'.
731 (gfc_symtree): Make 'name' a 'const char *'.
732 (gfc_intrinsic_sym): Likewise, also for 'lib_name'.
733 (gfc_get_gsymbol, gfc_find_gsymbol): Add 'const' qualifier to
734 'char *' argument.
735 (gfc_intrinsic_symbol): Use 'gfc_get_string' instead of 'strcpy' to
736 initialize 'SYM->module'.
737 * check.c (gfc_check_minloc_maxloc, check_reduction): Check for NULL
738 pointer instead of empty string.
739 * dump-parse-tree.c (gfc_show_actual_arglist): Likewise.
740 * interface.c (gfc_compare_types): Adapt check to account for possible
741 NULL pointer.
742 (compare_actual_formal): Check for NULL pointer instead of empty
743 string.
744 * intrinsic.c (gfc_current_intrinsic, gfc_current_intrinsic_arg):
a1286ef5 745 Add 'const' qualifier.
e9444bd5
TS
746 (conv_name): Return a heap allocated string.
747 (find_conv): Add 'const' qualifier to 'target'.
748 (add_sym): Use 'gfc_get_string' instead of 'strcpy'.
749 (make_generic): Check for NULL pointer instead of empty string.
750 (make_alias): Use 'gfc_get_string' instead of 'strcpy'.
751 (add_conv): No need to strcpy result from 'conv_name'.
752 (sort_actual): Check for NULL pointer instead of empty string.
753 * intrinsic.h (gfc_current_intrinsic, gfc_current_intrinsic_arg):
754 Adapt prototype.
755 * module.c (compare_true_names): Compare pointers instead of strings
756 for 'module' member.
757 (find_true_name): Initialize string fields with gfc_get_string.
758 (mio_pool_string): New function.
759 (mio_internal_string): Adapt comment.
760 (mio_component_ref, mio_component, mio_actual_arg): Use
761 'mio_pool_string' instead of 'mio_internal_string'.
762 (mio_symbol_interface): Add 'const' qualifier to string arguments.
763 Add level of indirection. Use 'mio_pool_string' instead of
764 'mio_internal_string'.
765 (load_needed, read_module): Use 'gfc_get_string' instead of 'strcpy'.
766 (write_common, write_symbol): Use 'mio_pool_string' instead of
767 'mio_internal_string'.
768 (write_symbol0, write_symbol1): Likewise, also check for NULL pointer
769 instead of empty string.
770 (write_operator, write_generic): Pass correct type variable to
771 'mio_symbol_interface'.
772 (write_symtree): Use 'mio_pool_string' instead of
773 'mio_internal_string'.
774 * primary.c (match_keyword_arg): Adapt check to possible
775 case of NULL pointer. Use 'gfc_get_string' instead of 'strcpy'.
776 * symbol.c (gfc_add_component, gfc_new_symtree, delete_symtree,
777 gfc_get_uop, gfc_new_symbol): Use 'gfc_get_string' instead of
778 'strcpy'.
779 (ambiguous_symbol): Check for NULL pointer instead of empty string.
780 (gfc_find_gsymbol, gfc_get_gsymbol): Add 'const' qualifier on string
781 arguments.
782 * trans-array.c (gfc_trans_auto_array_allocation): Check for NULL
783 pointer instead of empty string.
784 * trans-decl.c (gfc_sym_mangled_identifier,
785 gfc_sym_mangled_function_id, gfc_finish_var_decl, gfc_get_symbol_decl,
786 gfc_get_symbol_decl): Likewise.
787 * trans-io.c (gfc_new_nml_name_expr): Add 'const' qualifier to
788 argument. Copy string instead of pointing to it.
789
f439764f
KH
7902005-02-23 Kazu Hirata <kazu@cs.umass.edu>
791
792 * intrinsic.h, st.c: Update copyright.
793
eebc3ee0
SK
7942005-02-20 Steven G. Kargl <kargls@comcast.net>
795
796 * symbol.c: Typos in comments.
797
687fcae7
SK
7982005-02-20 Steven G. Kargl <kargls@comcast.net>
799
800 * expr.c (gfc_type_convert_binary): Typo in comment.
801
145cf79b 8022005-02-19 Steven G. Kargl <kargls@comcast.net>
a1286ef5 803
145cf79b
SK
804 * check.c (gfc_check_selected_int_kind): New function.
805 * intrinsic.h: Prototype it.
806 * intrinsic.c (add_function): Use it.
807 * simplify (gfc_simplify_ceiling,gfc_simplify_floor): Change
808 BT_REAL to BT_INTEGER and use gfc_default_integer_kind.
809
c60d77d4 8102005-02-19 Steven G. Kargl <kargls@comcast.net>
a1286ef5 811
c60d77d4
SK
812 * check.c (gfc_check_int): improve checking of optional kind
813 * simplify.c (gfc_simplify_int): Change BT_REAL to BT_INTEGER
814
332e7efe 8152005-02-19 Steven G. Kargl <kargls@comcast.net>
a1286ef5 816
332e7efe
SK
817 * check.c (gfc_check_achar): New function
818 * intrinsic.h: Prototype it.
819 * intrinsic.c (add_function): Use it.
820
1ac26262
TS
8212005-02-13 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
822
823 * trans-stmt.c (generate_loop_for_temp_to_lhs,
824 generate_loop_for_rhs_to_temp): Remove if whose condition is
825 always true.
826
1e6283cb
TS
8272005-02-12 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
828
829 * symbol.c (gfc_use_ha_derived): Remove, fold functionality into ...
830 (gfc_use_derived): ... this function.
831
c6a912da
RH
8322005-02-09 Richard Henderson <rth@redhat.com>
833
834 * f95-lang.c (gfc_init_builtin_functions): Call
835 build_common_builtin_nodes; do not define any functions handled
836 by it.
837
eac33acc
TS
8382005-02-08 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
839
840 * expr.c (gfc_copy_expr): Don't copy 'op1' and 'op2' for
841 EXPR_SUBSTRING.
842 (gfc_is_constant_expr): Check 'ref' to determine if substring
843 reference is constant.
844 (gfc_simplify_expr): Simplify 'ref' instead of 'op1' and 'op2'.
845 (check_init_expr, check_restricted): Check 'ref' instead of 'op1'
846 and 'op2'.
847 * module.c (mio_expr): Read / write 'ref' instead of 'op1' and 'op2'.
848
231b2fcc
TS
8492005-02-07 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
850
851 * gfortran.h (gfc_add_dimension, gfc_add_result, gfc_add_save,
852 gfc_add_dummy, gfc_add_generic, gfc_add_in_common, gfc_add_data,
853 gfc_add_in_namelist, gfc_add_sequence, gfc_add_function,
854 gfc_add_subroutine, gfc_add_access, gfc_add_flavor, gfc_add_entry,
855 gfc_add_procedure): Add argument.
856 * array.c (gfc_set_array_spec), decl.c (var_element, get_proc_name,
857 gfc_match_null, match_type_spec, match_attr_spec,
858 gfc_match_formal_arglist, match_result, gfc_match_function_decl):
859 Update callers to match.
860 (gfc_match_entry) : Likewise, fix comment typo.
861 (gfc_match_subroutine, attr_decl1, gfc_add_dimension,
862 access_attr_decl, do_parm, gfc_match_save, gfc_match_modproc,
863 gfc_match_derived_decl): Update callers.
864 * interface.c (gfc_match_interface): Likewise.
865 * match.c (gfc_match_label, gfc_add_flavor,
866 gfc_match_call, gfc_match_common, gfc_match_block_data,
867 gfc_match_namelist, gfc_match_module, gfc_match_st_function):
868 Likewise.
869 * parse.c (parse_derived, parse_interface, parse_contained),
870 primary.c (gfc_match_rvalue, gfc_match_variable): Likewise.
871 * resolve.c (resolve_formal_arglist, resolve_entries): Update callers.
872 * symbol.c (check_conflict, check_used): Add new 'name' argument,
873 use when printing error message.
874 (gfc_add_dimension, gfc_add_result, gfc_add_save, gfc_add_dummy,
875 gfc_add_generic, gfc_add_in_common, gfc_add_data,
876 gfc_add_in_namelist, gfc_add_sequence, gfc_add_function,
877 gfc_add_subroutine, gfc_add_access, gfc_add_flavor, gfc_add_entry,
878 gfc_add_procedure): Add new 'name' argument. Pass along to
879 check_conflict and check_used.
880 (gfc_add_allocatable, gfc_add_external, gfc_add_intrinsic,
881 gfc_add_optional, gfc_add_pointer, gfc_add_target, gfc_add_elemental,
882 gfc_add_pure, gfc_add_recursive, gfc_add_intent,
883 gfc_add_explicit_interface, gfc_copy_attr): Pass NULL for new
884 argument in calls to any of the modified functions.
885
706bb773
JM
8862005-02-06 Joseph S. Myers <joseph@codesourcery.com>
887
888 * gfortran.texi: Don't give last update date.
889
61e067cc
RH
8902006-01-30 Richard Henderson <rth@redhat.com>
891
892 * options.c (gfc_init_options): Zero flag_errno_math.
893
985aff9c
PB
8942005-01-29 Paul Brook <paul@codesourcery.com>
895
896 PR fortran/18565
897 * check.c (real_or_complex_check): New function.
898 (gfc_check_fn_c, gfc_check_fn_r, gfc_check_fn_rc): New functions.
899 * intrinsic.c (add_functions): Use new check functions.
900 * intrinsic.h (gfc_check_fn_c, gfc_check_fn_r, gfc_check_fn_rc):
901 Add prototypes.
902
f240b896
SK
9032005-01-29 Steven G. Kargl <kargls@comcast.net>
904
905 PR fortran/19589
906 * expr.c (gfc_check_assign): Check for conformance of logical operands
907
c006df4e
SB
9082004-01-27 Steven Bosscher <stevenb@suse.de>
909
910 * trans-decl.c (gfc_build_label_decl): Set DECL_ARTIFICAL and
911 TREE_USED for all labels.
912 (gfc_trans_entry_master_switch): Use it instead of building a
913 label by hand.
914 * trans-io.c (add_case): Likewise.
915 * trans-stmt.c (gfc_trans_integer_select): Likewise.
916
69029c61
PB
9172004-01-23 Paul Brook <paul@codesourcery.com>
918 Steven G. Kargl <kargls@comcast.net>
919
920 PR fortran/17941
921 * arith.c (gfc_convert_real): Remove sign handling.
922 * primary.c (match_digits): Allow whitespace after initial sign.
923 (match_real_const): Handle signs here. Allow whitespace after
924 initial sign. Remove dead code.
925 (match_const_complex_part): Remove.
926 (match_complex_part): Use match_{real,integer}_const.
927 (match_complex_constant): Cross-promote integer types.
928
58757957
JM
9292005-01-23 James A. Morrison <phython@gcc.gnu.org>
930
931 PR fortran/19294
932 * iresolve.c (gfc_resolve_transpose): Resolve to transpose_c4 or
933 transpose_c8 for complex types.
934
e7dc5b4f
KH
9352005-01-23 Kazu Hirata <kazu@cs.umass.edu>
936
937 * data.c, dependency.c, f95-lang.c, io.c, trans-array.c,
938 trans-decl.c, trans-expr.c, trans-intrinsic.c, trans-io.c,
939 trans-stmt.c, trans-types.c, trans.h: Fix comment typos.
940 Follow spelling conventions.
941
dae24534
BD
9422005-01-22 Bud Davis <bdavis9659@comcast.net>
943
944 PR fortran/19313
945 * trans-io.c (gfc_trans_inquire): Added code to support
946 pad.
947
19060788
SK
9482005-01-22 Steven G. Kargl <kargls@comcast.net>
949
a1286ef5 950 * intrinsic.c (make_alias): Add standard argument.
19060788
SK
951 (add_functions): Update make_alias calls.
952
1438a8c9
PB
9532005-01-22 Paul Brook <paul@codesourcery.com>
954
955 * trans-expr.c (gfc_conv_function_call): Remove bogus TODO.
956
af30f793
PB
9572005-01-22 Paul Brook <paul@codesourcery.com>
958
959 * gfortran.h (gfc_check_access): Add prototype.
960 * match.c (gfc_match_namelist): Remove TODO.
961 * module.c (check_access): Rename ...
962 (gfc_check_access): ... to this. Boolify. Update callers.
963 * resolve.c (resolve_symbol): Check for private objects in public
964 namelists.
965
0dd973dd
PB
9662005-01-22 Paul Brook <paul@codesourcery.com>
967
968 * primary.c (gfc_match_rvalue): Only apply implicit type if variable
969 does not have an explicit type.
970 (gfc_match_variable): Resolve implicit derived types in all cases.
971 Resolve contained function types from their own namespace, not the
972 parent.
973 * resolve.c (resolve_contained_fntype): Remove duplicate sym->result
974 checking. Resolve from the contained namespace, not the parent.
975
6ba692b4
TS
9762005-01-22 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
977
978 PR fortran/19543
979 * trans-const.c (gfc_conv_constant_to_tree): Give logical
980 constants the correct type.
981
b8d5e926
TS
982 PR fortran/19194
983 * trans-io.c (ADD_STRING): Use gfc_charlen_type_node for string
984 length parameters.
985 (gfc_build_io_library_fndecls): 'rec' and 'recl_in' are not
986 pointer fields.
987
ec378180
KH
9882005-01-18 Kazu Hirata <kazu@cs.umass.edu>
989
990 * arith.c, array.c, check.c, decl.c, expr.c, f95-lang.c,
991 gfortran.h, interface.c, intrinsic.c, io.c, iresolve.c,
992 match.c, matchexp.c, misc.c, module.c, options.c, parse.c,
993 scanner.c, simplify.c, symbol.c, trans-array.c, trans-expr.c,
994 trans-io.c, trans-stmt.c, trans.c: Update copyright.
995
33d4098d
SB
9962005-01-17 Ira Rosen <irar@il.ibm.com>
997
998 * f95-lang.c (gfc_init_builtin_functions): Call targetm.init_builtins.
999
dfbb4318
TS
10002005-01-16 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1001
1002 PR fortran/19182
1003 * error.c (error_char): Line-buffer errors / warnings.
1004
de46b505
TS
10052005-01-16 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1006
1007 * trans-intrinsic.c (gfc_conv_intrinsic_ishft): Fix signed /
1008 unsigned issue. Use build_int_cst instead of converting
1009 integer_zero_node. Remove unnecessary conversion.
1010
5e3b8727
TS
1011 * trans-types.c (gfc_get_character_type_len): : Use
1012 gfc_charlen_type_node as basic type for the range field.
1013
e805a599
TS
1014 * trans-intrinsic.c (build_fixbound_expr,
1015 gfc_conv_intrinsic_bound, gfc_conv_intrinsic_anyall,
1016 gfc_conv_intrinsic_count, gfc_conv_intrinsic_btest,
1017 gfc_conv_intrinsic_singlebitop): Use 'build_int_cst' instead
1018 of converting 'integer_zero_node' or 'integer_one_node'
1019 respectively.
1020 (gfc_conv_intrinsic_ishftc): Same, but store in local variable to
1021 evade re-building.
1022 (gfc_conv_intrinsic_strcmp, gfc_conv_intrinsic_rrspacing,
1023 gfc_conv_intrinsic_trim, gfc_conv_intrinsic_iargc): Use
1024 'build_int_cst' instead of converting 'integer_zero_node' or
1025 'integer_one_node' respectively.
0da87370
TS
1026
1027 * trans-intrinsic.c (gfc_conv_intrinsic_index,
1028 gfc_conv_intrinsic_scan, gfc_conv_intrinsic_verify): Remove
1029 'gfc'-prefix from local variable, remove dead code, use correct
1030 type when inserting argument.
1031
ef1b6bcd
TS
1032 * trans-intrinsic.c, trans-types.c: Update copyright years.
1033
5352b89f
SK
10342005-01-16 Steven G. Kargl <kargls@comcast.net>
1035
1036 PR 19168
1037 * resolve.c (check_case_overlap): Typo in comment.
1038 (validate_case_label_expr): Fix up kinds of case values
1039 (resolve_select): Properly handle kind mismatches.
1040
36c028f6
PB
10412004-01-16 Paul Brook <paul@codesourcery.com>
1042
1043 PR fortran/17675
1044 * trans-common.c (translate_common): Remove duplicate function call.
1045 (finish_equivalences): Preserve alignment when biasing offsets.
1046
da8309c6
TS
10472005-01-15 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de
1048
1049 * primary.c (check_digit): Call 'ISXDIGIT' instead of assuming
1050 ASCII-like character encoding.
1051
c224550f
SK
10522005-01-14 Steven G. Kargl <kargls@comcast.net>
1053
1054 * resolve.c (compare_case): Cleanup.
1055
6e06dac5
SK
10562005-01-14 Steven G. Kargl <kargls@comcast.net>
1057
1058 * resolve.c (compare_case): Give arguments correct type.
1059
43a5ef69
KH
10602005-01-13 Kazu Hirata <kazu@cs.umass.edu>
1061
1062 * iresolve.c, trans-common.c, trans-types.c: Fix comment
1063 typos.
1064
832ef1ce
PB
10652005-01-09 Paul Brook <paul@codesourcery.com>
1066
1067 PR fortran/17675
1068 * trans-common.c (current_common, current_offset): Remove.
1069 (create_common): Add head argument.
1070 (align_segment): New function.
1071 (apply_segment_offset): New function.
1072 (translate_common): Merge code from new_segment. Handle alignment.
1073 (new_segment): Remove.
1074 (finish_equivalences): Ensure proper alignment.
1075
92574caf
TS
10762005-01-08 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1077
1078 * trans-const.c: Don't include unused math.h.
1079
b36cd00b
TS
1080 * trans-intrinsic.c (gfc_get_intrinsic_lib_fndecl,
1081 gfc_conv_intrinsic_bound, gfc_conv_intrinsic_minmaxloc,
1082 gfc_conv_intrinsic_ishft, gfc_conv_intrinsic_len): Remove
1083 trailing whitespace.
1084 (prepare_arg_info): Fix formatting, indenting and remove trailing
1085 whitespace.
1086 (gfc_conv_intrinsic_spacing, gfc_conv_intrinsic_trim): Remove
27dfc9c4
TS
1087 trailing whitespace.
1088
1089 * arith.c (arctangent2, gfc_arith_init_1, gfc_arith_done_1,
1090 gfc_constant_result, gfc_range_check, gfc_arith_power,
1091 eval_type_intrinsic0, eval_intrinsic_f2, gfc_real2real,
1092 gfc_real2complex, gfc_complex2int, gfc_complex2real,
1093 gfc_complex2complex): Fix whitespace issues.
e6edaeb2 1094 * check.c (must_be, type_check, numeric_check, int_or_real_check,
27dfc9c4
TS
1095 logical_array_check, array_check, scalar_check, nonoptional_check,
1096 variable_check, dim_check, check_a_kind, gfc_check_a_ikind,
1097 gfc_check_a_xkind, gfc_check_abs, gfc_check_all_any,
1098 gfc_check_allocated, gfc_check_a_p, gfc_check_besn,
1099 gfc_check_btest, gfc_check_char, gfc_check_cmplx, gfc_check_count,
1100 gfc_check_cshift, gfc_check_dcmplx, gfc_check_dble,
1101 gfc_check_digits, gfc_check_dot_product, gfc_check_eoshift,
1102 gfc_check_fnum, gfc_check_g77_math1, gfc_check_huge, gfc_check_i,
1103 gfc_check_iand, gfc_check_ibclr, gfc_check_ibits, gfc_check_ibset,
1104 gfc_check_idnint, gfc_check_ieor, gfc_check_index, gfc_check_int,
1105 gfc_check_ior, gfc_check_ishft, gfc_check_ishftc, gfc_check_kind,
1106 gfc_check_lbound, gfc_check_logical, min_max_args,
1107 gfc_check_min_max_integer, gfc_check_min_max_real,
1108 gfc_check_min_max_double, gfc_check_matmul,
1109 gfc_check_minval_maxval, gfc_check_merge, gfc_check_nearest,
1110 gfc_check_pack, gfc_check_precision, gfc_check_radix,
1111 gfc_check_range, gfc_check_real, gfc_check_repeat,
1112 gfc_check_scale, gfc_check_scan, gfc_check_selected_real_kind,
1113 gfc_check_set_exponent): Fix formatting issues.
1114 (gfc_check_size, gfc_check_sign): Alphabetize function order,
1115 remove whitespace-only line.
1116 (gfc_check_fstat, gfc_check_fstat_sub, gfc_check_stat,
1117 gfc_check_stat_sub, gfc_check_transfer, gfc_check_transpose,
1118 gfc_check_ubound, gfc_check_unpack, gfc_check_verify, gfc_check_x,
1119 gfc_check_cpu_time, gfc_check_date_and_time, gfc_check_mvbits,
1120 gfc_check_random_number, gfc_check_random_seed,
1121 gfc_check_second_sub, gfc_check_system_clock,
1122 gfc_check_getcwd_sub, gfc_check_exit, gfc_check_flush,
1123 gfc_check_umask, gfc_check_umask_sub, gfc_check_unlink,
1124 gfc_check_unlink_sub): Fix formatting issues.
a1286ef5 1125
779fae71
TS
11262005-01-08 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1127
1128 * gfortran.h: Remove outdated comment. Don't include stdio.h
1129 explicitly.
1130
12d3e34b
TS
11312005-01-06 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1132
1133 * gfortranspec.c (lang_specific_driver): Change year to 2005 in
1134 output of 'gfortran --version'.
1135
d22e4895
SK
11362005-01-03 Steven G. Kargl <kargls@comcast.net>
1137
1138 * arith.c: Add system.h; remove string.h
1139 * decl.c: Ditto
1140 * matchexp.c: Ditto
1141 * parse.c: Ditto
1142 * resolve.c: Ditto
1143 * st.c: Ditto
1144 * check.c: Remove stdlib.h and stdarg.h
1145 * error.c: Remove stdlib.h, stdarg.h, stdio.h, string.h
1146 * expr.c: Add system.h; remove stdarg.h, stdio.h, and string.h
1147 * f95-lang.c: Add system.h; remove stdio.h
1148 * interface.c: Add system.h; remove stdlib.h and string.h
1149 * intrinsic.c: Remove stdarg.h, stdio.h, and string.h
1150 * io.c: Remove string.h
1151 * simplify.c: Ditto
1152 * match.c: Remove stdarg.h and string.h
1153 * misc.c: Update copyright; add system.h; remove stdlib.h,
1154 string.h, and sys/stat.h
1155 * module.c: Add system.h; remove string.h, stdio.h, errno.h,
1156 unistd.h, and time.h
1157 * option.c: Remove string.h and stdlib.h
1158 * primary.c: Ditto
1159 * scanner.c: Update copyright; add system.h; remove stdlib.h,
1160 stdio.h, string.h, and strings.h
1161 * symbol.c: Add system.h; remove stdlib.h, stdio.h, and string.h
1162 * trans-array.c: Remove stdio.h and gmp.h
1163 * trans-const.c: Ditto
1164 * trans-expr.c: Ditto
1165 * trans-io.c: Ditto
1166 * trans-stmt.c: Ditto
1167 * trans.c: Ditto
1168 * trans-intrinsic.c: Remove stdio.h and string.h
1169
410d1a45
SK
11702004-12-29 Steven G. Kargl <kargls@comcast.net>
1171
1172 * gfortran.h (gfc_case): fix typo in comment.
1173
a1286ef5 11742004-12-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
56746a07
TS
1175
1176 * trans-intrinsic.c (gfc_conv_intrinsic_ishft): Change to
1177 logical shift. Call fold. Remove 0-bit shift shortcut.
1178 (gfc_conv_intrinsic_ishftc): Convert first argument to at least
1179 4 bytes bits. Convert 2nd and 3rd argument to 4 bytes. Convert
1180 result if width(arg 1) < 4 bytes. Call fold.
1181
e98a8b5b
TS
1182 PR fortran/19032
1183 * trans-intrinsic.c (gfc_conv_intrinsic_mod): Update comment
1184 in front of function to match the standard. Correct handling
1185 of MODULO.
1186
11872004-12-27 Andrew Pinski <pinskia@physics.uc.edu>
1188
1189 * trans-expr.c (gfc_conv_cst_int_power): Only check for
1190 flag_unsafe_math_optimizations if we have a float type.
1191
f300468a
SK
11922004-12-23 Steven G. Kargl <kargls@comcast.net>
1193
1194 * gfortran.texi: Fix typo.
1195
4fdb5c71
TS
11962004-12-16 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1197
1198 * trans-intrinsic.c (build_fixbound_expr): Clarify comment, fix
1199 comment typo.
1200
172b8799
TS
12012004-12-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1202
1203 PR fortran/18993
1204 * match.c (gfc_match_if): Don't explicitly skip optional whitespace.
1205 (gfc_match_nullify): Make sure that ')' is in front of the end of
1206 statement.
1207
e2435498
TS
1208 * scanner.c (skip_fixed_comments): Fix typo in comment preceding
1209 function.
1210
6b25a558
RH
12112004-12-14 Richard Henderson <rth@redhat.com>
1212
1213 * gfortran.h (gfc_expr.function.name): Make const.
1214 (gfc_iresolve_init_1, gfc_iresolve_done_1): Remove.
1215 (gfc_get_string): Update prototype.
1216 * iresolve.c: Include tree.h.
1217 (string_node, HASH_SIZE, string_head, hash): Remove.
1218 (gfc_get_string): Use vsnprintf, get_identifier.
1219 (free_strings, gfc_iresolve_init_1, gfc_iresolve_done_1): Remove.
1220 * misc.c (gfc_init_1): Don't call gfc_iresolve_init_1.
1221 (gfc_done_1): Don't call gfc_iresolve_done_1.
1222 * module.c (mio_allocated_string): Take and return const char *,
1223 instead of modifying char**.
1224 (mio_expr): Update to match.
1225 * resolve.c (pure_function): Constify name argument.
1226 (resolve_function): Constify name.
1227 * trans-intrinsic.c (gfc_conv_intrinsic_function): Likewise.
1228
7f68c75f
RH
12292004-12-12 Richard Henderson <rth@redhat.com>
1230
1231 * iresolve.c (gfc_resolve_all, gfc_resolve_any, gfc_resolve_count,
1232 gfc_resolve_cshift, gfc_resolve_dot_product, gfc_resolve_eoshift,
1233 gfc_resolve_matmul, gfc_resolve_maxloc, gfc_resolve_maxval,
1234 gfc_resolve_minloc, gfc_resolve_minval, gfc_resolve_pack,
1235 gfc_resolve_product, gfc_resolve_reshape, gfc_resolve_shape,
1236 gfc_resolve_spread, gfc_resolve_sum, gfc_resolve_transpose,
1237 gfc_resolve_unpack: Use PREFIX.
1238
23acf4d4
TS
12392004-12-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1240
1241 PR fortran/18869
1242 * match.c (gfc_match_common): Skip whitespace.
1243
c3d003d2
SK
12442004-12-12 Steven G. Kargl <kargls@comcast.net>
1245
1246 PR fortran/16581
1247 * check.c (gfc_check_iand, gfc_check_ibclr, gfc_check_ibits,
1248 gfc_check_ibset, gfc_check_ieor, gfc_check_ior): Remove default
1249 integer kind check; Issue error for -std=f95 when needed.
1250 * intrinsic.c (add_functions): Change ieor from GFC_STD_GNU to
1251 GFC_STD_F95.
1252 * iresolve.c (gfc_resolve_iand, gfc_resolve_ieor, gfc_resolve_ior):
1253 Promote arguments to same kind.
1254
8d5cfa27
SK
12552004-12-12 Steven G. Kargl <kargls@comcast.net>
1256 Paul Brook <paul@codesourcery.com>
1257
1258 PR fortran/16222
1259 * resolve.c (gfc_resolve_iterator_expr): New function.
1260 (gfc_resolve_iterator): Use it. Add real_ok argument. Convert
1261 start, end and stride to correct type.
1262 (resolve_code): Pass extra argument.
1263 * array.c (resolve_array_list): Pass extra argument.
1264 * gfortran.h (gfc_resolve): Add prototype.
1265 * trans-stmt.c (gfc_trans_do): Remove redundant type conversions.
1266 Handle real type iterators.
1267
6ee42e01 12682004-12-11 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
49e4d580
TS
1269
1270 PR fortran/17175
1271 * iresolve.c (gfc_resolve_scale): Convert 'I' argument if not of
1272 same kind as C's 'int'.
6ee42e01 1273 (gfc_resolve_set_exponent): Convert 'I' argument if not of kind 4.
49e4d580 1274
323c74da
RH
12752004-12-08 Richard Henderson <rth@redhat.com>
1276
1277 * intrinsic.c (gfc_convert_type_warn): Propagate the input shape
1278 to the output expression.
1279 * iresolve.c (gfc_resolve_cshift, gfc_resolve_eoshift): Suppress
1280 warning conversion.
1281 (gfc_resolve_reshape): Force convert SHAPE and ORDER parameters
1282 to index kind.
1283
40f2165e
TS
12842004-12-08 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1285
baa8edda 1286 PR fortran/18826
40f2165e
TS
1287 * resolve.c (resolve_code): Impose correct restrictions on
1288 assigned variable.
1289
59ce85b5
TS
1290 * decl.c (gfc_match_end): Use locus of END when eos is an error.
1291
df65f093
SK
12922004-12-02 Steven G. Kargl <kargls@comcast.net>
1293 Paul Brook <paul@codesourcery.com>
1294
1295 * check.c (gfc_check_flush, gfc_check_fnum): New functions.
1296 (gfc_check_fstat, gfc_check_fstat_sub): New functions.
1297 (gfc_check_stat, gfc_check_stat_sub): New functions.
1298 * gfortran.h (GFC_ISYM_FNUM,GFC_ISYM_FSTAT,GFC_ISYM_STAT): New symbols
1299 * intrinsic.c (add_functions,add_subroutines): Add flush, fnum,
1300 fstat, and stat to intrinsics symbol tables.
1301 * intrinsic.h (gfc_check_flush, gfc_resolve_stat_sub): Add prototypes.
1302 (gfc_resolve_fstat_sub, gfc_resolve_stat): Ditto.
1303 * iresolve.c (gfc_resolve_fnum, gfc_resolve_fstat): New functions.
1304 (gfc_resolve_stat, gfc_resolve_flush): New functions.
1305 (gfc_resolve_stat_sub,gfc_resolve_fstat_sub): New functions
1306 * trans-intrinsic.c (gfc_conv_intrinsic_function): Add new intrinsics.
1307
1270d633
SK
13082004-12-02 Steven G. Kargl <kargls@comcast.net>
1309
1310 * intrinsic.c: Fix and add comments, fix function declarations
1311 (OPTIONAL,REQUIRED): New symbols
1312 (add_functions,add_subroutines): Use symbols
1313 (gmp.h): Remove unused include
1314
597cdf4f
JM
13152004-11-25 Joseph S. Myers <joseph@codesourcery.com>
1316
1317 * f95-lang.c, gfortranspec.c, trans-decl.c: Avoid ` as left quote
1318 in diagnostics.
1319
39afeb1a
SB
13202004-11-24 Steven Bosscher <stevenb@suse.de>
1321
1322 * options.c (gfc_post_options): Don't clear flag_inline_functions.
1323
d8fe26b2
SK
13242004-11-20 Steven G. Kargl <kargls@comcast.net>
1325
1326 * check.c (gfc_check_getcwd_sub): Fix seg fault.
1327
1328 * check.c (gfc_check_exit,gfc_check_umask,gfc_check_umask_sub,
1329 gfc_check_unlink,gfc_check_unlink_sub): New functions
1330 * gfortran.h (GFC_ISYM_UMASK,GFC_ISYM_UNLINK): New symbols
1331 * intrinsic.c (add_functions,add_subroutines): Add umask, unlink,
1332 exit to intrinsics symbol tables.
1333 * intrinsic.h (gfc_check_umask,gfc_check_unlink,gfc_check_exit,
1334 gfc_check_umask_sub,gfc_check_unlink_sub,gfc_resolve_umask,
1335 gfc_resolve_unlink,gfc_resolve_exit,gfc_resolve_umask_sub,
1336 gfc_resolve_unlink_sub): Add and sort prototypes.
1337 * iresolve.c (gfc_resolve_umask,gfc_resolve_unlink,gfc_resolve_exit,
1338 gfc_resolve_umask_sub,gfc_resolve_unlink_sub): New functions
1339 * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbols
1340
40b026d8
PB
13412004-11-16 Paul Brook <paul@codesourcery.com>
1342
1343 PR fortran/13010
1344 * trans-array.c (gfc_trans_allocate_temp_array): Use gfc_get_dtype.
1345 (gfc_array_init_size, gfc_conv_expr_descriptor): Ditto.
1346 * trans-types.c (gfc_get_dtype): Accept array type rather than element
1347 type.
1348 (gfc_get_nodesc_array_type): Don't set GFC_TYPE_ARRAY_DTYPE.
1349 (gfc_get_array_type_bounds): Ditto.
1350 (gfc_get_derived_type): Recurse into derived type pointers.
1351 * trans-types.h (gfc_get_dtype): Add prototype.
1352 * trans.h (GFC_TYPE_ARRAY_DTYPE): Add comment.
1353
c4759ce3
PB
13542004-11-15 Paul Brook <paul@codesourcery.com>
1355
1356 * trans-types.c (gfc_get_dtype): Remove obsolete TODO.
1357
96654664
PB
13582004-11-10 Paul Brook <paul@codesourcery.com>
1359
1360 PR fortran/18375
1361 * trans-expr.c (gfc_trans_subarray_assign): Free shape before ss.
1362 * trans-io.c (transfer_array_component): Ditto.
1363
851739ea
PB
13642004-11-10 Paul Brook <paul@codesourcery.com>
1365
1366 * invoke.texi: Fix typo.
1367
f7b529fa
KH
13682004-11-08 Kazu Hirata <kazu@cs.umass.edu>
1369
1370 * arith.c, array.c, decl.c, expr.c, f95-lang.c, gfortran.h,
1371 gfortranspec.c, interface.c, intrinsic.c, iresolve.c, match.c,
1372 module.c, parse.c, parse.h, primary.c, resolve.c, scanner.c,
1373 trans-array.c, trans-array.h, trans-expr.c, trans-intrinsic.c,
1374 trans-io.c, trans-stmt.c, trans.h: Fix comment formatting.
1375
c1df75d1
TS
13762004-11-06 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1377
1378 PR fortran/18023
1379 * io.c (resolve_tag): Tighten up exception for assigned FORMAT.
1380
882f2b8e
KH
13812004-11-06 Kazu Hirata <kazu@cs.umass.edu>
1382
1383 * gfortranspec.c: Replace GNU CC with GCC.
1384
20a209b5
TS
13852004-11-05 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1386
1387 * gfortranspec.c (lang_specific_driver): Change year to 2004.
1388
ca0e9281
TS
13892004-11-05 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1390
1391 PR fortran/18111
1392 * trans-decl.c (create_function_arglist): Set DECL_ARTIFICIAL for
1393 hidden parameters.
1394
adf3ed3f
TS
13952004-11-05 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1396
1397 PR fortran/15164
1398 * trans-decl.c (gfc_finish_var_decl): Don't declare arguments to
1399 module procedures as if they were module variables.
1400
36f4d144
TS
14012004-11-03 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1402
1403 PR fortran/17535
1404 PR fortran/17583
1405 PR fortran/17713
1406 * module.c (write_symbol1): Set module_name for dummy arguments.
1407
9e660c49
PB
14082004-11-02 Paul Brook <paul@codesourcery.com>
1409
1410 * intrinsic.c (check_intrinsic_standard): Include error locus.
1411 Remove VLA.
1412 (gfc_intrinsic_func_interface, gfc_intrinsic_sub_interface): Pass
1413 locus to check_intrinsic_standard.
1414
b7892582
JB
14152004-10-31 Janne Blomqvist <jblomqvi@cc.hut.fi>
1416
1417 PR fortran/17590
1418 * gfortran.h: Change GFC_STD_* flags to more appropriate
1419 ones. (struct gfc_intrinsic_isym): Add field for standard. (struct
1420 gfc_option_t): Add field for warning about use of nonstandard
1421 intrinsics.
1422 * intrinsic.c (add_sym): Add parameter for standard version, check
1423 this against current standard.
1424 (add_sym_0): Pass standard parameter to add_sym.
1425 (add_sym_1, add_sym_0s, add_sym_1s, add_sym_1m, add_sym_2): Ditto.
1426 (add_sym_2s, add_sym_3, add_sym_3ml, add_sym_3red, add_sym_3s): Ditto.
1427 (add_sym_4, add_sym_4s, add_sym_5, add_sym_5s): Ditto.
1428 (make_generic): Add parameter for standard, check this
1429 against currently selected standard.
1430 (add_functions, add_subroutines): Add parameter to tell which
1431 standard an intrinsic belongs to.
1432 (check_intrinsic_standard): New function.
1433 (gfc_intrinsic_func_interface): Add call to check_intrinsic_standard.
1434 (gfc_intrinsic_sub_interface): Ditto.
1435 * lang.opt: Add Wnonstd-intrinsics option.
1436 * options.c (gfc_init_options): Change to use new GFC_STD_* flags,
1437 init new warning.
1438 (set_Wall): Add warning about nonstd intrinsics.
1439 (gfc_handle_option): Change to use new GFC_STD_* flags,
1440 handle new warning.
1441 * invoke.texi: Update manual to include -Wnonstd-intrinsics.
1442
f88cf205
AP
14432004-10-30 Andrew Pinski <pinskia@physics.uc.edu>
1444
1445 * f95-lang.c (lang_tree_node): Add chain_next to be the TREE_CHAIN.
1446
b7398e72
TS
14472004-10-30 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1448
1449 * simplify.c (twos_complement): Calculate mask in GMP arithmetic.
1450
bf737879
TS
14512004-10-30 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1452
1453 * trans.c (gfc_trans_code): Set global locus after recursing. Fix
1454 comment typo.
1455
7a003d8e
CY
14562004-10-30 Canqun Yang <canqun@nudt.edu.cn>
1457
a1286ef5 1458 * check.c (gfc_check_rand): Allow missing optional argument.
7a003d8e
CY
1459 (gfc_check_irand): Ditto.
1460 * intrinsic.c (add_functions): Set arg optional flag for {i,}rand.
1461
be3a985e
SRL
14622004-10-28 Scott Robert Ladd <scott.ladd@coyotegulch.com>
1463
1464 PR fortran/13490, PR fortran/17912
1465 * gcc/fortran/gfortran.h: Added pedantic_min_int to gfc_integer_info
1466 * gcc/fortran/gfortran.h: Added ARITH_ASYMMETRIC to arith
7a003d8e 1467 * gcc/fortran/arith.c: Added support for an "asymmetric integer"
be3a985e
SRL
1468 warning when compiling with pedantic.
1469 * gcc/fortran/arith.c: Set minimum integer values to reflect
1470 realities of two's complement signed integers. Added
1471 pedantic minimum.
1472
974ede64
AP
14732004-10-17 Andrew Pinski <pinskia@physics.uc.edu>
1474
1475 * Make-lang.in (F95_ADDITIONAL_OBJS): Kill.
1476 (f951): Do not depend on F95_ADDITIONAL_OBJS and don't
1477 link it in.
1478
19e4c59d
TS
14792004-10-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1480
1481 * trans-decl.c (generate_local_decl): Simplify logic, fix comment
1482 typo.
1483 (gfc_generate_function_code): Fix formatting issue.
1484
711f8369
TS
14852004-10-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1486
1487 * module.c: Fix formatting issues.
1488
5c76089a
TS
14892004-10-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1490
1491 * module.c (mio_interface_rest): Set where member of interface
1492 while loading.
1493
2d0b4bcd
AP
14942004-10-08 Andrew Pinski <pinskia@physics.uc.edu>
1495
1496 PR fortran/17901
1497 * options.c (gfc_handle_option): Add break after handing the
1498 J/M option.
1499
26810721
TS
15002004-10-08 Tobias Schlueter <tobias.shclueter@physik.uni-muenchen.de>
1501
1502 * arith.c: Fix formatting issues.
a1286ef5 1503
edbfca8f
TS
15042004-10-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1505
1506 PR fortran/17676
1507 * resolve.c (resolve_operator): Use correct operator name in message.
1508
5d874166
TS
15092004-10-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1510
1511 * primary.c (match_boz_constant): Allow kind parameter suffixes.
1512 Move standard warning further to the front.
1513
54c2d931
KH
15142004-10-07 Kazu Hirata <kazu@cs.umass.edu>
1515
1516 * trans-stmt.c: Fix a comment typo.
1517
2b58638b
PB
15182004-10-07 Paul Brook <paul@codesourcery.com>
1519
1520 PR fortran/17678
1521 * trans-array.c (gfc_trans_deferred_array): Leave use associated
1522 variables alone.
1523
5d24a977
TS
15242004-10-06 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1525
1526 PR fortran/17568
1527 * simplify.c (twos_complement): New function.
1528 (gfc_simplify_ishft, gfc_simplify_ishftc): Revise.
1529
c45abcaf
TS
1530 * simplify.c (gfc_simplify_abs): Use mpfr_hypot for CABS.
1531
fbdad37d
PB
15322004-10-06 Paul Brook <paul@codesourcery.com>
1533
1534 * trans-stmt.c (gfc_trans_simple_do): New function.
1535 (gfc_trans_do): Use it. Evaluate iteration bounds before entering
1536 loop. Update comments.
1537
58c5b409
TS
15382004-10-04 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1539
1540 PR fortran/17283
1541 * iresolve.c (gfc_resolve_pack): Choose function depending if mask
1542 is scalar.
1543
ee569894
TS
1544 PR fortran/17631
1545 * intrinsic.c (add_sym_5): Remove.
1546 (add_subroutines): Add resolution function for MVBITS.
1547 * intrinsic.h (gfc_resolve_mvbits): Declare resolution function for
1548 MVBITS
1549 * iresolve.c (gfc_resolve_mvbits): New function.
1550 (gfc_resolve_random_number): Remove empty line at end of function.
1551
73a014b5
TS
1552 * trans-const.c (gfc_build_cstring_const): New function.
1553 (gfc_init_cst): Use new function.
1554 * trans-const.h (gfc_build_cstring_const): Add prototype.
1555 * trans-io.c (set_string, set_error_locus): Use new function.
1556 * trans-stmt.c (gfc_trans_goto): Use new function.
a1286ef5 1557
73a014b5
TS
1558 PR fortran/17708
1559 * parse.c (accept_statement): Don't treat END DO like END IF and
1560 END SELECT.
1561 (parse_do_block): Generate possible END DO label inside END DO
1562 block.
1563
5b1374e9
TS
1564 PR fortran/17776
1565 * check.c (gfc_check_system_sub): New function.
1566 * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_SYSTEM.
1567 * intrinsic.c (add_functions): Add 'system'.
1568 (add_subroutines): Add 'system'.
1569 * intrinsic.h (gfc_check_etime_sub, gfc_check_getcwd_sub):
1570 Move prototypes to other suborutines.
1571 (gfc_check_system_sub, gfc_resolve_system, gfc_resolve_system_sub):
1572 Add prototype.
1573 (gfc_resolve_system_clock): Fix formatting of prototype.
1574 * iresolve.c (gfc_resolve_system, gfc_resolve_system_sub): New
1575 functions.
1576 * trans-intrinsic.c (gfc_conv_intrinsic_function): Deal with
1577 GFC_ISYM_SYSTEM.
1578
d7d528c8
ES
15792004-10-04 Erik Schnetter <schnetter@aei.mpg.de>
1580
1581 * scanner.c (preprocessor_line): Accept preprocessor lines without
1582 file names. Check file names for closing quotes. Handle escaped
1583 quotes in file names.
1584
ca2940c3
TS
15852004-10-04 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1586 Paul Brook <paul@codesourcery.com>
1587
1588 * trans-array.c (gfc_conv_expr_descriptor): Check for substriungs.
1589 Use gfc_get_expr_charlen.
1590 * trans-expr.c (gfc_get_expr_charlen): New function.
1591 * trans.h (gfc_get_expr_charlen): Add prototype.
1592
b805ea17
KH
15932004-10-04 Kazu Hirata <kazu@cs.umass.edu>
1594
1595 * trans-intrinsic.c: Fix a comment typo.
1596
03ddaf35
TS
15972004-10-03 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1598
1599 * simplify.c (range_check): Remove blank line at beginning of function.
1600 (gfc_simplify_dint): Same at end of function.
1601 (gfc_simplify_exponent, gfc_simplify_fraction): Simplify calculations.
1602 (gfc_simplify_bound): Fix indentation.
1603 (gfc_simplify_log10): Simplify calculation.
1604 (gfc_simplify_min, gfc_simplify_max): Remove blank line at beginning
1605 of function.
1606 (gfc_simplify_nearest): Same at end of function.
1607 (gfc_simplify_nint, gfc_simplify_idnint): Same at beginning of
1608 function.
1609 (gfc_simplify_rrspacing, gfc_simplify_set_exponent,
1610 gfc_simplify_spacing): Simplify calulations.
1611
046dcd57
FW
16122004-10-03 Feng Wang <fengwang@nudt.edu.cn>
1613
1614 * trans-intrinsic.c: Fix comments on spacing and rrspacing
1615 (gfc_conv_intrinsic_rrspacing): Add fold on constant trees.
1616
0f0377f6
JH
16172004-10-01 Jan Hubicka <jh@suse.cz>
1618
1619 * f95-lang.c (gfc_expand_function): Update call of
1620 tree_rest_of_compilation.
1621 * trans-decl.c (gfc_generate_constructors): Likewise.
1622
68629d16
TS
16232004-09-26 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1624
1625 * trans-intrinsic.c: Comment fixes.
1626
75d17889
TS
16272004-09-25 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1628
1629 * decl.c (add_init_expr_to_sym, variable_decl): Comment fixes.
1630
206fb0a7
TS
16312004-09-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1632
1633 * trans-types.c (gfc_return_by_reference): Remove superfluous
1634 assertion.
1635
c0c07d7b
TS
1636 * intrinsic.h (gfc_resolve_getcwd): Update prototype.
1637 * iresolve.c (gfc_resolve_getcwd): Add second argument to function.
1638
1639 PR fortran/17615
1640 * trans-expr.c (gfc_trans_arrayfunc_assign): Look at resolved
1641 function to determine return type.
a1286ef5 1642
8f235343
JH
16432004-09-20 Jan Hubicka <jh@suse.cz>
1644
1645 * trans-decl.c (build_entry_thunks): Finalize the function; do not lower
1646 tree.
1647 (gfc_generate_function_code): Likewise.
1648
da89fba8
TS
16492004-09-20 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1650
1651 PR fortran/15957
1652 * simplify.c (gfc_simplify_reshape): Set shape of return value
1653 correctly.
1654
6615c446
JO
16552004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
1656 Zack Weinberg <zack@codesourcery.com>
1657
1658 * f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
1659 enumeration constants.
1660
4cdf7223
PB
16612004-09-17 Paul Brook <paul@codesourcery.com>
1662
1663 * gfortran.h (struct gfc_linebuf): Don't use C99 empty arrays.
1664 (gfc_linebuf_header_size): Define.
1665 * scanner.c (load_file): Use it.
1666
1f2959f0
KH
16672004-09-16 Kazu Hirata <kazu@cs.umass.edu>
1668
1669 * array.c, data.c, decl.c, dependency.c, error.c, f95-lang.c,
1670 interface.c, intrinsic.c, io.c, misc.c, module.c, parse.h,
1671 resolve.c, scanner.c, trans-array.c, trans-array.h,
1672 trans-common.c, trans-const.h, trans-decl.c, trans-expr.c,
1673 trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.c,
1674 trans.h: Fix comment typos. Follow spelling conventions.
1675
d2ccf6aa
VL
16762004-09-16 Victor Leikehman <lei@il.ibm.com>
1677
1678 PR/15364
1679 * trans-io.c (transfer_array_component): New function.
1680 (transfer_expr): For array fields, call transfer_array_component.
1681
de787a96
KH
16822004-09-16 Kazu Hirata <kazu@cs.umass.edu>
1683
1684 * gfortran.texi: Fix a typo.
1685
f13ab1ee
AL
16862004-09-15 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
1687
1688 * parse.c (eof_buf): Rename eof to eof_buf.
1689 (unexpected_eof): Same.
1690 (gfc_parse_file): Same.
1691
0110c1ec
SK
16922004-09-15 Steven G. Kargl <kargls@comcast.net>
1693
1694 * check.c (gfc_check_getcwd_sub): New function.
1695 * gfortran.h (GFC_ISYM_GETCWD): New symbol.
1696 * intrinsic.c (add_functions): Add function definition;
1697 Use symbol.
1698 * intrinsic.c (add_subroutines): Add subroutine definitions.
1699 * intrinsic.h: Add prototypes.
1700 * iresolve.c (gfc_resolve_getcwd, gfc_resolve_getcwd_sub):
1701 New functions.
1702 * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbol.
1703
4672f86a
TS
17042004-09-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1705
1706 PR fortran/16485
1707 * module.c (write_symbol): Don't fill in module name here.
1708 (write_symbol0): Fill in here instead.
1709
13795658
KH
17102004-09-14 Kazu Hirata <kazu@cs.umass.edu>
1711
1712 * data.c, decl.c, f95-lang.c, gfortran.h, match.c,
1713 trans-array.c, trans-common.c, trans-expr.c,
1714 trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.h: Fix
1715 comment typos. Follow spelling conventions.
1716
4d28e183
PB
17172004-09-09 Paul Brook <paul@codesourcery.com>
1718
1719 * scanner.c (get_file): Add ATTRIBUTE_UNUSED.
1720
6e45f57b
PB
17212004-09-08 Paul Brook <paul@codesourcery.com>
1722
1723 * array.c: Don't include assert.h.
1724 * data.c: Don't include assert.h. Replace assert and abort with
1725 gcc_assert and gcc_unreachable.
1726 * dependency.c: Ditto.
1727 * f95-lang.c: Ditto.
1728 * iresolve.c: Ditto.
1729 * resolve.c: Ditto.
1730 * simplify.c: Ditto.
1731 * symbol.c: Ditto.
1732 * trans-array.c: Ditto.
1733 * trans-common.c: Ditto.
1734 * trans-const.c: Ditto.
1735 * trans-decl.c: Ditto.
1736 * trans-expr.c: Ditto.
1737 * trans-intrinsic.c: Ditto.
1738 * trans-io.c: Ditto.
1739 * trans-stmt.c: Ditto.
1740 * trans-types.c: Ditto.
1741 * trans.c: Ditto.
1742
c8cc8542
PB
17432004-09-07 Per Bothner <per@bothner.com>
1744 Paul Brook <paul@codesourcery.com>
1745
1746 * error.c (show_locus): Handle mapped locations.
1747 * f95-lang.c (gfc_be_parse_file): Initialize mapped locations.
1748 * gfortran.h: Include input.h.
1749 (struct gfc_linebuf): Use source_location.
1750 * scanner.c (get_file): Initialize linemap.
1751 (preprocessor_line): Pass extra argument to get_file.
1752 (load_file): Ditto. Setup linemap.
1753 (gfc_new_file): Handle mapped locations.
1754 * trans-common.c (build_field, build_equiv_decl, build_common_decl):
1755 Set decl source locations.
1756 (gfc_trans_common): Set blank common block location.
1757 * trans-decl.c (gfc_set_decl_location): New function.
1758 (gfc_get_label_decl, gfc_get_symbol_decl): Use it.
1759 (trans_function_start): Move call to gfc_set_backend_locus..
1760 (build_function_decl): ... to here.
1761 (build_entry_thunks): Set and restore the backend locus.
1762 (gfc_generate_constructors): Remove excess arguments to
1763 init_function_start.
1764 (gfc_generate_block_data): Add comments. Set the decl locus.
1765 * trans-io.c (set_error_locus): Handle mapped locations.
1766 * trans.c (gfc_get_backend_locus, gfc_get_backend_locus): Ditto.
1767 (gfc_trans_code): Use SET_EXPR_LOCATION.
1768 (gfc_generate_code): Override the location of the new symbol.
1769 * trans.h (gfc_set_decl_location): Add prototype.
1770
4c97f95a
PB
17712004-08-31 Paul Brook <paul@codesourcery.com>
1772
1773 * trans-types.c (gfc_type_for_mode): Return NULL for unknown modes.
1774
c3d0559d
TS
17752004-09-01 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1776
1777 PR fortran/15327
1778 * trans-intrinsic.c (gfc_conv_intrinsic_merge): Do the right thing for
1779 strings.
1780
0e6928d8
TS
17812004-09-01 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1782
1783 PR fortran/16400
1784 PR fortran/16404
1785 (port from g95)
1786 * resolve.c (resolve_transfer): New function.
1787 (resolve_code): Call resolve_transfer in case of EXEC_TRANSFER.
1788
149a42dd
TS
17892004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1790
1791 PR fortran/16579
1792 * trans-types.c (gfc_init_types): Make gfc_character1_type_node an
1793 unsigned char.
1794
c4dd5a8d
TS
17952004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1796
1797 * CONTRIB, NEWS, README, TODO: Remove obsolete files.
1798
cf73cdac
TS
17992004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1800
1801 PR fortran/17244
1802 * trans-types.c (gfc_return_by_reference): Remove TODO error,
1803 add comment pointing out possible issue WRT compatibility with g77.
1804
d7177ab2
TS
18052004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1806
1807 * trans-decl.c, trans-expr.c, trans-io.c, trans-types.c: Replace
1808 all occurences of 'gfc_strlen_type_node' by
1809 'gfc_charlen_type_node'.
1810 * trans-types.h: Same. Also update comment accordingly.
1811
d1d61a00
TS
18122004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1813
1814 * primary.c: Update copyright boilerplate to say GCC.
f36327db 1815 * f95-lang.c: Change initial comment to say gfortran.
d1d61a00 1816
da17f559
PB
18172004-08-31 Paul Brook <paul@codesourcery.com>
1818
1819 * trans-types.h: Add comments.
1820 (intmax_type_node, string_type_node, const_string_type_node): Remove.
1821
e2cad04b
RH
18222004-08-30 Richard Henderson <rth@redhat.com>
1823
1824 * Make-lang.in (fortran/f95-lang.o): Update dependencies.
1825 (fortran/trans-decl.o, fortran/trans-types.o): Likewise.
1826 * gfortran.h (gfc_integer_info): Add c_char, c_short, c_int,
1827 c_long, c_long_long.
1828 (gfc_logical_info): Add c_bool.
1829 (gfc_real_info): Add mode_precision, c_float, c_double, c_long_double.
1830 * trans-array.c (gfc_array_allocate): Use TYPE_PRECISION
1831 rather than gfc_int[48]_type_node for allocate choice.
1832 * trans-decl.c (gfc_build_intrinsic_function_decls): Cache
1833 local copies of some kind type nodes.
1834 (gfc_build_builtin_function_decls): Likewise.
1835 * trans-expr.c (gfc_conv_power_op): Likewise.
1836 * trans-intrinsic.c (gfc_conv_intrinsic_index,
1837 gfc_conv_intrinsic_scan, gfc_conv_intrinsic_verify,
1838 gfc_conv_intrinsic_trim, gfc_conv_intrinsic_repeat): Likewise.
1839 * trans-stmt.c (gfc_trans_pause, gfc_trans_stop,
1840 gfc_trans_character_select, gfc_trans_allocate): Likewise.
1841 * trans-io.c (gfc_pint4_type_node): Move into ...
1842 (gfc_build_io_library_fndecls): ... here. Cache local copies of
1843 some kind type nodes.
1844 * trans-types.c (gfc_type_nodes): Remove.
1845 (gfc_character1_type_node, gfc_strlen_type_node): New.
1846 (gfc_integer_types, gfc_logical_types): New.
1847 (gfc_real_types, gfc_complex_types): New.
1848 (gfc_init_kinds): Fill in real mode_precision.
1849 (gfc_build_int_type, gfc_build_real_type): New.
1850 (gfc_build_complex_type, gfc_build_logical_type): New.
1851 (c_size_t_size): New.
1852 (gfc_init_types): Loop over kinds.
1853 (gfc_get_int_type, gfc_get_real_type): Use gfc_validate_kind.
1854 (gfc_get_complex_type, gfc_get_logical_type): Likewise.
1855 (gfc_get_character_type_len): Likewise.
1856 (gfc_type_for_size): Loop over kinds; use a reduced set of
1857 unsigned type nodes.
1858 (gfc_type_for_mode): Loop over kinds.
1859 (gfc_signed_or_unsigned_type): Use gfc_type_for_size.
1860 (gfc_unsigned_type, gfc_signed_type): Use gfc_signed_or_unsigned_type.
1861 * trans-types.h (F95_INT1_TYPE, F95_INT2_TYPE, F95_INT4_TYPE,
1862 F95_INT8_TYPE, F95_INT16_TYPE, F95_REAL4_TYPE, F95_REAL8_TYPE,
1863 F95_REAl16_TYPE, F95_COMPLEX4_TYPE, F95_COMPLEX8_TYPE,
1864 F95_COMPLEX16_TYPE, F95_LOGICAL1_TYPE, F95_LOGICAL2_TYPE,
1865 F95_LOGICAL4_TYPE, F95_LOGICAL8_TYPE, F95_LOGICAL16_TYPE,
1866 F95_CHARACTER1_TYPE, NUM_F95_TYPES, gfc_type_nodes,
1867 gfc_int1_type_node, gfc_int2_type_node, gfc_int4_type_node,
1868 gfc_int8_type_node, gfc_int16_type_node, gfc_real4_type_node,
1869 gfc_real8_type_node, gfc_real16_type_node, gfc_complex4_type_node,
1870 gfc_complex8_type_node, gfc_complex16_type_node,
1871 gfc_logical1_type_node, gfc_logical2_type_node,
1872 gfc_logical4_type_node, gfc_logical8_type_node,
1873 gfc_logical16_type_node, gfc_strlen_kind): Remove.
1874 (gfc_character1_type_node): Turn in to a variable.
1875 (gfc_strlen_type_node): Likewise.
1876
0de4325e
TS
18772004-08-30 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1878
1879 * gfortran.h (gfc_namespace): Add new field is_block_data.
1880 * parse.c (accept_statement): Remove special handling for BLOCK DATA.
1881 (parse_block_data): Record BLOCK DATA name, set is_block_data field.
1882 * trans.c (gfc_generate_code): Handle BLOCK DATA units.
1883 * trans.h (gfc_generate_block_data): Add prototype.
1884 * trans-decl.c (gfc_generate_block_data): New function.
1885
04204c2f
RH
18862004-08-29 Richard Henderson <rth@redhat.com>
1887
1888 * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_export.
1889 * trans-types.c (gfc_init_kinds): Reject integer kinds larger
1890 than two HOST_WIDE_INT.
1891
294fbfc8
TS
18922004-08-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1893
1894 PR fortran/13910
1895 * decl.c (free_variable, free_value, gfc_free_data, var_list,
1896 var_element, top_var_list, match_data_constant, top_val_list,
1897 gfc_match_data): Move here from match.c.
1898 (match_old_style_init): New function.
1899 (variable_decl): Match old-style initialization.
1900 * expr.c (gfc_get_variable_expr): New function.
1901 * gfortran.h (gfc_get_variable_expr): Add prototype.
1902 * gfortran.texi: Start documentation for supported extensions.
1903 * match.c: Remove the functions moved to decl.c.
1904 * match.h (gfc_match_data): Move prototype to under decl.c.
1905 * symbol.c (gfc_find_sym_tree, gfc_find_symbol): Add/correct
1906 comments.
1907
e8525382
SK
19082004-08-29 Steven G. Kargl <kargls@comcast.net>
1909 Paul Brook <paul@codesourcery.com>
1910
1911 * check.c (gfc_check_besn, gfc_check_g77_math1): New functions.
1912 * f95-lang.c (DO_DEFINE_MATH_BUILTIN): Define.
1913 (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it.
1914 (build_builtin_fntypes): New function.
1915 (gfc_init_builtin_functions): Use it.
1916 * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_{J,Y}{0,1,N}
1917 and GFC_ISYM_ERF{,C}.
1918 (gfc_c_int_kind): Declare.
1919 * intrinsic.c (add_functions): Add [d]bes* and [d]erf*.
1920 * intrinsic.h (gfc_check_besn, gfc_check_g77_math1, gfc_resolve_besn,
1921 gfc_resolve_g77_math1): Add prototypes.
1922 * resolve.c (gfc_resolve_besn, gfc_resolve_g77_math1): New functions.
1923 * mathbuiltins.def: Add comment. Change third argument. Use
1924 DEFINE_MATH_BUILTIN_C. Add bessel and error functions.
1925 * trans-intrinsic.c (BUILT_IN_FUNCTION): Define.
1926 (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it.
1927 * trans-types.c (gfc_c_int_kind): Declare.
1928 (gfc_init_kinds): Set it.
1929
4c0c6b9f
SK
19302004-08-29 Steven G. Kargl <kargls@comcast.net>
1931 Paul Brook <paul@codesourcery.com>
1932
1933 * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_GET?ID.
1934 (gfc_check_f, gfc_simplify_f): Add f0.
1935 * intrinsic.c (do_check): Call f0. Flatten.
1936 (add_sym_0): Fix prototype. Set f0.
1937 (add_functions): Add getgid, getgid and getuid.
1938 (resolve_intrinsic): Remove obsolete comment.
1939 (do_simplify): Call f0.
1940 * intrinsic.h (gfc_resolve_getgid, gfc_resolve_getpid,
1941 gfc_resolve_getuid): Add prototypes.
1942 * iresolve.c (gfc_resolve_getgid, gfc_resolve_getpid,
1943 gfc_resolve_getuid): New functions.
1944 * trans-intrinsic.c (gfc_conv_intrinsic_function): Handle
1945 GFC_ISYM_GET?ID.
1946
1f05db63
TS
19472004-08-28 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1948
1949 * error.c (gfc_error_init_1): Remove blank line in front of
1950 function body. Add missing blank.
1951 (gfc_buffer_error, error_char, error_string): Remove blank line in
1952 front of function body.
1953 (show_locus): Add comma in comment.
1954 (gfc_clear_warning, gfc_warning_check, gfc_clear_error,
1955 gfc_push_error, gfc_pop_error): Remove blank line in front of
1956 function body.
1957 (gfc_get_errors): Typo fix in comment in front of function. Remove
1958 blank line in front of function body.
1959
9d64df18
TS
19602004-08-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1961
1962 * gfortran.h (gfc_default_*_kind): Remove prototypes, add extern
1963 variable declaration of same name.
1964 * arith.c, check.c, decl.c, dump_parse_tree.c, expr.c,
1965 intrinsic.c, io.c, iresolve.c, match.c, options.c, primary.c,
1966 resolve.c, simplify.c, symbol.c, trans-const.c, trans-io.c:
1967 Replace all calls to gfc_default_*_kind with variable accesses.
1968 * trans-types.c: Same as above.
1969 (gfc_default_*_kind_1): Rename to gfc_default_*_kind, remove
1970 static qualifier. Replace all occurences.
1971 (gfc_default_*_kind): Remove functions.
1972
5e8e542f
RH
19732004-08-26 Richard Henderson <rth@redhat.com>
1974
6615c446
JO
1975 * arith.c: Include system.h, not real system headers.
1976 (MPZ_NULL, MPF_NULL, DEF_GFC_INTEGER_KIND, DEF_GFC_LOGICAL_KIND,
1977 DEF_GFC_REAL_KIND, GFC_SP_KIND, GFC_SP_PREC, GFC_SP_EMIN, GFC_SP_EMAX,
1978 GFC_DP_KIND, GFC_DP_PREC, GFC_DP_EMIN, GFC_DP_EMAX, GFC_QP_KIND,
1979 GFC_QP_PREC, GFC_QP_EMIN, GFC_QP_EMAX): Remove.
1980 (gfc_integer_kinds, gfc_logical_kinds, gfc_real_kinds,
1981 gfc_index_integer_kind, gfc_default_integer_kind,
1982 gfc_default_real_kind,gfc_default_double_kind,
1983 gfc_default_character_kind, gfc_default_logical_kind,
1984 gfc_default_complex_kind, validate_integer, validate_real,
1985 validate_logical, validate_character,
1986 gfc_validate_kind): Move to trans-types.c.
1987 (gfc_set_model_kind): Use gfc_validate_kind.
1988 (gfc_set_model): Just copy the current precision to default.
1989 (gfc_arith_init_1): Use mpfr precision 128 for integer setup.
1990 * f95-lang.c (gfc_init_decl_processing): Invoke gfc_init_kinds.
1991 * gfortran.h: Update file commentary.
1992 * trans-types.c (MAX_INT_KINDS, MAX_REAL_KINDS): New.
1993 (gfc_default_integer_kind_1, gfc_default_real_kind_1,
1994 gfc_default_double_kind_1, gfc_default_character_kind_1,
1995 gfc_default_logical_kind_1, gfc_default_complex_kind_1): New.
1996 (gfc_init_kinds): New.
1997 (gfc_init_types): Don't set gfc_index_integer_kind here.
1998 * trans-types.h (gfc_init_kinds): Declare.
5e8e542f
RH
1999 * doc/invoke.texi: Clarify DOUBLE PRECISION behaviour wrt -r8.
2000
a1bab9ea
TS
20012004-08-26 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2002
2003 * check.c (gfc_check_atan2): New function.
2004 * intrinsic.c (add_functions): Use gfc_check_atan2 for ATAN2
2005 * intrinsic.h (gfc_check_atan2): Add prototype.
2006
e7a2d5fb
RH
20072004-08-25 Richard Henderson <rth@redhat.com>
2008
2009 * arith.c (gfc_validate_kind): Add may_fail argument; abort if
2010 false and we don't validate the kind.
2011 (gfc_check_integer_range, gfc_check_real_range): Update to match.
2012 * check.c (kind_check): Likewise.
2013 * decl.c (gfc_match_old_kind_spec, gfc_match_kind_spec): Likewise.
2014 (match_char_spec, match_logical_spec): Likewise.
2015 * gfortran.h (gfc_validate_kind): Likewise.
2016 * options.c (gfc_handle_option): Likewise.
2017 * primary.c (match_integer_constant, match_real_constant,
2018 match_string_constant, match_logical_constant,
2019 match_const_complex_part): Likewise.
2020 * simplify.c (get_kind, gfc_simplify_bit_size, gfc_simplify_digits,
2021 gfc_simplify_epsilon, gfc_simplify_huge, gfc_simplify_ibclr,
2022 gfc_simplify_ibset, gfc_simplify_ishft, gfc_simplify_ishftc,
2023 gfc_simplify_maxexponent, gfc_simplify_minexponent,
2024 gfc_simplify_nearest, gfc_simplify_not, gfc_simplify_precision,
2025 gfc_simplify_radix, gfc_simplify_range, gfc_simplify_rrspacing,
2026 gfc_simplify_scale, gfc_simplify_spacing, gfc_simplify_tan,
2027 gfc_simplify_tiny): Likewise.
2028 * trans-intrinsic.c (gfc_conv_intrinsic_aint, gfc_conv_intrinsic_mod,
2029 gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_minmaxval,
2030 prepare_arg_info): Likewise.
2031
6d1c50cc
TS
20322004-08-25 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2033
2034 * expr.c (gfc_check_assign): Add comment. Add new warning.
2035 * trans-expr.c (gfc_conv_function_call): Correctly dereference
2036 result of pointer valued function when not in pointer assignment.
2037
75101feb
PB
20382004-08-25 Paul Brook <paul@codesourcery.com>
2039
2040 * config-lang.in: Remove dead commented line.
2041 * module.c: Replace g95 with gfortran in comment.
2042
9ca2b0db
PB
20432004-08-25 Paul Brook <paul@codesourcery.com>
2044
2045 PR fortran/17190
2046 * arith.c (gfc_mpfr_to_mpz): Workaround mpfr bug.
2047
40f20186
PB
20482004-08-25 Paul Brook <paul@codesourcery.com>
2049
2050 PR fortran/17144
2051 * trans-array.c (gfc_trans_allocate_temp_array): Remove
2052 string_length argument.
2053 (gfc_trans_array_ctor_element): New function.
2054 (gfc_trans_array_constructor_subarray): Use it.
2055 (gfc_trans_array_constructor_value): Ditto. Handle constant
2056 character arrays.
2057 (get_array_ctor_var_strlen, get_array_ctor_strlen): New functions.
2058 (gfc_trans_array_constructor): Use them.
2059 (gfc_add_loop_ss_code): Update to new gfc_ss layout.
2060 (gfc_conv_ss_descriptor): Remember section string length.
2061 (gfc_conv_scalarized_array_ref): Ditto. Remove dead code.
2062 (gfc_conv_resolve_dependencies): Update to new gfc_ss layout.
2063 (gfc_conv_expr_descriptor): Ditto.
2064 (gfc_conv_loop_setup): Ditto. Spelling fixes.
2065 * trans-array.h (gfc_trans_allocate_temp_array): Update prototype.
2066 * trans-const.c (gfc_conv_constant): Update to new gfc_ss layout.
2067 * trans-expr.c (gfc_conv_component_ref): Turn error into ICE.
2068 (gfc_conv_variable): Set string_length from section.
2069 (gfc_conv_function_call): Remove extra argument.
2070 (gfc_conv_expr, gfc_conv_expr_reference): Update to new gfc_ss layout.
2071 * trans-types.c (gfc_get_character_type_len): New function.
2072 (gfc_get_character_type): Use it.
2073 (gfc_get_dtype): Return zero for internal types.
2074 * trans-types.h (gfc_get_character_type_len): Add prototype.
2075 * trans.h (struct gfc_ss): Move string_length out of union.
2076
923ab88c
TS
20772004-08-25 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2078
2079 * trans.h (build2_v, build3_v): New macros.
2080 (build_v): Remove.
2081 * f95-lang.c (gfc_truthvalue_conversion): Use build2 instead of
2082 build.
2083 * trans-array.c (gfc_conv_descriptor_data,
2084 gfc_conv_descriptor_offset, gfc_conv_descriptor_dimension,
6615c446 2085 gfc_conv_descriptor_stride, gfc_conv_descriptor_lbound,
923ab88c
TS
2086 gfc_conv_descriptor_ubound, gfc_trans_allocate_array_storage,
2087 gfc_trans_allocate_temp_array,
2088 gfc_trans_array_constructor_subarray,
2089 gfc_trans_array_constructor_value, gfc_conv_array_index_ref,
2090 gfc_trans_array_bound_check, gfc_conv_array_index_offset,
2091 gfc_conv_scalarized_array_ref, gfc_conv_array_ref,
2092 gfc_conv_array_ref, gfc_trans_preloop_setup,
2093 gfc_trans_scalarized_loop_end, gfc_conv_ss_startstride,
2094 gfc_conv_loop_setup, gfc_array_init_size,
2095 gfc_conv_array_initializer, gfc_trans_array_bounds,
2096 gfc_trans_auto_array_allocation, gfc_trans_dummy_array_bias,
2097 gfc_conv_expr_descriptor, gfc_conv_array_parameter,
2098 gfc_trans_deferred_array): Use buildN and buildN_v macros instead
2099 of build and build_v as appropriate.
2100 * trans-common.c (create_common): Same.
2101 * trans-decl.c (gfc_trans_auto_character_variable,
2102 gfc_trans_entry_master_switch, gfc_generate_function_code): Same.
2103 * trans-expr.c (gfc_conv_expr_present, gfc_conv_substring,
2104 gfc_conv_component_ref, gfc_conv_unary_op, gfc_conv_powi,
2105 gfc_conv_cst_int_power, gfc_conv_string_tmp, gfc_conv_concat_op,
2106 gfc_conv_expr_op, gfc_conv_function_call,
2107 gfc_trans_structure_assign): Same.
2108 * trans-intrinsic.c (build_fixbound_expr, build_round_expr,
2109 gfc_conv_intrinsic_aint, gfc_conv_intrinsic_bound,
2110 gfc_conv_intrinsic_cmplx, gfc_conv_intrinsic_mod,
2111 gfc_conv_intrinsic_dim, gfc_conv_intrinsic_sign,
2112 gfc_conv_intrinsic_dprod, gfc_conv_intrinsic_minmax,
2113 gfc_conv_intrinsic_anyall, gfc_conv_intrinsic_count,
2114 gfc_conv_intrinsic_arith, gfc_conv_intrinsic_minmaxloc,
2115 gfc_conv_intrinsic_minmaxval, gfc_conv_intrinsic_btest,
2116 gfc_conv_intrinsic_bitop, gfc_conv_intrinsic_singlebitop,
2117 gfc_conv_intrinsic_ibits, gfc_conv_intrinsic_ishft,
2118 gfc_conv_intrinsic_merge, gfc_conv_intrinsic_strcmp,
2119 gfc_conv_allocated, gfc_conv_associated, prepare_arg_info,
2120 gfc_conv_intrinsic_spacing, gfc_conv_intrinsic_rrspacing,
2121 gfc_conv_intrinsic_trim, gfc_conv_intrinsic_repeat,
2122 gfc_conv_intrinsic_iargc): Same.
2123 * trans-io.c (set_parameter_value, set_parameter_ref, set_string,
2124 set_flag, add_case, io_result, transfer_namelist_element,
2125 transfer_expr): Same.
2126 * trans-stmt.c (gfc_trans_goto, gfc_trans_return, gfc_trans_if_1,
2127 gfc_trans_arithmetic_if, gfc_trans_do, gfc_trans_do_while,
2128 gfc_trans_integer_select, gfc_trans_logical_select,
2129 gfc_trans_character_select, gfc_trans_forall_loop,
2130 gfc_trans_nested_forall_loop, gfc_do_allocate,
2131 generate_loop_for_temp_to_lhs, generate_loop_for_rhs_to_temp,
2132 compute_inner_temp_size, compute_overall_iter_number,
2133 allocate_temp_for_forall_nest, gfc_trans_pointer_assign_need_temp,
2134 gfc_trans_forall_1, gfc_evaluate_where_mask,
2135 gfc_trans_where_assign, gfc_trans_allocate): Same.
2136 * trans-types.c (gfc_get_dtype, gfc_get_array_type_bounds): Same.
2137 * trans.c (gfc_add_modify_expr, gfc_finish_block,
2138 gfc_build_array_ref, gfc_build_function_call,
2139 gfc_trans_runtime_check): Same.
2140
0cc4be67
TS
21412004-08-25 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2142
6615c446 2143 * trans-const.c (gfc_conv_mpz_to_tree): Change call to
0cc4be67
TS
2144 build_int_cst to build_int_cst_wide in accordance to Nathan's
2145 previous patch.
2146
7d60be94
NS
21472004-08-25 Nathan Sidwell <nathan@codesourcery.com>
2148
2149 * trans-array.c (gfc_trans_array_constructor_value): Adjust
2150 build_int_cst calls.
2151 * trans-const.c (gfc_build_string_const, gfc_init_constants,
2152 gfc_conv_mpz_to_tree, gfc_conv_constant_to_tree): Likewise.
2153 * trans-decl.c (gfc_get_symbol_decl, build_entry_thunks,
2154 gfc_trans_entry_master_switch): Likewise.
2155 * trans-intrinsic.c (gfc_conv_intrinsic_ibits,
2156 gfc_conv_intrinsic_len, prepare_arg_info): Likewise.
2157 * trans-io.c (add_case, set_error_locus,
2158 transfer_namelist_element, transfer_expr): Likewise.
2159 * trans-stmt.c (gfc_trans_label_assign, gfc_trans_pause,
2160 gfc_trans_stop, gfc_trans_character_select): Likewise.
2161 * trans-types.c (gfc_init_types, gfc_get_dtype): Likewise.
2162 * trans.c (gfc_trans_runtime_check): Likewise.
2163
45ede75e
TS
21642004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2165
6615c446 2166 * trans-decl.c, trans-types.c: Add and remove blank lines as
45ede75e
TS
2167 required.
2168
0c8eb998
RH
21692004-08-24 Richard Henderson <rth@redhat.com>
2170
2171 * trans-const.c (gfc_conv_mpz_to_tree): Fix 64-bit shift warning.
2172
de37af8c
TS
21732004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2174
6615c446 2175 * resolve.c (merge_argument_lists): Revert unintentionally
de37af8c 2176 committed change.
6615c446 2177
7be7d41b
TS
21782004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2179
2180 * trans-decl.c (build_function_decl): Fix spelling in comment.
2181 (build_entry_thunks): Remove code with no function.
2182 (gfc_build_intrinsic_function_decls): Remove empty line.
2183
2184 * resolve.c (resolve_entries): Fix a bunch of comment typos.
2185
8c1d6d62
NS
21862004-08-24 Nathan Sidwell <nathan@codesourcery.com>
2187
7d60be94 2188 * f95-lang.c (gfc_init_decl_processing): Adjust
8c1d6d62
NS
2189 build_common_tree_nodes call.
2190
436529ea
TS
21912004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2192
2193 * trans-types.c: Spelling and formatting fixes.
2194
5f0ae953
RH
21952004-08-23 Richard Henderson <rth@redhat.com>
2196
2197 * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_getlimbn instead
2198 of going through an intermediate string. Fix 32/64 int/long bug.
2199
f676971a
EC
22002004-08-23 Eric Christopher <echristo@redhat.com>
2201
2202 * trans-types.c (gfc_type_for_mode): Remove VECTOR_TYPE_SUPPORTED_P
2203 usage. Use build_vector_type_for_mode for vector types.
2204
b8502435
RH
22052004-08-22 Richard Henderson <rth@redhat.com>
2206
2207 PR 13465
6615c446
JO
2208 * data.c (find_con_by_offset): Search ordered list; handle
2209 elements with repeat counts.
2210 (gfc_assign_data_value_range): New.
2211 * gfortran.h (struct gfc_data_value): Make repeat unsigned.
2212 (gfc_assign_data_value_range): Declare.
2213 * match.c (top_val_list): Extract repeat count into a temporary.
2214 * resolve.c (values): Make left unsigned.
2215 (next_data_value): Don't decrement left.
2216 (check_data_variable): Use gfc_assign_data_value_range.
b8502435 2217
f8d0aee5
TS
22182004-08-22 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2219
2220 * trans-const.c, trans-decl.c, trans-expr.c: Spelling fixes.
2221
617097a3
TS
22222004-08-22 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2223
2224 * check.c (gfc_check_reduction): Rename to ...
f676971a 2225 (check_reduction): ... this. Make static. Don't check type of
617097a3
TS
2226 first argument.
2227 (gfc_check_minval_maxval, gfc_check_prodcut_sum): New functions.
2228 * intrinsic.c (add_functions): Change MAXVAL, MINVAL, PRODUCT and
2229 SUM to use new check functions.
2230 (check_specific): Change logic to call new functions.
2231 * intrinsic.h (gfc_check_minval_maxval, gfc_check_product_sum):
2232 Add prototypes.
2233 (gfc_check_reduction): Remove prototype.
2234
841b0c1f
PB
22352004-08-20 Paul Brook <paul@codesourcery.com>
2236 Canqun Yang <canqun@nudt.edu.cn>
2237
2238 PR fortran/17077
2239 * trans-array.c (gfc_conv_array_parameter): Pass correct pointer
2240 for automatic arrays.
2241 * trans-types.c (gfc_get_nodesc_array_type): Add comment.
2242
c874ae73 22432004-08-19 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
841b0c1f 2244 (Port from g95)
c874ae73 2245
841b0c1f 2246 PR fortran/17074
c874ae73
TS
2247 * match.c (match_simple_forall, match_simple_where): Forward-declare.
2248 (gfc_match_if): Order statement list alphabetically, add WHERE and
841b0c1f 2249 FORALL, remove double PAUSE.
c874ae73 2250 (gfc_match_simple_where, match_forall_header,
841b0c1f 2251 gfc_match_simple_forall): New functions.
c874ae73 2252 (gfc_match_forall): Use match_forall_header.
f676971a 2253
bbef13dc
PB
22542004-08-19 Paul Brook <paul@codesourcery.com>
2255
2256 PR fortran/17091
2257 * gfortran.h (gfc_access): Give ACCESS_UNKNOWN value 0.
2258 * symbol.c (gfc_clear_attr): Use memset.
2259
ec53454b
PB
22602004-08-19 Paul Brook <paul@codesourcery.com>
2261
2262 PR fortran/14976
f676971a 2263 PR fortran/16228
ec53454b
PB
2264 * data.c (assign_substring_data_value): Remove.
2265 (create_character_intializer): New function.
2266 (gfc_assign_data_value): Track the typespec for the current
2267 subobject. Use create_character_intializer.
2268
292e0d3a
ES
22692004-08-19 Erik Schnetter <schnetter@aei.mpg.de>
2270
2271 PR fortran/16946
2272 * check.c (gfc_check_reduction): New function.
2273 (gfc_check_minval_maxval): Removed.
2274 (gfc_check_product): Removed.
2275 (gfc_check_sum): Removed.
2276 * intrinsic.h: Add/remove declarations for these.
2277 * gfortran.h: Add field f3red to union gfc_check_f.
2278 * intrinsic.c (add_sym_3red): New function.
2279 (add_functions): Register maxval, minval, product, and sum intrinsics
2280 through add_sym_3red.
2281 (check_specific): Handle f3red union field.
2282 * iresolve.c: Whitespace change.
2283
1619aa6f
PB
22842004-08-18 Paul Brook <paul@codesourcery.com>
2285
2286 * trans-types.c (gfc_sym_type): Use pointer types for optional args.
2287
3bc268e6
VL
22882004-08-18 Victor Leikehman <lei@il.ibm.com>
2289
2290 PR fortran/13278
2291 * trans-io.c (transfer_namelist_element): New. Recursively handle
2292 derived-type variables. Pass string lengths.
2293 (build_dt): Code moved to build_namelist, with some
2294 changes and additions.
2295 (gfc_build_io_library_fndecls): Declare the fifth
2296 argument in st_set_nml_var_char -- string_length.
2297
3d79abbd
PB
22982004-08-17 Paul Brook <paul@codesourcery.com>
2299 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2300
2301 PR fortran/13082
2302 * decl.c (get_proc_name): Update mystery comment.
2303 (gfc_match_entry): Check for errors earlier. Add entry point to list.
2304 * dump-parse-tree.c (gfc_show_code_node): Print EXEC_ENTRY nodes.
2305 * gfortran.h (symbol_attribute): Add entry_master. Document entry.
2306 (struct gfc_entry_list): Define.
2307 (gfc_get_entry_list): Define.
2308 (struct gfc_namespace): Add refs and entries.
2309 (enum gfc_exec_op): Add EXEC_ENTRY.
2310 (struct gfc_code): Add ext.entry.
2311 * module.c (ab_attribute, attr_bits): Remove AB_ENTRY.
2312 (mio_symbol_attribute): Don't save/reture addr->entry.
2313 (mio_namespace_ref): Refcount namespaces.
2314 * parse.c (accept_statement): Handle ST_ENTRY.
2315 (gfc_fixup_sibling_symbols): Mark symbol as referenced.
2316 (parse_contained): Fixup sibling references to entry points
2317 after parsing the procedure body.
2318 * resolve.c (resolve_contained_fntype): New function.
2319 (merge_argument_lists, resolve_entries): New functions.
2320 (resolve_contained_functions): Use them.
2321 (resolve_code): Handle EXEC_ENTRY.
2322 (gfc_resolve): Call resolve_entries.
2323 * st.c (gfc_free_statement): Handle EXEC_ENTRY.
2324 * symbol.c (gfc_get_namespace): Refcount namespaces.
2325 (gfc_free_namespace): Ditto.
2326 * trans-array.c (gfc_trans_dummy_array_bias): Treat all args as
2327 optional when multiple entry points are present.
2328 * trans-decl.c (gfc_get_symbol_decl): Remove incorrect check.
2329 (gfc_get_extern_function_decl): Add assertion. Fix coment.
2330 (create_function_arglist, trans_function_start, build_entry_thunks):
2331 New functions.
2332 (gfc_build_function_decl): Rename ...
2333 (build_function_decl): ... to this.
2334 (gfc_create_function_decl): New function.
2335 (gfc_generate_contained_functions): Use it.
2336 (gfc_trans_entry_master_switch): New function.
2337 (gfc_generate_function_code): Use new functions.
2338 * trans-stmt.c (gfc_trans_entry): New function.
2339 * trans-stmt.h (gfc_trans_entry): Add prototype.
2340 * trans-types.c (gfc_get_function_type): Add entry point argument.
2341 * trans.c (gfc_trans_code): Handle EXEC_ENTRY.
2342 (gfc_generate_module_code): Call gfc_create_function_decl.
2343 * trans.h (gfc_build_function_decl): Remove.
2344 (gfc_create_function_decl): Add prototype.
2345
ead6d15f
AP
23462004-08-15 Andrew Pinski <apinski@apple.com>
2347
2348 PR fortran/17030
2349 * f95-lang.c (gfc_init_builtin_functions): Initialize the builtins
2350 for cabs{,f} and copysign{,f}.
f676971a
EC
2351 * trans-decl.c (gfor_fndecl_math_cabsf): Delete.
2352 (gfor_fndecl_math_cabs): Delete.
2353 (gfor_fndecl_math_sign4): Delete.
2354 (gfor_fndecl_math_sign8): Delete.
ead6d15f
AP
2355 (gfc_build_intrinsic_function_decls): Remove the
2356 initializing of cabs{,f} and copysign{,f} functions.
2357 * trans-intrinsic.c (gfc_conv_intrinsic_abs): Use the builtins
2358 instead of the functions definitions.
2359 (gfc_conv_intrinsic_sign): Likewise.
f676971a
EC
2360 * trans.h (gfor_fndecl_math_cabsf): Delete.
2361 (gfor_fndecl_math_cabs): Delete.
2362 (gfor_fndecl_math_sign4): Delete.
2363 (gfor_fndecl_math_sign8): Delete.
ead6d15f 2364
4a90aeeb
NS
23652004-08-15 Nathan Sidwell <nathan@codesourcery.com>
2366
2367 * trans-array.c (gfc_trans_array_constructor_value): Use
f676971a 2368 build_int_cst.
4a90aeeb
NS
2369 * trans-const.c (gfc_build_string_const,
2370 gfc_init_constants, gfc_conv_mpz_to_tree,
f676971a 2371 gfc_conv_constant_to_tree): Likewise.
4a90aeeb
NS
2372 * trans-decl.c (gfc_get_symbol_decl): Likewise.
2373 * trans-intrinsic.c (gfc_conv_intrinsic_ibits,
2374 gfc_conv_intrinsic_len, prepare_arg_info): Likewise.
2375 * trans-io.c (add_case, set_error_locus, build_dt,
2376 transfer_expr): Likewise.
2377 * trans-stmt.c (gfc_trans_label_assign, gfc_trans_pause,
2378 gfc_trans_stop, gfc_trans_character_select): Likewise.
2379 * trans-types.c (gfc_init_types, gfc_get_dtype): Likewise.
2380 * trans.c (gfc_trans_runtime_check): Likewise.
2381
1d754240
PB
23822004-08-14 Paul Brook <paul@codesourcery.com>
2383
2384 * trans-decl.c (gfc_build_function_decl): Remove dead code.
2385
3ef059b4
PB
23862004-08-14 Paul Brook <paul@codesourcery.com>
2387
2388 * trans-arry.c (gfc_trans_auto_array_allocation): Remove unused var.
2389
4f613946
TS
23902004-08-13 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2391
2392 * gfortran.h: Add comments.
2393 * parse.c (parse_contained): Fix comment typo.
2394 * resolve.c (was_declared): Ditto.
2395 * symbol.c: Ditto.
2396
3ec0f302
PB
23972004-08-11 Paul Brook <paul@codeourcery.com>
2398
2399 PR fortran/16917
2400 * intrinsic.c (add_functions): Add dfloat as an alias for dble.
2401
1a186ec5
RH
24022004-08-10 Richard Henderson <rth@redhat.com>
2403
2404 * f95-lang.c (gfc_init_builtin_functions): Remove
2405 __builtin_stack_alloc, add __builtin_alloca.
2406 * trans-array.c (gfc_trans_auto_array_allocation): Use DECL_EXPR.
2407 * trans-decl.c (gfc_trans_auto_character_variable): Likewise.
2408
2bf26ede
PB
24092004-08-10 Paul Brook <paul@codesourcery.com>
2410
2411 * trans-io.c (transfer_expr): Handle pointters.
2412
e9cfef64
PB
24132004-08-10 Paul Brook <paul@codesourcery.com>
2414
2415 PR fortran/16919
2416 * trans-array.c (gfc_add_loop_ss_code): Handle GFC_SS_COMPONENT.
2417 (gfc_conv_array_index_offset): Allow "temporary" with nonzero delta.
2418 (gfc_trans_preloop_setup, gfc_trans_scalarized_loop_boundary):
2419 Handle GFC_SS_COMPONENT.
2420 (gfc_conv_ss_startstride): Ditto. Set ss->shape.
2421 (gfc_conv_loop_setup): Tweak commends. Remove dead code.
2422 Use ss->shape.
2423 (gfc_conv_array_initializer): Call specific initializer routines.
2424 * trans-expr.c (gfc_trans_structure_assign): New function.
2425 (gfc_trans_subarray_assign): New function.
2426 (gfc_trans_subcomponent_assign): New fucntion
2427 (gfc_conv_structure): Use them.
2428 * trans.h (gfc_ss_type): Add GFC_SS_COMPONENT.
2429 (gfc_ss): Add shape.
2430
94538bd1
VL
24312004-08-08 Victor Leikehman <lei@il.ibm.com>
2432
2433 * simplify.c (gfc_simplify_shape): Bugfix.
2434 * expr.c (gfc_copy_shape_excluding): New function.
2435 * gfortran.h (gfc_get_shape): Bugfix.
2436 (gfc_copy_shape_excluding): Added declaration.
2437 * iresolve.c (gfc_resolve_all, gfc_resolve_any, gfc_resolve_count,
2438 gfc_resolve_cshift, gfc_resolve_eoshift, gfc_resolve_lbound,
2439 gfc_resolve_ubound, gfc_resolve_transpose): Added compile
2440 time resolution of shape.
2441
aa6fc635
JB
24422004-08-06 Janne Blomqvist <jblomqvi@cc.hut.fi>
2443
2444 * intrinsic.c (add_subroutines): Add getenv and
2445 get_environment_variable. (add_sym_5s): New function.
2446 * intrinsic.h (gfc_resolve_get_environment_variable): Add
2447 prototype.
2448 * iresolve.c (gfc_resolve_get_environment_variable): New
2449 function.
2450
c7d78bbe
FW
24512004-08-06 Feng Wang <fengwang@nudt.edu.cn>
2452
2453 * f95-lang.c (gfc_init_builtin_functions): Fix the number of
2454 __builtin_pow[f] arguments.
2455
f8e566e5
SK
24562004-08-06 Steven G. Kargl <kargls@comcast.net>
2457
2458 * arith.c: Add #define for model numbers. Remove global GMP variables.
2459 (natural_logarithm,common_logarithm,exponential,sine,
2460 cosine,arctangent,hypercos,hypersine ): Remove.
2461 (gfc_mpfr_to_mpz,gfc_set_model_kind,gfc_set_model): New functions.
2462 (arctangent2,gfc_arith_init_1,gfc_arith_done_1
2463 gfc_check_real_range, gfc_constant_result, gfc_range_check,
2464 gfc_arith_uminus,gfc_arith_plus, gfc_arith_minus, gfc_arith_times,
2465 gfc_arith_divide,complex_reciprocal,complex_pow_ui,
2466 gfc_arith_power,gfc_compare_expr,compare_complex,gfc_convert_real,
2467 gfc_convert_complex,gfc_int2real,gfc_int2complex,
2468 gfc_real2int,gfc_real2real,gfc_real2complex,
2469 gfc_complex2int,gfc_complex2real,gfc_complex2complex): Convert GMP
2470 to MPFR, use new functions.
2471 * arith.h: Remove extern global variables.
2472 (natural_logarithm,common_logarithm,exponential, sine, cosine,
2473 arctangent,hypercos,hypersine): Remove prototypes.
2474 (arctangent2): Update prototype from GMP to MPFR.
2475 (gfc_mpfr_to_mpz, gfc_set_model_kind,gfc_set_model): Add prototypes.
2476 * dump-parse-tree.c (gfc_show_expr): Convert GMP to MPFR.
2477 * expr.c (free_expr0,gfc_copy_expr): Convert GMP to MPFR.
2478 * gfortran.h (GFC_REAL_BITS): Remove.
2479 (arith): Add ARITH_NAN.
2480 Include mpfr.h. Define GFC_RND_MODE.
2481 Rename GCC_GFORTRAN_H GFC_GFC_H.
2482 (gfc_expr): Convert GMP to MPFR.
2483 * module.c: Add arith.h, correct type in comment.
2484 (mio_gmp_real): Convert GMP to MPFR.
2485 (mio_expr): Use gfc_set_model_kind().
2486 * primary.c: Update copyright date with 2004.
2487 (match_real_constant,match_const_complex_part): Convert GMP to MPFR.
2488 * simplify.c: Remove global GMP variables
2489 (gfc_simplify_abs,gfc_simplify_acos,gfc_simplify_aimag,
2490 gfc_simplify_aint,gfc_simplify_dint,gfc_simplify_anint,
2491 gfc_simplify_dnint,gfc_simplify_asin,gfc_simplify_atan,
2492 gfc_simplify_atan2,gfc_simplify_ceiling,simplify_cmplx,
2493 gfc_simplify_conjg,gfc_simplify_cos,gfc_simplify_cosh,
2494 gfc_simplify_dim,gfc_simplify_dprod,gfc_simplify_epsilon,
2495 gfc_simplify_exp,gfc_simplify_exponent,gfc_simplify_floor,
2496 gfc_simplify_fraction,gfc_simplify_huge,gfc_simplify_int,
2497 gfc_simplify_ifix,gfc_simplify_idint,gfc_simplify_log,
2498 gfc_simplify_log10,simplify_min_max,gfc_simplify_mod,
2499 gfc_simplify_modulo,gfc_simplify_nearest,simplify_nint,
2500 gfc_simplify_rrspacing,gfc_simplify_scale,
2501 gfc_simplify_set_exponent,gfc_simplify_sign,gfc_simplify_sin,
2502 gfc_simplify_sinh,gfc_simplify_spacing,gfc_simplify_sqrt,
2503 gfc_simplify_tan,gfc_simplify_tanh,gfc_simplify_tiny,
2504 gfc_simplify_init_1,gfc_simplify_done_1): Convert GMP to MPFR.
2505 Use new functions.
2506 * trans-const.c (gfc_conv_mpfr_to_tree): Rename from
2507 gfc_conv_mpf_to_tree. Convert it to use MPFR
2508 (gfc_conv_constant_to_tree): Use it.
2509 * trans-const.h: Update prototype for gfc_conv_mpfr_to_tree().
2510 * trans-intrinsic.c: Add arith.h, remove gmp.h
2511 (gfc_conv_intrinsic_aint,gfc_conv_intrinsic_mod): Convert GMP to MPFR.
2512
fc90a8f2
PB
25132004-08-06 Victor Leikehman <lei@il.ibm.com>
2514 Paul Brook <paul@codesourcery.com>
2515
2516 * trans-array.c (gfc_trans_allocate_array_storage,
2517 gfc_trans_allocate_temp_array, gfc_add_loop_ss_code,
2518 gfc_conv_loop_setup): For functions, if the shape of the result
2519 is not known in compile-time, generate an empty array descriptor for
2520 the result and let the callee to allocate the memory.
2521 (gfc_trans_dummy_array_bias): Do nothing for pointers.
2522 (gfc_conv_expr_descriptor): Use function return values directly.
2523 * trans-expr.c (gfc_conv_function_call): Always add byref call
2524 insn to pre chain.
2525 (gfc_trans_pointer_assignment): Add comments.
2526 (gfc_trans_arrayfunc_assign): Don't chain on expression.
2527
fc2d8429
RS
25282004-08-01 Roger Sayle <roger@eyesopen.com>
2529
2530 * options.c (gfc_init_options): Don't warn about the use GNU
2531 extensions by default.
2532 (gfc_post_options): Warn about GNU extensions with -pedantic.
2533 (gfc_handle_option): Don't warn about GNU extensions with -std=gnu.
2534
0534fa56
RH
25352004-07-30 Richard Henderson <rth@redhat.com>
2536
2537 * trans-expr.c (gfc_conv_expr_reference): Create a CONST_DECL
2538 for TREE_CONSTANTs.
2539
b785f485
RH
25402004-07-25 Richard Henderson <rth@redhat.com>
2541
2542 * trans-decl.c (gfc_build_function_decl): Set DECL_ARTIFICIAL
2543 and DECL_IGNORED_P on RESULT_DECL.
2544 (gfc_generate_constructors): Likewise.
2545
f56c5d5d
TS
25462004-07-18 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2547
2548 PR fortran/16465
2549 * lang.opt (ffixed-line-length-none, ffixed-line-length-): New
2550 options.
2551 (ffixed-line-length-80, ffixed-line-length-132): Remove.
2552 * options.c (gfc_handle_options): Deal with changed options.
2553 * scanner.c (load_line): Change second arg to 'char **',
2554 allocate if pointing to NULL. Keep track of buffer's length.
2555 Adapt buffer size to overlong lines. Pad lines to full length
2556 in fixed form.
2557 (load_file): Adapt to new interface of load_line.
2558
6e34d3a3
JM
25592004-07-17 Joseph S. Myers <jsm@polyomino.org.uk>
2560
2561 * trans.h (builtin_function): Declare.
2562
c9583ed2
TS
25632004-07-16 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2564
2565 PR fortran/16404
2566 (parts ported from g95)
2567 * parse.h (gfc_state_data): New field do_variable.
2568 (gfc_check_do_variable): Add prototype.
2569 * parse.c (push_state): Initialize field 'do_variable'.
2570 (gfc_check_do_variable): New function.
2571 (parse_do_block): Remember do iterator variable.
2572 (parse_file): Initialize field 'do_variable'.
2573 * match.c (gfc_match_assignment, gfc_match_do,
2574 gfc_match_allocate, gfc_match_nullify, gfc_match_deallocate):
2575 Add previously missing checks.
2576 (gfc_match_return): Reformat error message.
2577 * io.c (match_out_tag): New function.
2578 (match_open_element, match_close_element,
2579 match_file_element, match_dt_element): Call match_out_tag
2580 instead of match_vtag where appropriate.
2581 (match_io_iterator, match_io_element): Add missing check.
2582 (match_io): Reformat error message.
2583 (match_inquire_element): Call match_out_tag where appropriate.
2584
b38b6477
TS
2585 * parse.c (gfc_check_do_variable): Fix error locus.
2586
d157d978
TS
25872004-07-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2588
2589 PR fortran/15129
2590 * trans-decl.c (gfc_build_function_decl): Create a new chardecl
2591 for every assumed length character dummy argument.
2592
c5a41953
TS
2593 PR fortran/15140
2594 * trans-decl.c (gfc_trans_deferred_vars): Remove bogus assertion.
0c0df4b3
TS
2595
2596 PR fortran/13792
2597 * simplify.c (gfc_simplify_bound): Copy the bound expression.
2598
20c9dc8a
TS
25992004-07-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2600
769d99d9 2601 PR fortran/15324
20c9dc8a
TS
2602 * trans-array.c gfc_trans_g77_array,
2603 gfc_trans_dummy_array_bias): Don't call gfc_trans_string_init
2604 for assumed length characters.
2605 (gfc_conv_expr_descriptor): Set se->string_length if dealing
2606 with a character expression.
2607 (gfc_cvonv_array_parameter): Pass string length when passing
2608 character array according to g77 conventions.
2609
597073ac
PB
26102004-07-12 Paul Brook <paul@codesourcery.com>
2611
2612 * expr.c (gfc_check_assign_symbol): Handle pointer assignments.
2613 * trans-array.c (gfc_trans_auto_array_allocation): Remove
2614 initialization code.
2615 * trans-common.c (create_common): Use gfc_conv_initializer.
2616 * trans-decl.c (gfc_get_symbol_decl): Use gfc_conv_initializer.
2617 * trans-expr.c (gfc_conv_initializer): New function.
2618 (gfc_conv_structure): Use it.
2619 * trans.h (gfc_conv_initializer): Add prototype.
2620
682e69e1
PB
26212004-07-11 Paul Brook <paul@codesourcery.com>
2622
2623 PR fortran/15986
2624 * parse.c (gfc_fixup_sibling_symbols): Also look for untyped
2625 variables.
2626 (parse_contained): Mark contained symbols as referenced.
2627
87bdc5f8
TS
26282004-07-11 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2629
953e6630 2630 PR fortran/16455
87bdc5f8
TS
2631 * module.c (gfc_dump_module, gfc_use_module): Print locus
2632 when opening of module file fails.
2633
cdde7b65
TS
2634 PR fortran/16404
2635 * io.c (match_io): Flag 'WRITE(...), ...' as extension.
e08b5a75
TS
2636
2637 PR fortran/16404
2638 * match.c (gfc_match_program): A program name is obligatory.
2639 (gfc_match_return): RETURN in main program is an extension.
2640 (gfc_match_block_data): A space is required before a block data
2641 name.
88199e7c
TS
2642
2643 PR fortran/16433
2644 * primary.c (match_boz_constant): Call gfc_notify_std only if
2645 we actually have a non-standard boz-literal-constant.
2646
f23c5627
TS
2647 PR fortran/15754
2648 * expr.c (gfc_check_assign): Print ranks if incompatible. Issue
2649 warning if assigning NULL().
2650
9dcf6e73
JM
26512004-07-11 Joseph S. Myers <jsm@polyomino.org.uk>
2652
2653 * f95-lang.c (set_block): Remove.
2654 (gfc_clear_binding_stack): New.
2655 (LANG_HOOKS_CLEAR_BINDING_STACK): Define.
2656 (struct binding_level): Remove block_created_by_back_end.
2657 (clear_binding_level): Likewise.
2658 (poplevel): Don't handle block_created_by_back_end.
2659
9cbf8b41
TS
26602004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2661
2662 * trans-decl.c (gfc_create_module_variable): Nothing to do if
2663 symbol is in common, because we ...
2664 (gfc_generate_module_vars): Call gfc_trans_common.
2665
331c72f3
PB
26662004-07-10 Paul Brook <paul@codesourcery.com>
2667
2668 * trans-array.c (gfc_build_null_descriptor): New function.
2669 (gfc_trans_static_array_pointer): Use it.
2670 * trans-array.h (gfc_build_null_descriptor): Add prototype.
2671 * trans-expr.c (gfc_conv_structure): Handle array pointers.
2672
53814b8f 26732004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
f676971a 2674
53814b8f
TS
2675 PR fortran/16336
2676 * decl.c (gfc_match_save): Use-associated common block
2677 doesn't collide.
2678 * gfortran.h (gfc_common_head): Add new field 'name'.
2679 Fix typo in comment after #endif.
2680 * match.c (gfc_get_common): Add new argument from_common,
2681 mangle name if flag is set, fill in new field in structure
2682 gfc_common_head.
2683 (match_common): Set new arg in call to gfc_get_common,
2684 use-associated common block doesn't collide.
2685 * match.h (gfc_get_common): Adapt prototype.
2686 * module.c (load_commons): Set new arg in call to
2687 gfc_get_common.
2688 * symbol.c (free_common_tree): New function.
2689 (gfc_free_namespace): Call new function.
2690 * trans-common.c (several functions): Remove argument
2691 'name', use name from gfc_common_head instead.
2692
7d76d73a
TS
26932004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2694
2695 * expr.c (gfc_check_pointer_assign): Verify that rank of the LHS
2696 and RHS match. Return early if the RHS is NULL().
2697
794ba78b
TS
2698 PR fortran/16336
2699 * match.c (match_common): Fix error reporting for used common.
2700
104b260c
TS
2701 PR fortran/15969
2702 * trans-expr.c (gfc_conv_structure): Handle initialization
2703 of scalar pointer components.
2704
24727d92
TS
2705 * parse.c (decode_statement): Fix matching of BLOCK DATA.
2706
77dc4103
TS
2707 * trans-decl.c (generate_local_decl): Remove workaround obsoleted
2708 by fix for PR 15481.
f676971a 2709
a8a6b603
TS
27102004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2711
2712 * trans-common.c: Fix whitespace issues, make variable names
2713 more readable.
2714 (create_common): Additionally, make loop logic more obvious.
2715
27162004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
ad6e2a18
TS
2717 Paul Brook <paul@codesourcery.com>
2718
2719 PR fortran/13415
2720 * trans-common.c (calculate_length): Remove ...
2721 (get_segment_info): Merge into here. Save field type.
2722 (build_field): Use saved type.
2723 (create_common, new_condition, new_segment, finish_equivalences):
2724 Use new get_segment_info.
2725 * trans-types.c: Update comment.
2726
8598a113 27272004-07-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
f676971a 2728
8598a113
TS
2729 PR fortran/14077
2730 * moduele.c (mio_symbol): Don't I/O initial values unless
2731 symbol is a parameter.
2732
4077d207 27332004-07-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
f676971a 2734
4077d207
TS
2735 PR fortran/13201
2736 * resolve.c (resolve_symbol): Verify that the shape of a
2737 parameter array is not only explicit, but also constant.
2738 * array.c (gfc_is_compile_time_shape): New function.
2739 * gfortran.h (gfc_is_compile_time_shape): Add prototype.
2740
51281118
TS
27412004-07-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2742
2743 PR fortran/15481
2744 PR fortran/13372
2745 PR fortran/13575
2746 PR fortran/15978
2747 * module.c (write_symbol, write_symtree): Remove workaround.
2748 * primary.c (match_actual_arglist): Enhance comment.
2749 (gfc_match_rvalue): Handle function call with first argument
2750 a keyword argument correctly.
2751 * resolve.c (resolve_symbol): Change call to
2752 gfc_set_default_type to issue error if no implicit type
2753 can be found.
2754 * trans-decl.c (gfc_create_module_variable): Remove workaround.
f676971a 2755
60c9a35b
PB
27562004-07-08 Paul Brook <paul@codesourcery.com>
2757
2758 * intrinsic.c (add_sym_4s): New function.
2759 (add_subroutines): Change gfc_add_sym_? to gfc_add_sym_?s.
2760
b41b2534
JB
27612004-07-04 Janne Blomqvist <jblomqvi@cc.hut.fi>
2762 Paul Brook <paul@codesourcery.com>
2763
2764 PR fortran/15280
2765 PR fortran/15665
2766 * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_IARGC and
2767 GFC_ISYM_COMMAND_ARGUMENT_COUNT.
2768 * intrinsic.c (add_functions): Identify iargc. Add
2769 command_argument_count.
2770 (add_subroutines): Resolve getarg. Add get_command and
2771 get_command_argument.
2772 * intrinsic.h (gfc_resolve_getarg, gfc_resolve_get_command,
2773 gfc_resolve_get_command_argument): Add prototypes.
2774 * iresolve.c (gfc_resolve_getarg, gfc_resolve_get_command,
2775 gfc_resolve_get_command_argument): New functions.
2776 * trans-decl.c (gfor_fndecl_iargc): New variable.
2777 (gfc_build_intrinsic_function_decls): Set it.
2778 * trans-intrinsic.c (gfc_conv_intrinsic_iargc): New function.
2779 (gfc_conv_intrinsic_function): Use it.
2780 * trans.h (gfor_fndecl_iargc): Declare.
2781
e62be46e
MK
27822004-07-04 Matthias Klose <doko@debian.org>
2783
2784 * Make-lang.in: Generate and install gfortran man page.
2785 * invoke.texi: Remove extra '@c man end'.
2786
8fff4fc1
RH
27872004-07-04 Richard Henderson <rth@redhat.com>
2788
2789 * f95-lang.c (gfc_mark_addressable): Don't put_var_into_stack.
2790
1107b970
PB
27912004-07-04 Paul Brook <paul@codesourcery.com>
2792
2793 * decl.c (gfc_match_implicit_range): Don't use typespec.
2794 (gfc_match_implicit): Handle character selectors.
2795 * gfortran.h (gfc_set_implicit): Remove prototype.
2796 (gfc_add_new_implicit_range, gfc_merge_new_implicit): Update.
2797 * parse.c (accept_statement): Don't call gfc_set_implicit.
2798 * symbol.c (new_ts): Remove.
2799 (gfc_set_implicit_none): Use same loop bounds as other functions.
2800 (gfc_set_implicit): Remove.
2801 (gfc_clear_new_implicit, gfc_add_new_implicit_range): Only set flags.
2802 (gfc_merge_new_implicit): Combine with gfc_set_implicit.
2803
4025c040
RH
28042004-06-30 Richard Henderson <rth@redhat.com>
2805
276b3fab
RH
2806 * match.c (var_element): Remove unused variable.
2807
4025c040
RH
2808 * trans-decl.c (gfc_generate_function_code): Don't set
2809 x_whole_function_mode_p.
2810 (gfc_generate_constructors): Likewise.
2811
6a0bec2c
RH
28122004-06-30 Richard Henderson <rth@redhat.com>
2813
2814 * trans-decl.c (gfc_generate_function_code): Don't set
2815 immediate_size_expand.
2816 (gfc_generate_constructors): Likewise.
2817
e5ddaa24
TS
28182004-06-30 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2819
2820 PR fortran/16161
2821 * decl.c (gfc_match_type_spec): Rename second argument to
2822 'implicit_flag', reverse meaning. Don't match_char_spec if
2823 'implicit_flag' is set. Rename to ...
2824 (match_type_spec): ... this.
2825 (gfc_match_implicit_none, match_implicit_range): Move here
2826 from match.c.
2827 (gfc_match_implicit): Move here from match.c, try to
2828 match_char_len if match_implicit_range doesn't succeed for
2829 CHARACTER implicits. Call renamed fucntion match_type_spec.
2830 (gfc_match_data_decl, match_prefix): Call renamed function
2831 match_type_spec.
2832 * match.c (gfc_match_implicit_none, match_implicit_range,
2833 gfc_match_implicit): Move to decl.c.
2834 * match.h (gfc_match_implicit_none, gfc_match_implicit):
2835 Move protoypes to section 'decl.c'.
2836 (gfc_match_type_spec): Remove prototype.
2837
ef558756
TS
28382004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2839
f676971a 2840 * decl.c, interface.c, symbol.c, trans-common.c: Add 2004 to
ef558756
TS
2841 copyright years.
2842
7ab92584
SB
28432004-06-29 Steven Bosscher <stevenb@suse.de>
2844
2845 Make sure types in assignments are compatible. Mostly mechanical.
2846 * trans-const.h (gfc_index_one_node): New define.
2847 * trans-array.c (gfc_trans_allocate_array_storage,
2848 gfc_trans_allocate_temp_array, gfc_trans_array_constructor_subarray,
2849 gfc_trans_array_constructor_value, gfc_trans_array_constructor,
2850 gfc_conv_array_ubound, gfc_conv_array_ref,
2851 gfc_trans_scalarized_loop_end, gfc_conv_section_startstride,
2852 gfc_conv_ss_startstride, gfc_conv_loop_setup, gfc_array_init_size,
2853 gfc_trans_array_bounds, gfc_trans_dummy_array_bias,
2854 gfc_conv_expr_descriptor, gfc_trans_deferred_array): Use the correct
2855 types in assignments, conversions and conditionals for expressions.
2856 * trans-expr.c (gfc_conv_expr_present, gfc_conv_substring,
2857 gfc_conv_unary_op, gfc_conv_cst_int_power, gfc_conv_string_tmp,
2858 gfc_conv_function_call, gfc_trans_pointer_assignment,
2859 gfc_trans_scalar_assign): Likewise.
2860 * trans-intrinsic.c (build_fixbound_expr, gfc_conv_intrinsic_bound,
2861 gfc_conv_intrinsic_anyall, gfc_conv_intrinsic_count,
2862 gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_btest,
2863 gfc_conv_intrinsic_singlebitop, gfc_conv_intrinsic_ishft,
2864 gfc_conv_intrinsic_ishftc, gfc_conv_intrinsic_strcmp,
2865 gfc_conv_allocated, gfc_conv_associated,
2866 gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_trim): Likewise.
2867 * trans-io.c (set_string): Likewise.
2868 * trans-stmt.c (gfc_trans_do, gfc_trans_forall_loop,
2869 gfc_do_allocate, generate_loop_for_temp_to_lhs,
2870 generate_loop_for_rhs_to_temp, compute_inner_temp_size,
2871 compute_overall_iter_number, gfc_trans_assign_need_temp,
2872 gfc_trans_pointer_assign_need_temp, gfc_trans_forall_1,
2873 gfc_evaluate_where_mask, gfc_trans_where_assign,
2874 gfc_trans_where_2): Likewise.
2875 * trans-types.c (gfc_get_character_type, gfc_build_array_type,
2876 gfc_get_nodesc_array_type, gfc_get_array_type_bounds): Likewise.
2877
2878 * trans.c (gfc_add_modify_expr): Add sanity check that types
2879 for the lhs and rhs are the same for scalar assignments.
2880
fbc9b453
TS
28812004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2882
2883 * dump-parse-tree.c (show_common): New function.
2884 (gfc_show_namespace): Show commons.
2885
9056bd70
TS
28862004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2887 Andrew Vaught <andyv@firstinter.net>
2888
2889 PR fortran/13249
2890 PR fortran/15481
ef558756 2891 * decl.c (gfc_match_save): Adapt to new common structures,
9056bd70
TS
2892 don't allow saving USE-associated common.
2893 * dump-parse-tree (gfc_show_attr): (saved_)common are not
2894 symbol attributes any longer.
2895 (gfc_show_symbol): Don't show old-style commons any longer.
2896 (gfc_show_namespace): Adapt call to gfc_traverse_symtree to new
2897 interface.
2898 * gfortran.h (symbol_attribute): Remove common and saved_common
2899 attributes.
2900 (gfc_symbol): Remove common_head element.
2901 (gfc_common_head): New struct.
2902 (gfc_get_common_head): New macro.
2903 (gfc_symtree): Add field 'common' to union.
2904 (gfc_namespace): Add field 'common_root'; change type of field
2905 'blank_common' to blank_common.
2906 (gfc_add_data): New prototype.
2907 (gfc_traverse_symtree): Expect a symtree as first argument
2908 instead of namespace.
2909 * match.c (gfc_get_common): New function.
2910 (match_common_name): Change to take char * as argument, adapt,
2911 fix bug with empty name.
2912 (gfc_match_common): Adapt to new data structures. Disallow
2913 redeclaration of USE-associated COMMON-block. Fix bug with
2914 empty common.
2915 (var_element): Adapt to new common structures.
2916 * match.h (gfc_get_common): Declare.
2917 * module.c: Add 2004 to copyright years, add commons to module
2918 file layout description.
2919 (ab_attribute, attr_bits, mio_symbol_attributes): Remove code
2920 for removed attributes.
2921 (mio_symbol): Adapt to new way of storing common relations.
2922 (load_commons): New function.
2923 (read_module): Skip common list on first pass, load_commons at
2924 second.
2925 (write_commons): New function.
2926 (write_module): Call write_commons().
2927 * symbol.c (gfc_add_saved_comon, gfc_add_common): Remove
2928 functions related to removed attributes.
2929 (gfc_add_data): New function.
2930 (gfc_clear_attr): Don't set removed attributes.
2931 (gfc_copy_attr): Don't copy removed attributes.
2932 (traverse_symtree): Remove.
f676971a 2933 (gfc_traverse_symtree): Don't traverse symbol
9056bd70
TS
2934 tree of the passed namespace, but require a symtree to be passed
2935 instead. Unify with traverse_symtree.
2936 (gfc_traverse_ns): Call gfc_traverse_symtree according to new
2937 interface.
2938 (save_symbol): Remove setting of removed attribute.
2939 * trans-common.c (gfc_sym_mangled_common_id): Change to
2940 take 'char *' argument instead of 'gfc_symbol'.
2941 (build_common_decl, new_segment, translate_common): Adapt to new
2942 data structures, add new
2943 argument name.
2944 (create_common): Adapt to new data structures, add new
2945 argument name. Fix typo in intialization of derived types.
2946 (finish_equivalences): Add second argument in call to
2947 create_common.
2948 (named_common): take 'gfc_symtree' instead of 'gfc_symbol'.
2949 (gfc_trans_common): Adapt to new data structures.
f676971a 2950 * trans-decl.c (gfc_create_module_variables): Remove test for
e23667c6 2951 removed attribute.
9056bd70 2952
50d78f96
TS
29532004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2954
2955 * io.c: Add 2004 to copyright years.
2956
c9543002
TS
29572004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2958 Andrew Vaught <andyv@firstinter.net>
2959
2960 * gfortran.h (gfc_gsymbol): New typedef.
2961 (gfc_gsym_root): New variable.
2962 (gfc_get_gsymbol, gfc_find_gsym): New prototypes.
2963 * parse.c (global_used): New function.
2964 (parse_block_data): Check for double empty BLOCK DATA,
2965 use global symbol table.
2966 (parse_module): Use global symbol table.
2967 (add_global_procedure, add_global_program): New functions.
2968 (gfc_parse_file): Use global symbol table.
2969 * symbol.c (gfc_gsym_root): New variable.
2970 (gfc_find_gsym, gsym_compare, gfc_get_gsymbol): New
2971 functions.
2972
78f2fb08
TS
29732004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2974
2975 * module.c (mio_gmp_real): Correct writing of negative numbers.
2976
29772004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
e063a048
TS
2978
2979 PR fortran/15963
2980 * expr.c (check_intrinsic_op): Allow comparison of characters.
2981 Make logic easier.
2982
ddc9ce91
TS
29832004-06-26 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2984 Andrew Vaught <andyv@firstinter.net>
2985
2986 * decl.c (contained_procedure): New function.
2987 (match_end): Verify correctness of END STATEMENT in
2988 all cases.
2989
29902004-06-26 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2991 Andrew Vaught <andyv@firstinter.net>
0ff0dfbf
TS
2992
2993 PR fortran/15190
2994 * decl.c (gfc_match_type_spec), io.c (match_io), parse.c
2995 (decode_statement): Enforce required space in free-form.
2996
ddc9ce91 29972004-06-22 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
44de5aeb
RK
2998
2999 * f95-lang.c (LANG_HOOKS_GIMPLE_BEFORE_INLINING): Deleted.
3000 * trans-array.c (gfc_conv_descriptor_data): Add operand
3001 for COMPONENT_REF.
3002 (gfc_conv_descriptor_offset, gfc_conv_descriptor_dtype): Likewise.
3003 (gfc_conv_descriptor_dimension, gfc_conv_descriptor_stride): Likewise.
3004 (gfc_conv_descriptor_lbound, gfc_conv_descriptor_ubound): Likewise.
3005 * trans-common.c (create_common): Likewise.
3006 * trans-expr.c (gfc_conv_component_ref): Likewise.
3007 * trans-io.c (set_parameter_value): Likewise.
3008 (set_parameter_ref, set_string, set_flag, io_result): Likewise.
3009 (transfer_expr): Likewise.
3010 * trans-decl.c (gfc_trans_auto_character_variable):
3011 Set up to get DECL_SIZE and DECL_SIZE_UNIT gimplified.
ddc9ce91 3012 (gfc_gimplify_function): New function.
44de5aeb
RK
3013 (gfc_generate_function-code): Properly handle nested functions.
3014 * trans.c (gfc_build_array_ref): Add two new operands for ARRAY_REF.
3015
8750f9cd
JB
30162004-06-22 Janne Blomqvist <jblomqvi@cc.hut.fi>
3017
3018 PR fortran/15750
3019 * io.c (gfc_match_inquire): Bugfix for iolength related stuff.
3020 (gfc_resolve_inquire): Resolve the iolength tag. Return
3021 SUCCESS at end of function if no failure has occured.
3022 * resolve.c (resolve_code): Resolve if iolength is encountered.
3023 * trans-io.c: (ioparm_iolength, iocall_iolength,
3024 iocall_iolength_done): New variables.
3025 (last_dt): Add IOLENGTH.
3026 (gfc_build_io_library_fndecls ): Set iolength related variables.
3027 (gfc_trans_iolength): Implement.
3028 (gfc_trans_dt_end): Treat iolength as a third form of data transfer.
3029
fa841200
TS
30302004-06-21 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de
3031
3032 PR fortran/15511
3033 * scanner.c (load_line): Don't truncate preprocessor lines.
3034 Reformat error message.
3035 (preprocessor_line): Issue warning in case of malformed
f676971a 3036 preprocessor line.
fa841200 3037
f5e440e1
TS
30382004-06-21 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3039
3040 * resolve.c (resolve_symbol): Add comment in function body.
3041 (check_data_variable): Change type of mark to ar_type, adapt code
3042 accordingly.
3043
da4f9e3b
TS
30442004-06-21 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3045
3046 * array.c (gfc_insert_constructor): Avoid redundant call to
3047 mpz_comp. Add 2004 to copyright years.
f676971a 3048
b40410b9
JM
30492004-06-21 Joseph S. Myers <jsm@polyomino.org.uk>
3050
3051 * trans.h (stmtblock_t): Change has_scope to unsigned int.
3052
160874e4
SK
30532004-06-20 Steven G. Kargl <kargls@comcast.net>
3054
3055 * arith.c (gfc_range_check): correct complex underflow.
3056
6ef42154
TS
30572004-06-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3058
3059 PR fortran/15962
3060 * match.c (match_case_selector): Call gfc_match_init_expr
3061 instead of gfc_match_expr.
3062 * resolve.c (validate_case_label_expr): No need to check for
3063 constant, since it wouldn't have been matched with the fix to
3064 match.c.
3065
f51d8522 30662004-06-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
7031baf4
TS
3067
3068 PR fortran/15211
3069 * trans-intrinsic.c (gfc_conv_intrinsic_len): Deal with arrays
f676971a 3070 of strings.
7031baf4 3071
ce738b86
TS
30722004-06-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3073
3074 PR fortran/15510
3075 * trans-deecl.c (generate_local_decl): Do not issue warning for
3076 unused variables if they're use associated.
3077
30782004-06-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
6615c446 3079 Andrew Vaught <andyv@firstinter.net>
f3207b37
TS
3080
3081 PR fortran/14928
3082 * gfortran.h (gfc_check_f): Add new field f3ml.
3083 * check.c (gfc_check_minloc_maxloc): Take argument list instead
3084 of individual arguments, reorder if necessary.
3085 * intrinsic.h (gfc_check_minloc_maxloc): ... adapt prototype.
3086 * intrinsic.c (add_sym_3ml): New function.
3087 (add_functions): Change to add_sym_3ml for MINLOC, MAXLOC.
f676971a 3088 (check_specific): Catch special case MINLOC, MAXLOC.
f3207b37 3089
6956a6f3
PB
30902004-06-14 Paul Brook <paul@codesourcery.com>
3091
3092 * intrinsic.c (add_sym_2s): Use correct function types.
3093
fd528377
TS
30942004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3095
b3b65c9a 3096 * Make-lang.in (F95_OBJS, F95_PARSER_OBJS): Alphabetize. Move data.c
fd528377
TS
3097 * data.c (gfc_get_section_index): Remove dependency on trans.h.
3098
2bd74949
SK
30992004-06-12 Steven G. Kargl <kargls@comcast.net>
3100
3101 * check.c (gfc_check_second_sub, gfc_check_irand, gfc_check_rand
3102 gfc_check_srand, gfc_check_etime, gfc_check_etime_sub): New functions.
3103 * gfortran.h (gfc_generic_isym_id): New symbols GFC_ISYM_ETIME,
3104 GFC_ISYM_IRAND, GFC_ISYM_RAND, GFC_ISYM_SECOND.
3105 * trans-intrinsic.c: Use symbols.
3106 * intrinsic.c (add_sym_2s): New function.
3107 * intrinsic.c: Add etime, dtime, irand, rand, second, srand.
3108 * intrinsic.h: Function prototypes.
f676971a 3109 * iresolve.c (gfc_resolve_etime_sub, gfc_resolve_second_sub
2bd74949
SK
3110 gfc_resolve_srand): New functions.
3111
c52eae8d
TS
31122004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3113
3114 PR fortran/14957
3115 * decl.c (gfc_match_end): Require END {SUBROUTINE|FUNCTION} for
3116 contained procedure.
f676971a 3117
662ef0f5
TS
31182004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3119
3120 PR fortran/12841
3121 * interface.c (compare_parameter, compare_actual_formal): Don't
3122 check types and array shapes for NULL()
3123 * trans-expr.c (conv_function_call): No double indirection for
f676971a 3124 NULL()
662ef0f5 3125
293155b0
TM
31262004-06-09 Toon Moene <toon@moene.indiv.nluug.nl>
3127
3128 * trans-expr.c (gfc_conv_cst_int_power): Compute
3129 x**(-n) by converting it to (1/x)**n instead of
3130 1/x**n.
3131
62f1d470
TS
31322004-06-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3133
3134 PR fortran/13372
3135 * module.c (write_symbol, write_symtree): Don't write symbols
3136 wrongly added to namespace.
3137 * trans-decl.c (gfc_create_module_variable): Don't create a
3138 backend decl for a symbol incorrectly added to namespace.
3139
a4ac5dd3
TS
31402004-06-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3141
3142 PR fortran/13201
3143 * resolve.c (resolve_symbol): Verify that parameter array has an
3144 explicit shape. Fix typos and coding style issues in surrounding
3145 lines.
3146
31472004-06-05 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
e0f2a7c6
TS
3148
3149 PR fortran/15478
3150 * gfortran.texi: The documentation doesn't contain infomration on
3151 how to report bugs, and shouldn't, so remove the line which
3152 says it does.
3153
f9fed73b
TS
31542004-06-05 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3155
f676971a 3156 * intrinsic.c (sort_actual): Keep track of type of missing
f9fed73b
TS
3157 arguments. (Missing from previous commit.)
3158
1600fe22
TS
31592004-06-03 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3160
3161 * gfortran.h (gfc_actual_arglist): New field missing_arg_type.
3162 * interface.c (compare_actual_formal): Keep type of omitted
3163 optional arguments.
3164 * trans-expr.c (gfc_conv_function_call): Add string length
3165 argument for omitted string argument.
3166
31672004-06-03 Paul Brook <paul@codesourcery.com>
7c87eac6
PB
3168
3169 * trans.c (gfc_finish_block, gfc_add_expr_to_block): Build statement
3170 lists instead of compound expr chains.
3171 (gfc_trans_code): Annotate statement lists.
3172
13413760
TS
31732004-06-03 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3174
3175 * trans-array.c: Fix spelling in comments.
3176
2fa54841
TS
31772004-06-02 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3178
3179 PR fortran/15557
3180 * data.c (assign_substring_data_value): New function.
3181 (gfc_assign_data_value): Call the new function if we're dealing
3182 with a substring LHS.
3183
ea0ece09
TS
31842004-06-01 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3185
3186 PR fortran/15477
3187 * gfortran.h (GFC_VERSION): Remove.
3188 * gfortran.texi (version-gfortran): Remove, replace by version-GCC
3189 where used.
3190
c3e8c6b8
TS
31912004-05-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3192
3193 * trans-types.c: Fix spelling & layout in comments.
3194
94716287
TS
31952004-05-30 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3196
3197 PR fortran/14067
3198 * trans-const.c (gfc_conv_string_init): Allow variable string
3199 length lower than initialization string length.
3200
7b5b57b7
PB
32012004-05-30 Paul Brook <paul@codesourcery.com>
3202
3203 PR fortran/15620
3204 * trans-decl.c (gfc_shadow_sym, gfc_restore_sym): New functions.
3205 * trans-expr.c (gfc_trans_string_copy): New function.
3206 (gfc_conv_statement_function): Use them. Create temp vars. Enforce
3207 character lengths.
3208 (gfc_conv_string_parameter): Use gfc_trans_string_copy.
3209 * trans-stmt.c (gfc_trans_forall_1): Use gfc_{shadow,restore}_sym.
3210 * trans.h (struct gfc_saved_var): Define.
3211 (gfc_shadow_sym, gfc_restore_sym): Add prototypes.
3212
5f251c26
SK
32132004-05-30 Steven G. Kargl <kargls@comcast.net>
3214
3215 * iresolve.c (gfc_resolve_random_number): Clean up conditional.
3216
e73c80ae
SK
32172004-05-29 Steven G. Kargl <kargls@comcast.net>
3218
3219 * simplify.c (gfc_simplify_log): Remove useless line of code.
3220
353c3b7e
PB
32212004-05-29 Paul Brook <paul@codesourcery.com>
3222
3223 * trans-common.c (find_equivalence): Find multiple rules.
3224
63645982
TS
32252004-05-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3226
3227 * gfortran.h (gfc_current_locus, gfc_set_locus): Remove.
3228 (gfc_current_locus): Declare new global variable.
3229 * scanner.c (gfc_current_locus, gfc_set_locus): Remove.
3230 (gfc_current_locus1): Rename ...
3231 (gfc_current_locus): ... to this.
3232 (gfc_at_eof, gfc_at_bol, gfc_at_eol, gfc_advance_line, next_char,
3233 skip_fixed_comments, skip_free_comments, gfc_next_char_literal,
3234 gfc_peek_char, gfc_gobble_whitespace, gfc_new_file): Use
3235 gfc_current_locus instead of gfc_current_locus1, gfc_set_locus()
3236 and gfc_current_locus(), respectively.
3237 * array.c (match_subscript, gfc_match_array_ref, match_array_list,
3238 match_array_cons_element, gfc_match_array_constructor):
3239 Read/modify gfc_current_locus instead of calling gfc_set_locus()
3240 and gfc_current_locus().
3241 * decl.c (gfc_match_null, variable_decl, gfc_match_kind_spec,
3242 match_attr_spec, gfc_match_function_decl, gfc_match_end,
3243 attr_decl1, gfc_match_save): Likewise.
3244 * error.c (error_print, gfc_internal_error): Likewise.
3245 * expr.c (gfc_int_expr, gfc_default_logical_kind): Likewise.
3246 * interface.c (gfc_add_interface): Likewise.
3247 * io.c (gfc_match_format, match_dt_format, match_dt_element,
3248 match_io_iterator, match_io): Likewise.
3249 * match.c (gfc_match_space, gfc_match_eos,
3250 gfc_match_small_literal_int, gfc_match_st_label,
3251 gfc_match_strings, gfc_match_name, gfc_match_iterator,
3252 gfc_match_char, gfc_match, gfc_match_assignment,
3253 gfc_match_pointer_assignment, gfc_match_if, gfc_match_do,
3254 gfc_match_nullify, gfc_match_call, match_implicit_range,
3255 gfc_match_implicit, gfc_match_data, match_case_selector,
3256 gfc_match_case, match_forall_iterator): Likewise.
3257 * matchexp.c (gfc_match_defined_op_name, next_operator,
3258 match_level_1, match_mult_operand, match_ext_mult_operand,
3259 match_add_operand, match_ext_add_operand, match_level_2,
3260 match_level_3, match_level_4, match_and_operand, match_or_operand,
3261 match_equiv_operand, match_level_5, gfc_match_expr): Likewise.
3262 * module.c (gfc_match_use, mio_array_ref, mio_expr): Likewise.
3263 * parse.c (match_word, decode_statement, next_free, next_fixed,
3264 add_statement, verify_st_order, parse_if_block, gfc_parse_file):
3265 Likewise.
3266 * primary.c (match_digits, match_integer_constant,
3267 match_boz_constant, match_real_constant, match_substring,
3268 next_string_char, match_charkind_name, match_string_constant,
3269 match_logical_constant, match_const_complex_part,
3270 match_complex_constant, match_actual_arg, match_keyword_arg,
3271 gfc_match_actual_arglist, gfc_match_structure_constructor,
3272 gfc_match_rvalue, gfc_match_variable): Likewise.
3273 * st.c (gfc_get_code): Likewise.
3274 * symbol.c (check_conflict, check_used, check_done,
3275 duplicate_attr, add_flavor, gfc_add_procedure, gfc_add_intent,
3276 gfc_add_access, gfc_add_explicit_interface, gfc_add_type,
3277 gfc_add_component, gfc_reference_st_label, gfc_new_symbol): Likewise.
3278
4eeaf81e
RS
32792004-05-26 Roger Sayle <roger@eyesopen.com>
3280
3281 * io.c (format_asterisk): Silence compiler warnings by correcting
3282 the number of elements of a "locus" initializer.
3283
a2f29587
RS
32842004-05-25 Roger Sayle <roger@eyesopen.com>
3285
3286 PR fortran/13912
3287 * matchexp.c: Allow unary operators after arithmetic operators
3288 as a GNU extension.
3289 (match_ext_mult_operand, match_ext_add_operand): New functions.
3290 (match_mult_operand): Tweak to call match_ext_mult_operand.
3291 (match_add_operand): Tweak to call match_ext_mult_operand.
3292 (match_level_2): Rearrange to call match_ext_add_operand.
3293
45aae8f2
PB
32942004-05-25 Paul Brook <paul@codesourcery.com>
3295
3296 * expr.c (check_inquiry): Remove bogus tests.
3297
40e929f3
PB
32982004-05-23 Paul Brook <paul@codesourcery.com>
3299
3300 PR fortran/13773
3301 * expr.c (restricted_args): Remove redundant checks/argument.
3302 (external_spec_function): Update to match.
3303 (restricted_intrinsic): Rewrite.
3304
5291e69a
PB
33052004-05-23 Paul Brook <paul@codesourcery.com>
3306 Victor Leikehman <lei@haifasphere.co.il>
3307
3308 * gfortran.h (struct gfc_symbol): Add equiv_built.
3309 * trans-common.c: Change int to HOST_WIDE_INT. Capitalize error
3310 messages.
3311 (current_length): Remove.
3312 (add_segments): New function.
3313 (build_equiv_decl): Create initialized common blocks.
3314 (build_common_decl): Always add decl to bindings.
3315 (create_common): Create initializers.
3316 (find_segment_info): Reformat to match coding conventions.
3317 (new_condition): Use add_segments.
3318 (add_condition, find_equivalence, add_equivalences): Move iteration
3319 inside functions. Only process each segment once.
3320 (new_segment, finish_equivalences, translate_common): Simplify.
3321
95d3f567
SK
33222004-05-23 Steven G. Kargl <kargls@comcast.net>
3323
3324 * check.c (gfc_check_random_seed): Issue for too many arguments.
3325
c1c52409
PB
33262004-05-22 Steven G. Kargl <kargls@comcast.net>
3327
3328 * intrinsic.c (add_subroutines): Use add_sym_3s for random_seed.
3329
33302004-05-22 Paul Brook <paul@codesourcery.com>
1854117e
PB
3331
3332 * dump-parse-tree.c (gfc_show_equiv): New function.
3333 (gfc_show_namespace): Use it.
3334
b6720768
VL
33352004-05-22 Victor Leikehman <lei@haifasphere.co.il>
3336
3337 PR fortran/13249
3338 * symbol.c (gfc_add_common): Disable checks to work around other more
3339 fundamental inadequacies.
3340
8c1d6d62 3341