]> gcc.gnu.org Git - gcc.git/blob - gcc/fortran/ChangeLog
trans-common.c (create_common): Build RECORD_NODE for common blocks contain no equiva...
[gcc.git] / gcc / fortran / ChangeLog
1 2005-03-26 Canqun Yang <canqun@nudt.edu.cn>
2
3 * trans-common.c (create_common): Build RECORD_NODE for common blocks
4 contain no equivalence objects.
5 (add_equivalences): New argument saw_equiv.
6 (trans_common): New local variable saw_equiv.
7 (finish_equivalences): Add a local variable dummy, Always pass true
8 for the 3rd parameter to create_common.
9
10 2005-03-25 Steven G. Kargl <kargls@comcast.net>
11
12 * intrinsic.texi: Fix "make dvi"
13
14 2005-03-24 Steven G. Kargl <kargls@comcast.net>
15
16 * intrinsic.texi: New file.
17 * gfortran.texi: Include it; white space change; fix typo.
18
19 2005-03-23 Joseph S. Myers <joseph@codesourcery.com>
20
21 * f95-lang.c (LANG_HOOKS_TRUTHVALUE_CONVERSION): Remove.
22
23 2005-03-23 Steven Bosscher <stevenb@suse.de>
24
25 * convert.c (convert): Replace fold (buildN (...)) with fold_buildN.
26 * trans-array.c (gfc_trans_allocate_array_storage,
27 gfc_trans_allocate_temp_array gfc_trans_array_constructor_value,
28 gfc_conv_array_index_ref, gfc_trans_array_bound_check,
29 gfc_conv_array_index_offset, gfc_conv_scalarized_array_ref,
30 gfc_conv_array_ref, gfc_trans_preloop_setup, gfc_conv_ss_startstride,
31 gfc_conv_loop_setup, gfc_array_init_size, gfc_trans_array_bounds,
32 gfc_trans_auto_array_allocation, gfc_trans_dummy_array_bias,
33 gfc_conv_expr_descriptor): Likewise.
34 * trans-expr.c (gfc_conv_powi, gfc_conv_string_tmp,
35 gfc_conv_concat_op, gfc_conv_expr_op): Likewise.
36 * trans-intrinsic.c (build_round_expr, gfc_conv_intrinsic_bound,
37 gfc_conv_intrinsic_cmplx, gfc_conv_intrinsic_sign,
38 gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_minmaxval,
39 gfc_conv_intrinsic_btest, gfc_conv_intrinsic_bitop,
40 gfc_conv_intrinsic_singlebitop, gfc_conv_intrinsic_ibits,
41 gfc_conv_intrinsic_ishft, gfc_conv_intrinsic_ishftc,
42 gfc_conv_intrinsic_merge, prepare_arg_info,
43 gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_repeat): Likewise.
44 * trans-stmt.c (gfc_trans_simple_do, gfc_trans_do, gfc_trans_do_while,
45 gfc_trans_forall_loop, gfc_do_allocate, generate_loop_for_temp_to_lhs,
46 generate_loop_for_rhs_to_temp, compute_inner_temp_size,
47 allocate_temp_for_forall_nest, gfc_trans_pointer_assign_need_temp,
48 gfc_trans_forall_1, gfc_evaluate_where_mask, gfc_trans_where_assign):
49 Likewise.
50 * trans-types.c (gfc_get_dtype, gfc_get_array_type_bounds): Likewise.
51 * trans.c (gfc_add_modify_expr): Likewise.
52
53 2005-03-22 Francois-Xavier Coudert <coudert@clipper.ens.fr>
54
55 * check.c (gfc_check_chdir, gfc_check_chdir_sub, gfc_check_kill,
56 gfc_check_kill_sub, gfc_check_link, gfc_check_link_sub,
57 gfc_check_symlnk, gfc_check_symlnk_sub, gfc_check_rename,
58 gfc_check_rename_sub, gfc_check_sleep_sub, gfc_check_gerror,
59 gfc_check_getlog, gfc_check_hostnm, gfc_check_hostnm_sub,
60 gfc_check_perror): new functions to check newly implemented
61 g77 intrinsics.
62 * gfortran.h: adding symbols for new intrinsics.
63 * intrinsic.c (add_functions): adding new intrinsics.
64 (add_subroutines): adding new intrinsics.
65 * intrinsic.h: prototype for all checking and resolving
66 functions.
67 * iresolve.c (gfc_resolve_chdir, gfc_resolve_chdir_sub,
68 gfc_resolve_hostnm, gfc_resolve_ierrno, gfc_resolve_kill,
69 gfc_resolve_link, gfc_resolve_rename, gfc_resolve_symlnk,
70 gfc_resolve_time, gfc_resolve_time8, gfc_resolve_rename_sub,
71 gfc_resolve_kill_sub, gfc_resolve_link_sub,
72 gfc_resolve_symlnk_sub, gfc_resolve_sleep_sub,
73 gfc_resolve_gerror, gfc_resolve_getlog, gfc_resolve_hostnm_sub,
74 gfc_resolve_perror): new functions to resolve intrinsics.
75 * trans-intrinsic.c (gfc_conv_intrinsic_function): add case
76 for new symbols.
77
78 2005-03-19 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
79
80 * dump-parse-tree.c (gfc_show_expr): Dump name of namespace
81 in which the variable is declared.
82
83 PR fortran/18525
84 * resolve.c (was_declared): Also check for dummy attribute.
85
86 2005-03-19 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
87
88 * gfortran.h (arith): Remove ARITH_0TO0.
89 * arith.c (gfc_arith_error): Remove handling of ARITH_0TO0.
90 (gfc_arith_power): Remove special casing of zero to integral
91 power zero.
92
93 2005-03-18 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
94
95 * Make-lang.in (fortran-warn): Remove -Wno-error.
96 (expr.o-warn, resolve.o-warn, simplify.o-warn,
97 trans-common.o-warn): Specify -Wno-error.
98
99 2005-03-17 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
100
101 * trans-array.c (gfc_trans_static_array_pointer,
102 get_array_ctor_var_strlen, gfc_conv_array_index_offset): Fix
103 comment and formatting typos.
104
105 2005-03-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
106
107 * invoke.texi: Fix typos.
108
109 2005-03-15 Zack Weinberg <zack@codesourcery.com>
110
111 * Make-lang.in (GFORTRAN_TEXI): Add gcc-vers.texi.
112
113 2005-03-15 Feng Wang <fengwang@nudt.edu.cn>
114
115 * trans-stmt.c (gfc_trans_label_assign): Don't set DECL_ARTIFICIAL flag
116 to zero on label_tree.
117
118 2005-03-15 Feng Wang <fengwang@nudt.edu.cn>
119
120 PR fortran/18827
121 * io.c (resolve_tag): Add checking on assigned label.
122 (match_dt_format): Does not set symbol assign attribute.
123 * match.c (gfc_match_goto):Does not set symbol assign attribute.
124 * resolve.c (resolve_code): Add checking on assigned label.
125 * trans-common.c (build_field): Deals with common variable assigned
126 a label.
127 * trans-stmt.c (gfc_conv_label_variable): New function.
128 (gfc_trans_label_assign): Use it.
129 (gfc_trans_goto): Ditto.
130 * trans-io.c (set_string): Ditto.
131 * trans.h (gfc_conv_label_variable): Add prototype.
132
133 2005-03-14 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
134
135 PR fortran/20467
136 * symbol.c (check_conflict): A dummy argument can't be a statement
137 function.
138
139 2005-03-14 Zdenek Dvorak <dvorakz@suse.cz>
140
141 * fortran/trans-intrinsic.c (gfc_conv_intrinsic_ishft): Convert
142 the argument of the shift to the unsigned type.
143
144 2005-03-13 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
145
146 PR fortran/16907
147 * resolve.c (gfc_resolve_index): Allow REAL indices as an extension.
148
149 2005-03-13 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
150
151 PR fortran/20323
152 * resolve.c (gfc_resolve): Check if character lengths are
153 specification expressions.
154
155 2005-03-12 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
156
157 PR fortran/20361
158 * trans-array.c (gfc_stack_space_left): Remove unused variable.
159 (gfc_can_put_var_on_stack): Move to trans-decl.c, remove #if 0'ed
160 code.
161 * trans-array.h (gfc_stack_space_left, gfc_can_put_var_on_stack):
162 Remove declaration / prototype.
163 * trans-common.c (build_equiv_decl): Give union a name. Check if
164 it can be put on the stack.
165 * trans-decl.c (gfc_stack_space_left): Move function here.
166 (gfc_build_qualified_array): Fix comment typo.
167 * trans.h (gfc_put_var_on_stack): Add prototype.
168
169 2005-03-11 Kaveh R. Ghazi <ghazi@caip.rutgers.edu>
170
171 * Make-lang.in (fortran-warn): Set to $(STRICT_WARN) -Wno-error.
172 * decl.c, trans.c: Don't use C++ style comments.
173 * gfortran.h (sym_flavor, procedure_type, sym_intent, gfc_access,
174 ifsrc): Give names to enums and use ENUM_BITFIELD.
175 (gfc_access): Remove trailing comma.
176
177 2005-03-05 Steven G. Kargl <kargls@comcast.net>
178
179 PR 19936
180 * primary.c (match_complex_constant): Mangled complex constant may
181 be an implied do-loop. Give implied do-loop matcher a chance.
182
183 2005-03-05 Steven G. Kargl <kargls@comcast.net>
184
185 PR fortran/19754
186 * resolve.c (compare_shapes): New function.
187 (resolve_operator): Use it.
188
189 2005-03-05 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
190
191 * trans-const.c (gfc_conv_constant_to_tree): Use correct tree
192 type for COMPLEX constants.
193
194 2005-03-04 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
195
196 PR fortran/19673
197 * trans-expr.c (gfc_conv_function_call): Correctly dereference
198 argument from a pointer function also if it has a result clause.
199
200 2005-03-04 Steven G. Kargl <kargls@comcast.net>
201
202 * expr.c (gfc_copy_shape_excluding): Change && to ||.
203
204 2005-03-04 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
205
206 * trans-intrinsic.c (gfc_get_symbol_for_expr): Fix comment typo,
207 clarify comment.
208
209 2005-02-28 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
210 (port from g95)
211
212 PR fortran/19479
213 * simplify.c (gfc_simplify_bound): Rename to ...
214 (simplify_bound): ... this and overhaul.
215
216 2005-02-28 Steven G. Kargl <kargl@gcc.gnu.org>
217
218 * trans-intrinsic.c (gfc_conv_intrinsic_iargc): remove boolean argument.
219 (gfc_conv_intrinsic_function): update function calls
220
221 2005-02-27 Steven G. Kargl <kargl@gcc.gnu.org>
222
223 PR fortran/20058
224 * trans-types.c (gfc_max_integer_kind): Declare
225 (gfc_init_kinds): Initialize it.
226 * gfortran.h (gfc_max_integer_kind): extern it.
227 * primary.c (match_boz_constant): Use it; remove gfortran extension
228 of kind suffixes on BOZ literal constants
229
230
231 2005-02-27 Steven G. Kargl <kargls@comcast.net>
232
233 * arith.c (gfc_check_real_range): Remove multiple returns
234 (check_result): New function.
235 (gfc_arith_uminus,gfc_arith_plus,gfc_arith_times,
236 gfc_arith_divide,gfc_arith_power,gfc_arith_minus): Use it.
237
238
239 2005-02-24 Volker Reichelt <reichelt@igpm.rwth-aachen.de>
240
241 * decl.c, resolve.c, trans-array.c, trans.h: Fix comment typo(s).
242
243
244 2005-02-24 Tobias Schl"uter <tobias.schlueter@physik.uni-meunchen.de>
245
246 Unrevert previously reverted patch. Adding this fix:
247 * module.c (find_true_name): Deal with NULL module.
248
249 2005-02-24 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
250
251 Revert yesterday's patch:
252 2005-02-23 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
253
254 * gfortran.h (gfc_component, gfc_actual_arglist, ...
255 ... argument. Copy string instead of pointing to it.
256
257 2005-02-23 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
258
259 * gfortran.h (gfc_get_namespace): Add second argument to prototype.
260 * intrinsic.c (gfc_intrinsic_init_1): Pass second argument to
261 gfc_get_namespace.
262 * module.c (mio_namespace_ref, load_needed): Likewise.
263 * parse.c (parse_interface, parse_contained): Likewise. Here the
264 correct second argument matters.
265 * symbol.c (gfc_get_namespace): Add parent_types argument, only copy
266 parent's implicit types if this is set.
267 (gfc_symbol_init_2): Pass second argument to gfc_get_namespace.
268 * trans-common.c (build_common_decl): Likewise.
269
270 * gfortran.h (symbol_attribute): New 'untyped' field, fix comment
271 formatting.
272 * symbol.c (gfc_set_default_type): Issue error only once, by setting
273 and checking 'untyped' attribute.
274
275 * gfortran.h (gfc_expr): Move 'operator', 'op1', 'op2', and 'uop'
276 fields into new struct 'op' inside the 'value' union.
277 * arith.c (eval_intrinsic): Adapt all users.
278 * dependency.c (gfc_check_dependency): Likewise.
279 * dump-parse-tree.c (gfc_show_expr): Likewise.
280 * expr.c (gfc_get_expr): Don't clear removed fields.
281 (free_expr0, gfc_copy_expr, gfc_type_convert_binary,
282 gfc_is_constant_expr, simplify_intrinsic_op, check_init_expr,
283 check_intrinsic_op): Adapt to new field names.
284 * interface.c (gfc_extend_expr): Likewise. Also explicitly
285 nullify 'esym' and 'isym' fields of new function call.
286 * iresolve.c (gfc_resolve_dot_product, gfc_resolve_matmul):
287 Adapt to renamed structure fields.
288 * matchexp.c (build_node, match_level_1, match_expr): Likewise.
289 * module.c (mio_expr): Likewise.
290 * resolve.c (resolve_operator): Likewise.
291 (gfc_find_forall_index): Likewise. Only look through operands
292 if dealing with EXPR_OP
293 * trans-array.c (gfc_walk_op_expr): Adapt to renamed fields.
294 * trans-expr.c (gfc_conv_unary_op, gfc_conv_power_op,
295 gfc_conv_concat_op, gfc_conv_expr_op): Likewise.
296
297 [ Reverted ]
298 * gfortran.h (gfc_component, gfc_actual_arglist, gfc_user_op): Make
299 'name' a 'const char *'.
300 (gfc_symbol): Likewise, also for 'module'.
301 (gfc_symtree): Make 'name' a 'const char *'.
302 (gfc_intrinsic_sym): Likewise, also for 'lib_name'.
303 (gfc_get_gsymbol, gfc_find_gsymbol): Add 'const' qualifier to
304 'char *' argument.
305 (gfc_intrinsic_symbol): Use 'gfc_get_string' instead of 'strcpy' to
306 initialize 'SYM->module'.
307 * check.c (gfc_check_minloc_maxloc, check_reduction): Check for NULL
308 pointer instead of empty string.
309 * dump-parse-tree.c (gfc_show_actual_arglist): Likewise.
310 * interface.c (gfc_compare_types): Adapt check to account for possible
311 NULL pointer.
312 (compare_actual_formal): Check for NULL pointer instead of empty
313 string.
314 * intrinsic.c (gfc_current_intrinsic, gfc_current_intrinsic_arg):
315 Add 'const' qualifier.
316 (conv_name): Return a heap allocated string.
317 (find_conv): Add 'const' qualifier to 'target'.
318 (add_sym): Use 'gfc_get_string' instead of 'strcpy'.
319 (make_generic): Check for NULL pointer instead of empty string.
320 (make_alias): Use 'gfc_get_string' instead of 'strcpy'.
321 (add_conv): No need to strcpy result from 'conv_name'.
322 (sort_actual): Check for NULL pointer instead of empty string.
323 * intrinsic.h (gfc_current_intrinsic, gfc_current_intrinsic_arg):
324 Adapt prototype.
325 * module.c (compare_true_names): Compare pointers instead of strings
326 for 'module' member.
327 (find_true_name): Initialize string fields with gfc_get_string.
328 (mio_pool_string): New function.
329 (mio_internal_string): Adapt comment.
330 (mio_component_ref, mio_component, mio_actual_arg): Use
331 'mio_pool_string' instead of 'mio_internal_string'.
332 (mio_symbol_interface): Add 'const' qualifier to string arguments.
333 Add level of indirection. Use 'mio_pool_string' instead of
334 'mio_internal_string'.
335 (load_needed, read_module): Use 'gfc_get_string' instead of 'strcpy'.
336 (write_common, write_symbol): Use 'mio_pool_string' instead of
337 'mio_internal_string'.
338 (write_symbol0, write_symbol1): Likewise, also check for NULL pointer
339 instead of empty string.
340 (write_operator, write_generic): Pass correct type variable to
341 'mio_symbol_interface'.
342 (write_symtree): Use 'mio_pool_string' instead of
343 'mio_internal_string'.
344 * primary.c (match_keyword_arg): Adapt check to possible
345 case of NULL pointer. Use 'gfc_get_string' instead of 'strcpy'.
346 * symbol.c (gfc_add_component, gfc_new_symtree, delete_symtree,
347 gfc_get_uop, gfc_new_symbol): Use 'gfc_get_string' instead of
348 'strcpy'.
349 (ambiguous_symbol): Check for NULL pointer instead of empty string.
350 (gfc_find_gsymbol, gfc_get_gsymbol): Add 'const' qualifier on string
351 arguments.
352 * trans-array.c (gfc_trans_auto_array_allocation): Check for NULL
353 pointer instead of empty string.
354 * trans-decl.c (gfc_sym_mangled_identifier,
355 gfc_sym_mangled_function_id, gfc_finish_var_decl, gfc_get_symbol_decl,
356 gfc_get_symbol_decl): Likewise.
357 * trans-io.c (gfc_new_nml_name_expr): Add 'const' qualifier to
358 argument. Copy string instead of pointing to it.
359
360 2005-02-23 Kazu Hirata <kazu@cs.umass.edu>
361
362 * intrinsic.h, st.c: Update copyright.
363
364 2005-02-20 Steven G. Kargl <kargls@comcast.net>
365
366 * symbol.c: Typos in comments.
367
368 2005-02-20 Steven G. Kargl <kargls@comcast.net>
369
370 * expr.c (gfc_type_convert_binary): Typo in comment.
371
372 2005-02-19 Steven G. Kargl <kargls@comcast.net>
373
374 * check.c (gfc_check_selected_int_kind): New function.
375 * intrinsic.h: Prototype it.
376 * intrinsic.c (add_function): Use it.
377 * simplify (gfc_simplify_ceiling,gfc_simplify_floor): Change
378 BT_REAL to BT_INTEGER and use gfc_default_integer_kind.
379
380 2005-02-19 Steven G. Kargl <kargls@comcast.net>
381
382 * check.c (gfc_check_int): improve checking of optional kind
383 * simplify.c (gfc_simplify_int): Change BT_REAL to BT_INTEGER
384
385 2005-02-19 Steven G. Kargl <kargls@comcast.net>
386
387 * check.c (gfc_check_achar): New function
388 * intrinsic.h: Prototype it.
389 * intrinsic.c (add_function): Use it.
390
391 2005-02-13 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
392
393 * trans-stmt.c (generate_loop_for_temp_to_lhs,
394 generate_loop_for_rhs_to_temp): Remove if whose condition is
395 always true.
396
397 2005-02-12 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
398
399 * symbol.c (gfc_use_ha_derived): Remove, fold functionality into ...
400 (gfc_use_derived): ... this function.
401
402 2005-02-09 Richard Henderson <rth@redhat.com>
403
404 * f95-lang.c (gfc_init_builtin_functions): Call
405 build_common_builtin_nodes; do not define any functions handled
406 by it.
407
408 2005-02-08 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
409
410 * expr.c (gfc_copy_expr): Don't copy 'op1' and 'op2' for
411 EXPR_SUBSTRING.
412 (gfc_is_constant_expr): Check 'ref' to determine if substring
413 reference is constant.
414 (gfc_simplify_expr): Simplify 'ref' instead of 'op1' and 'op2'.
415 (check_init_expr, check_restricted): Check 'ref' instead of 'op1'
416 and 'op2'.
417 * module.c (mio_expr): Read / write 'ref' instead of 'op1' and 'op2'.
418
419 2005-02-07 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
420
421 * gfortran.h (gfc_add_dimension, gfc_add_result, gfc_add_save,
422 gfc_add_dummy, gfc_add_generic, gfc_add_in_common, gfc_add_data,
423 gfc_add_in_namelist, gfc_add_sequence, gfc_add_function,
424 gfc_add_subroutine, gfc_add_access, gfc_add_flavor, gfc_add_entry,
425 gfc_add_procedure): Add argument.
426 * array.c (gfc_set_array_spec), decl.c (var_element, get_proc_name,
427 gfc_match_null, match_type_spec, match_attr_spec,
428 gfc_match_formal_arglist, match_result, gfc_match_function_decl):
429 Update callers to match.
430 (gfc_match_entry) : Likewise, fix comment typo.
431 (gfc_match_subroutine, attr_decl1, gfc_add_dimension,
432 access_attr_decl, do_parm, gfc_match_save, gfc_match_modproc,
433 gfc_match_derived_decl): Update callers.
434 * interface.c (gfc_match_interface): Likewise.
435 * match.c (gfc_match_label, gfc_add_flavor,
436 gfc_match_call, gfc_match_common, gfc_match_block_data,
437 gfc_match_namelist, gfc_match_module, gfc_match_st_function):
438 Likewise.
439 * parse.c (parse_derived, parse_interface, parse_contained),
440 primary.c (gfc_match_rvalue, gfc_match_variable): Likewise.
441 * resolve.c (resolve_formal_arglist, resolve_entries): Update callers.
442 * symbol.c (check_conflict, check_used): Add new 'name' argument,
443 use when printing error message.
444 (gfc_add_dimension, gfc_add_result, gfc_add_save, gfc_add_dummy,
445 gfc_add_generic, gfc_add_in_common, gfc_add_data,
446 gfc_add_in_namelist, gfc_add_sequence, gfc_add_function,
447 gfc_add_subroutine, gfc_add_access, gfc_add_flavor, gfc_add_entry,
448 gfc_add_procedure): Add new 'name' argument. Pass along to
449 check_conflict and check_used.
450 (gfc_add_allocatable, gfc_add_external, gfc_add_intrinsic,
451 gfc_add_optional, gfc_add_pointer, gfc_add_target, gfc_add_elemental,
452 gfc_add_pure, gfc_add_recursive, gfc_add_intent,
453 gfc_add_explicit_interface, gfc_copy_attr): Pass NULL for new
454 argument in calls to any of the modified functions.
455
456 2005-02-06 Joseph S. Myers <joseph@codesourcery.com>
457
458 * gfortran.texi: Don't give last update date.
459
460 2006-01-30 Richard Henderson <rth@redhat.com>
461
462 * options.c (gfc_init_options): Zero flag_errno_math.
463
464 2005-01-29 Paul Brook <paul@codesourcery.com>
465
466 PR fortran/18565
467 * check.c (real_or_complex_check): New function.
468 (gfc_check_fn_c, gfc_check_fn_r, gfc_check_fn_rc): New functions.
469 * intrinsic.c (add_functions): Use new check functions.
470 * intrinsic.h (gfc_check_fn_c, gfc_check_fn_r, gfc_check_fn_rc):
471 Add prototypes.
472
473 2005-01-29 Steven G. Kargl <kargls@comcast.net>
474
475 PR fortran/19589
476 * expr.c (gfc_check_assign): Check for conformance of logical operands
477
478 2004-01-27 Steven Bosscher <stevenb@suse.de>
479
480 * trans-decl.c (gfc_build_label_decl): Set DECL_ARTIFICAL and
481 TREE_USED for all labels.
482 (gfc_trans_entry_master_switch): Use it instead of building a
483 label by hand.
484 * trans-io.c (add_case): Likewise.
485 * trans-stmt.c (gfc_trans_integer_select): Likewise.
486
487 2004-01-23 Paul Brook <paul@codesourcery.com>
488 Steven G. Kargl <kargls@comcast.net>
489
490 PR fortran/17941
491 * arith.c (gfc_convert_real): Remove sign handling.
492 * primary.c (match_digits): Allow whitespace after initial sign.
493 (match_real_const): Handle signs here. Allow whitespace after
494 initial sign. Remove dead code.
495 (match_const_complex_part): Remove.
496 (match_complex_part): Use match_{real,integer}_const.
497 (match_complex_constant): Cross-promote integer types.
498
499 2005-01-23 James A. Morrison <phython@gcc.gnu.org>
500
501 PR fortran/19294
502 * iresolve.c (gfc_resolve_transpose): Resolve to transpose_c4 or
503 transpose_c8 for complex types.
504
505 2005-01-23 Kazu Hirata <kazu@cs.umass.edu>
506
507 * data.c, dependency.c, f95-lang.c, io.c, trans-array.c,
508 trans-decl.c, trans-expr.c, trans-intrinsic.c, trans-io.c,
509 trans-stmt.c, trans-types.c, trans.h: Fix comment typos.
510 Follow spelling conventions.
511
512 2005-01-22 Bud Davis <bdavis9659@comcast.net>
513
514 PR fortran/19313
515 * trans-io.c (gfc_trans_inquire): Added code to support
516 pad.
517
518 2005-01-22 Steven G. Kargl <kargls@comcast.net>
519
520 * intrinsic.c (make_alias): Add standard argument.
521 (add_functions): Update make_alias calls.
522
523 2005-01-22 Paul Brook <paul@codesourcery.com>
524
525 * trans-expr.c (gfc_conv_function_call): Remove bogus TODO.
526
527 2005-01-22 Paul Brook <paul@codesourcery.com>
528
529 * gfortran.h (gfc_check_access): Add prototype.
530 * match.c (gfc_match_namelist): Remove TODO.
531 * module.c (check_access): Rename ...
532 (gfc_check_access): ... to this. Boolify. Update callers.
533 * resolve.c (resolve_symbol): Check for private objects in public
534 namelists.
535
536 2005-01-22 Paul Brook <paul@codesourcery.com>
537
538 * primary.c (gfc_match_rvalue): Only apply implicit type if variable
539 does not have an explicit type.
540 (gfc_match_variable): Resolve implicit derived types in all cases.
541 Resolve contained function types from their own namespace, not the
542 parent.
543 * resolve.c (resolve_contained_fntype): Remove duplicate sym->result
544 checking. Resolve from the contained namespace, not the parent.
545
546 2005-01-22 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
547
548 PR fortran/19543
549 * trans-const.c (gfc_conv_constant_to_tree): Give logical
550 constants the correct type.
551
552 PR fortran/19194
553 * trans-io.c (ADD_STRING): Use gfc_charlen_type_node for string
554 length parameters.
555 (gfc_build_io_library_fndecls): 'rec' and 'recl_in' are not
556 pointer fields.
557
558 2005-01-18 Kazu Hirata <kazu@cs.umass.edu>
559
560 * arith.c, array.c, check.c, decl.c, expr.c, f95-lang.c,
561 gfortran.h, interface.c, intrinsic.c, io.c, iresolve.c,
562 match.c, matchexp.c, misc.c, module.c, options.c, parse.c,
563 scanner.c, simplify.c, symbol.c, trans-array.c, trans-expr.c,
564 trans-io.c, trans-stmt.c, trans.c: Update copyright.
565
566 2005-01-17 Ira Rosen <irar@il.ibm.com>
567
568 * f95-lang.c (gfc_init_builtin_functions): Call targetm.init_builtins.
569
570 2005-01-16 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
571
572 PR fortran/19182
573 * error.c (error_char): Line-buffer errors / warnings.
574
575 2005-01-16 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
576
577 * trans-intrinsic.c (gfc_conv_intrinsic_ishft): Fix signed /
578 unsigned issue. Use build_int_cst instead of converting
579 integer_zero_node. Remove unnecessary conversion.
580
581 * trans-types.c (gfc_get_character_type_len): : Use
582 gfc_charlen_type_node as basic type for the range field.
583
584 * trans-intrinsic.c (build_fixbound_expr,
585 gfc_conv_intrinsic_bound, gfc_conv_intrinsic_anyall,
586 gfc_conv_intrinsic_count, gfc_conv_intrinsic_btest,
587 gfc_conv_intrinsic_singlebitop): Use 'build_int_cst' instead
588 of converting 'integer_zero_node' or 'integer_one_node'
589 respectively.
590 (gfc_conv_intrinsic_ishftc): Same, but store in local variable to
591 evade re-building.
592 (gfc_conv_intrinsic_strcmp, gfc_conv_intrinsic_rrspacing,
593 gfc_conv_intrinsic_trim, gfc_conv_intrinsic_iargc): Use
594 'build_int_cst' instead of converting 'integer_zero_node' or
595 'integer_one_node' respectively.
596
597 * trans-intrinsic.c (gfc_conv_intrinsic_index,
598 gfc_conv_intrinsic_scan, gfc_conv_intrinsic_verify): Remove
599 'gfc'-prefix from local variable, remove dead code, use correct
600 type when inserting argument.
601
602 * trans-intrinsic.c, trans-types.c: Update copyright years.
603
604 2005-01-16 Steven G. Kargl <kargls@comcast.net>
605
606 PR 19168
607 * resolve.c (check_case_overlap): Typo in comment.
608 (validate_case_label_expr): Fix up kinds of case values
609 (resolve_select): Properly handle kind mismatches.
610
611 2004-01-16 Paul Brook <paul@codesourcery.com>
612
613 PR fortran/17675
614 * trans-common.c (translate_common): Remove duplicate function call.
615 (finish_equivalences): Preserve alignment when biasing offsets.
616
617 2005-01-15 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de
618
619 * primary.c (check_digit): Call 'ISXDIGIT' instead of assuming
620 ASCII-like character encoding.
621
622 2005-01-14 Steven G. Kargl <kargls@comcast.net>
623
624 * resolve.c (compare_case): Cleanup.
625
626 2005-01-14 Steven G. Kargl <kargls@comcast.net>
627
628 * resolve.c (compare_case): Give arguments correct type.
629
630 2005-01-13 Kazu Hirata <kazu@cs.umass.edu>
631
632 * iresolve.c, trans-common.c, trans-types.c: Fix comment
633 typos.
634
635 2005-01-09 Paul Brook <paul@codesourcery.com>
636
637 PR fortran/17675
638 * trans-common.c (current_common, current_offset): Remove.
639 (create_common): Add head argument.
640 (align_segment): New function.
641 (apply_segment_offset): New function.
642 (translate_common): Merge code from new_segment. Handle alignment.
643 (new_segment): Remove.
644 (finish_equivalences): Ensure proper alignment.
645
646 2005-01-08 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
647
648 * trans-const.c: Don't include unused math.h.
649
650 * trans-intrinsic.c (gfc_get_intrinsic_lib_fndecl,
651 gfc_conv_intrinsic_bound, gfc_conv_intrinsic_minmaxloc,
652 gfc_conv_intrinsic_ishft, gfc_conv_intrinsic_len): Remove
653 trailing whitespace.
654 (prepare_arg_info): Fix formatting, indenting and remove trailing
655 whitespace.
656 (gfc_conv_intrinsic_spacing, gfc_conv_intrinsic_trim): Remove
657 trailing whitespace.
658
659 * arith.c (arctangent2, gfc_arith_init_1, gfc_arith_done_1,
660 gfc_constant_result, gfc_range_check, gfc_arith_power,
661 eval_type_intrinsic0, eval_intrinsic_f2, gfc_real2real,
662 gfc_real2complex, gfc_complex2int, gfc_complex2real,
663 gfc_complex2complex): Fix whitespace issues.
664 * check.c (must_be, type_check, numeric_check, int_or_real_check,
665 logical_array_check, array_check, scalar_check, nonoptional_check,
666 variable_check, dim_check, check_a_kind, gfc_check_a_ikind,
667 gfc_check_a_xkind, gfc_check_abs, gfc_check_all_any,
668 gfc_check_allocated, gfc_check_a_p, gfc_check_besn,
669 gfc_check_btest, gfc_check_char, gfc_check_cmplx, gfc_check_count,
670 gfc_check_cshift, gfc_check_dcmplx, gfc_check_dble,
671 gfc_check_digits, gfc_check_dot_product, gfc_check_eoshift,
672 gfc_check_fnum, gfc_check_g77_math1, gfc_check_huge, gfc_check_i,
673 gfc_check_iand, gfc_check_ibclr, gfc_check_ibits, gfc_check_ibset,
674 gfc_check_idnint, gfc_check_ieor, gfc_check_index, gfc_check_int,
675 gfc_check_ior, gfc_check_ishft, gfc_check_ishftc, gfc_check_kind,
676 gfc_check_lbound, gfc_check_logical, min_max_args,
677 gfc_check_min_max_integer, gfc_check_min_max_real,
678 gfc_check_min_max_double, gfc_check_matmul,
679 gfc_check_minval_maxval, gfc_check_merge, gfc_check_nearest,
680 gfc_check_pack, gfc_check_precision, gfc_check_radix,
681 gfc_check_range, gfc_check_real, gfc_check_repeat,
682 gfc_check_scale, gfc_check_scan, gfc_check_selected_real_kind,
683 gfc_check_set_exponent): Fix formatting issues.
684 (gfc_check_size, gfc_check_sign): Alphabetize function order,
685 remove whitespace-only line.
686 (gfc_check_fstat, gfc_check_fstat_sub, gfc_check_stat,
687 gfc_check_stat_sub, gfc_check_transfer, gfc_check_transpose,
688 gfc_check_ubound, gfc_check_unpack, gfc_check_verify, gfc_check_x,
689 gfc_check_cpu_time, gfc_check_date_and_time, gfc_check_mvbits,
690 gfc_check_random_number, gfc_check_random_seed,
691 gfc_check_second_sub, gfc_check_system_clock,
692 gfc_check_getcwd_sub, gfc_check_exit, gfc_check_flush,
693 gfc_check_umask, gfc_check_umask_sub, gfc_check_unlink,
694 gfc_check_unlink_sub): Fix formatting issues.
695
696 2005-01-08 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
697
698 * gfortran.h: Remove outdated comment. Don't include stdio.h
699 explicitly.
700
701 2005-01-06 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
702
703 * gfortranspec.c (lang_specific_driver): Change year to 2005 in
704 output of 'gfortran --version'.
705
706 2005-01-03 Steven G. Kargl <kargls@comcast.net>
707
708 * arith.c: Add system.h; remove string.h
709 * decl.c: Ditto
710 * matchexp.c: Ditto
711 * parse.c: Ditto
712 * resolve.c: Ditto
713 * st.c: Ditto
714 * check.c: Remove stdlib.h and stdarg.h
715 * error.c: Remove stdlib.h, stdarg.h, stdio.h, string.h
716 * expr.c: Add system.h; remove stdarg.h, stdio.h, and string.h
717 * f95-lang.c: Add system.h; remove stdio.h
718 * interface.c: Add system.h; remove stdlib.h and string.h
719 * intrinsic.c: Remove stdarg.h, stdio.h, and string.h
720 * io.c: Remove string.h
721 * simplify.c: Ditto
722 * match.c: Remove stdarg.h and string.h
723 * misc.c: Update copyright; add system.h; remove stdlib.h,
724 string.h, and sys/stat.h
725 * module.c: Add system.h; remove string.h, stdio.h, errno.h,
726 unistd.h, and time.h
727 * option.c: Remove string.h and stdlib.h
728 * primary.c: Ditto
729 * scanner.c: Update copyright; add system.h; remove stdlib.h,
730 stdio.h, string.h, and strings.h
731 * symbol.c: Add system.h; remove stdlib.h, stdio.h, and string.h
732 * trans-array.c: Remove stdio.h and gmp.h
733 * trans-const.c: Ditto
734 * trans-expr.c: Ditto
735 * trans-io.c: Ditto
736 * trans-stmt.c: Ditto
737 * trans.c: Ditto
738 * trans-intrinsic.c: Remove stdio.h and string.h
739
740 2004-12-29 Steven G. Kargl <kargls@comcast.net>
741
742 * gfortran.h (gfc_case): fix typo in comment.
743
744 2004-12-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
745
746 * trans-intrinsic.c (gfc_conv_intrinsic_ishft): Change to
747 logical shift. Call fold. Remove 0-bit shift shortcut.
748 (gfc_conv_intrinsic_ishftc): Convert first argument to at least
749 4 bytes bits. Convert 2nd and 3rd argument to 4 bytes. Convert
750 result if width(arg 1) < 4 bytes. Call fold.
751
752 PR fortran/19032
753 * trans-intrinsic.c (gfc_conv_intrinsic_mod): Update comment
754 in front of function to match the standard. Correct handling
755 of MODULO.
756
757 2004-12-27 Andrew Pinski <pinskia@physics.uc.edu>
758
759 * trans-expr.c (gfc_conv_cst_int_power): Only check for
760 flag_unsafe_math_optimizations if we have a float type.
761
762 2004-12-23 Steven G. Kargl <kargls@comcast.net>
763
764 * gfortran.texi: Fix typo.
765
766 2004-12-16 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
767
768 * trans-intrinsic.c (build_fixbound_expr): Clarify comment, fix
769 comment typo.
770
771 2004-12-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
772
773 PR fortran/18993
774 * match.c (gfc_match_if): Don't explicitly skip optional whitespace.
775 (gfc_match_nullify): Make sure that ')' is in front of the end of
776 statement.
777
778 * scanner.c (skip_fixed_comments): Fix typo in comment preceding
779 function.
780
781 2004-12-14 Richard Henderson <rth@redhat.com>
782
783 * gfortran.h (gfc_expr.function.name): Make const.
784 (gfc_iresolve_init_1, gfc_iresolve_done_1): Remove.
785 (gfc_get_string): Update prototype.
786 * iresolve.c: Include tree.h.
787 (string_node, HASH_SIZE, string_head, hash): Remove.
788 (gfc_get_string): Use vsnprintf, get_identifier.
789 (free_strings, gfc_iresolve_init_1, gfc_iresolve_done_1): Remove.
790 * misc.c (gfc_init_1): Don't call gfc_iresolve_init_1.
791 (gfc_done_1): Don't call gfc_iresolve_done_1.
792 * module.c (mio_allocated_string): Take and return const char *,
793 instead of modifying char**.
794 (mio_expr): Update to match.
795 * resolve.c (pure_function): Constify name argument.
796 (resolve_function): Constify name.
797 * trans-intrinsic.c (gfc_conv_intrinsic_function): Likewise.
798
799 2004-12-12 Richard Henderson <rth@redhat.com>
800
801 * iresolve.c (gfc_resolve_all, gfc_resolve_any, gfc_resolve_count,
802 gfc_resolve_cshift, gfc_resolve_dot_product, gfc_resolve_eoshift,
803 gfc_resolve_matmul, gfc_resolve_maxloc, gfc_resolve_maxval,
804 gfc_resolve_minloc, gfc_resolve_minval, gfc_resolve_pack,
805 gfc_resolve_product, gfc_resolve_reshape, gfc_resolve_shape,
806 gfc_resolve_spread, gfc_resolve_sum, gfc_resolve_transpose,
807 gfc_resolve_unpack: Use PREFIX.
808
809 2004-12-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
810
811 PR fortran/18869
812 * match.c (gfc_match_common): Skip whitespace.
813
814 2004-12-12 Steven G. Kargl <kargls@comcast.net>
815
816 PR fortran/16581
817 * check.c (gfc_check_iand, gfc_check_ibclr, gfc_check_ibits,
818 gfc_check_ibset, gfc_check_ieor, gfc_check_ior): Remove default
819 integer kind check; Issue error for -std=f95 when needed.
820 * intrinsic.c (add_functions): Change ieor from GFC_STD_GNU to
821 GFC_STD_F95.
822 * iresolve.c (gfc_resolve_iand, gfc_resolve_ieor, gfc_resolve_ior):
823 Promote arguments to same kind.
824
825 2004-12-12 Steven G. Kargl <kargls@comcast.net>
826 Paul Brook <paul@codesourcery.com>
827
828 PR fortran/16222
829 * resolve.c (gfc_resolve_iterator_expr): New function.
830 (gfc_resolve_iterator): Use it. Add real_ok argument. Convert
831 start, end and stride to correct type.
832 (resolve_code): Pass extra argument.
833 * array.c (resolve_array_list): Pass extra argument.
834 * gfortran.h (gfc_resolve): Add prototype.
835 * trans-stmt.c (gfc_trans_do): Remove redundant type conversions.
836 Handle real type iterators.
837
838 2004-12-11 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
839
840 PR fortran/17175
841 * iresolve.c (gfc_resolve_scale): Convert 'I' argument if not of
842 same kind as C's 'int'.
843 (gfc_resolve_set_exponent): Convert 'I' argument if not of kind 4.
844
845 2004-12-08 Richard Henderson <rth@redhat.com>
846
847 * intrinsic.c (gfc_convert_type_warn): Propagate the input shape
848 to the output expression.
849 * iresolve.c (gfc_resolve_cshift, gfc_resolve_eoshift): Suppress
850 warning conversion.
851 (gfc_resolve_reshape): Force convert SHAPE and ORDER parameters
852 to index kind.
853
854 2004-12-08 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
855
856 PR fortran/18826
857 * resolve.c (resolve_code): Impose correct restrictions on
858 assigned variable.
859
860 * decl.c (gfc_match_end): Use locus of END when eos is an error.
861
862 2004-12-02 Steven G. Kargl <kargls@comcast.net>
863 Paul Brook <paul@codesourcery.com>
864
865 * check.c (gfc_check_flush, gfc_check_fnum): New functions.
866 (gfc_check_fstat, gfc_check_fstat_sub): New functions.
867 (gfc_check_stat, gfc_check_stat_sub): New functions.
868 * gfortran.h (GFC_ISYM_FNUM,GFC_ISYM_FSTAT,GFC_ISYM_STAT): New symbols
869 * intrinsic.c (add_functions,add_subroutines): Add flush, fnum,
870 fstat, and stat to intrinsics symbol tables.
871 * intrinsic.h (gfc_check_flush, gfc_resolve_stat_sub): Add prototypes.
872 (gfc_resolve_fstat_sub, gfc_resolve_stat): Ditto.
873 * iresolve.c (gfc_resolve_fnum, gfc_resolve_fstat): New functions.
874 (gfc_resolve_stat, gfc_resolve_flush): New functions.
875 (gfc_resolve_stat_sub,gfc_resolve_fstat_sub): New functions
876 * trans-intrinsic.c (gfc_conv_intrinsic_function): Add new intrinsics.
877
878 2004-12-02 Steven G. Kargl <kargls@comcast.net>
879
880 * intrinsic.c: Fix and add comments, fix function declarations
881 (OPTIONAL,REQUIRED): New symbols
882 (add_functions,add_subroutines): Use symbols
883 (gmp.h): Remove unused include
884
885 2004-11-25 Joseph S. Myers <joseph@codesourcery.com>
886
887 * f95-lang.c, gfortranspec.c, trans-decl.c: Avoid ` as left quote
888 in diagnostics.
889
890 2004-11-24 Steven Bosscher <stevenb@suse.de>
891
892 * options.c (gfc_post_options): Don't clear flag_inline_functions.
893
894 2004-11-20 Steven G. Kargl <kargls@comcast.net>
895
896 * check.c (gfc_check_getcwd_sub): Fix seg fault.
897
898 * check.c (gfc_check_exit,gfc_check_umask,gfc_check_umask_sub,
899 gfc_check_unlink,gfc_check_unlink_sub): New functions
900 * gfortran.h (GFC_ISYM_UMASK,GFC_ISYM_UNLINK): New symbols
901 * intrinsic.c (add_functions,add_subroutines): Add umask, unlink,
902 exit to intrinsics symbol tables.
903 * intrinsic.h (gfc_check_umask,gfc_check_unlink,gfc_check_exit,
904 gfc_check_umask_sub,gfc_check_unlink_sub,gfc_resolve_umask,
905 gfc_resolve_unlink,gfc_resolve_exit,gfc_resolve_umask_sub,
906 gfc_resolve_unlink_sub): Add and sort prototypes.
907 * iresolve.c (gfc_resolve_umask,gfc_resolve_unlink,gfc_resolve_exit,
908 gfc_resolve_umask_sub,gfc_resolve_unlink_sub): New functions
909 * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbols
910
911 2004-11-16 Paul Brook <paul@codesourcery.com>
912
913 PR fortran/13010
914 * trans-array.c (gfc_trans_allocate_temp_array): Use gfc_get_dtype.
915 (gfc_array_init_size, gfc_conv_expr_descriptor): Ditto.
916 * trans-types.c (gfc_get_dtype): Accept array type rather than element
917 type.
918 (gfc_get_nodesc_array_type): Don't set GFC_TYPE_ARRAY_DTYPE.
919 (gfc_get_array_type_bounds): Ditto.
920 (gfc_get_derived_type): Recurse into derived type pointers.
921 * trans-types.h (gfc_get_dtype): Add prototype.
922 * trans.h (GFC_TYPE_ARRAY_DTYPE): Add comment.
923
924 2004-11-15 Paul Brook <paul@codesourcery.com>
925
926 * trans-types.c (gfc_get_dtype): Remove obsolete TODO.
927
928 2004-11-10 Paul Brook <paul@codesourcery.com>
929
930 PR fortran/18375
931 * trans-expr.c (gfc_trans_subarray_assign): Free shape before ss.
932 * trans-io.c (transfer_array_component): Ditto.
933
934 2004-11-10 Paul Brook <paul@codesourcery.com>
935
936 * invoke.texi: Fix typo.
937
938 2004-11-08 Kazu Hirata <kazu@cs.umass.edu>
939
940 * arith.c, array.c, decl.c, expr.c, f95-lang.c, gfortran.h,
941 gfortranspec.c, interface.c, intrinsic.c, iresolve.c, match.c,
942 module.c, parse.c, parse.h, primary.c, resolve.c, scanner.c,
943 trans-array.c, trans-array.h, trans-expr.c, trans-intrinsic.c,
944 trans-io.c, trans-stmt.c, trans.h: Fix comment formatting.
945
946 2004-11-06 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
947
948 PR fortran/18023
949 * io.c (resolve_tag): Tighten up exception for assigned FORMAT.
950
951 2004-11-06 Kazu Hirata <kazu@cs.umass.edu>
952
953 * gfortranspec.c: Replace GNU CC with GCC.
954
955 2004-11-05 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
956
957 * gfortranspec.c (lang_specific_driver): Change year to 2004.
958
959 2004-11-05 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
960
961 PR fortran/18111
962 * trans-decl.c (create_function_arglist): Set DECL_ARTIFICIAL for
963 hidden parameters.
964
965 2004-11-05 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
966
967 PR fortran/15164
968 * trans-decl.c (gfc_finish_var_decl): Don't declare arguments to
969 module procedures as if they were module variables.
970
971 2004-11-03 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
972
973 PR fortran/17535
974 PR fortran/17583
975 PR fortran/17713
976 * module.c (write_symbol1): Set module_name for dummy arguments.
977
978 2004-11-02 Paul Brook <paul@codesourcery.com>
979
980 * intrinsic.c (check_intrinsic_standard): Include error locus.
981 Remove VLA.
982 (gfc_intrinsic_func_interface, gfc_intrinsic_sub_interface): Pass
983 locus to check_intrinsic_standard.
984
985 2004-10-31 Janne Blomqvist <jblomqvi@cc.hut.fi>
986
987 PR fortran/17590
988 * gfortran.h: Change GFC_STD_* flags to more appropriate
989 ones. (struct gfc_intrinsic_isym): Add field for standard. (struct
990 gfc_option_t): Add field for warning about use of nonstandard
991 intrinsics.
992 * intrinsic.c (add_sym): Add parameter for standard version, check
993 this against current standard.
994 (add_sym_0): Pass standard parameter to add_sym.
995 (add_sym_1, add_sym_0s, add_sym_1s, add_sym_1m, add_sym_2): Ditto.
996 (add_sym_2s, add_sym_3, add_sym_3ml, add_sym_3red, add_sym_3s): Ditto.
997 (add_sym_4, add_sym_4s, add_sym_5, add_sym_5s): Ditto.
998 (make_generic): Add parameter for standard, check this
999 against currently selected standard.
1000 (add_functions, add_subroutines): Add parameter to tell which
1001 standard an intrinsic belongs to.
1002 (check_intrinsic_standard): New function.
1003 (gfc_intrinsic_func_interface): Add call to check_intrinsic_standard.
1004 (gfc_intrinsic_sub_interface): Ditto.
1005 * lang.opt: Add Wnonstd-intrinsics option.
1006 * options.c (gfc_init_options): Change to use new GFC_STD_* flags,
1007 init new warning.
1008 (set_Wall): Add warning about nonstd intrinsics.
1009 (gfc_handle_option): Change to use new GFC_STD_* flags,
1010 handle new warning.
1011 * invoke.texi: Update manual to include -Wnonstd-intrinsics.
1012
1013 2004-10-30 Andrew Pinski <pinskia@physics.uc.edu>
1014
1015 * f95-lang.c (lang_tree_node): Add chain_next to be the TREE_CHAIN.
1016
1017 2004-10-30 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1018
1019 * simplify.c (twos_complement): Calculate mask in GMP arithmetic.
1020
1021 2004-10-30 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1022
1023 * trans.c (gfc_trans_code): Set global locus after recursing. Fix
1024 comment typo.
1025
1026 2004-10-30 Canqun Yang <canqun@nudt.edu.cn>
1027
1028 * check.c (gfc_check_rand): Allow missing optional argument.
1029 (gfc_check_irand): Ditto.
1030 * intrinsic.c (add_functions): Set arg optional flag for {i,}rand.
1031
1032 2004-10-28 Scott Robert Ladd <scott.ladd@coyotegulch.com>
1033
1034 PR fortran/13490, PR fortran/17912
1035 * gcc/fortran/gfortran.h: Added pedantic_min_int to gfc_integer_info
1036 * gcc/fortran/gfortran.h: Added ARITH_ASYMMETRIC to arith
1037 * gcc/fortran/arith.c: Added support for an "asymmetric integer"
1038 warning when compiling with pedantic.
1039 * gcc/fortran/arith.c: Set minimum integer values to reflect
1040 realities of two's complement signed integers. Added
1041 pedantic minimum.
1042
1043 2004-10-17 Andrew Pinski <pinskia@physics.uc.edu>
1044
1045 * Make-lang.in (F95_ADDITIONAL_OBJS): Kill.
1046 (f951): Do not depend on F95_ADDITIONAL_OBJS and don't
1047 link it in.
1048
1049 2004-10-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1050
1051 * trans-decl.c (generate_local_decl): Simplify logic, fix comment
1052 typo.
1053 (gfc_generate_function_code): Fix formatting issue.
1054
1055 2004-10-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1056
1057 * module.c: Fix formatting issues.
1058
1059 2004-10-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1060
1061 * module.c (mio_interface_rest): Set where member of interface
1062 while loading.
1063
1064 2004-10-08 Andrew Pinski <pinskia@physics.uc.edu>
1065
1066 PR fortran/17901
1067 * options.c (gfc_handle_option): Add break after handing the
1068 J/M option.
1069
1070 2004-10-08 Tobias Schlueter <tobias.shclueter@physik.uni-muenchen.de>
1071
1072 * arith.c: Fix formatting issues.
1073
1074 2004-10-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1075
1076 PR fortran/17676
1077 * resolve.c (resolve_operator): Use correct operator name in message.
1078
1079 2004-10-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1080
1081 * primary.c (match_boz_constant): Allow kind parameter suffixes.
1082 Move standard warning further to the front.
1083
1084 2004-10-07 Kazu Hirata <kazu@cs.umass.edu>
1085
1086 * trans-stmt.c: Fix a comment typo.
1087
1088 2004-10-07 Paul Brook <paul@codesourcery.com>
1089
1090 PR fortran/17678
1091 * trans-array.c (gfc_trans_deferred_array): Leave use associated
1092 variables alone.
1093
1094 2004-10-06 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1095
1096 PR fortran/17568
1097 * simplify.c (twos_complement): New function.
1098 (gfc_simplify_ishft, gfc_simplify_ishftc): Revise.
1099
1100 * simplify.c (gfc_simplify_abs): Use mpfr_hypot for CABS.
1101
1102 2004-10-06 Paul Brook <paul@codesourcery.com>
1103
1104 * trans-stmt.c (gfc_trans_simple_do): New function.
1105 (gfc_trans_do): Use it. Evaluate iteration bounds before entering
1106 loop. Update comments.
1107
1108 2004-10-04 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1109
1110 PR fortran/17283
1111 * iresolve.c (gfc_resolve_pack): Choose function depending if mask
1112 is scalar.
1113
1114 PR fortran/17631
1115 * intrinsic.c (add_sym_5): Remove.
1116 (add_subroutines): Add resolution function for MVBITS.
1117 * intrinsic.h (gfc_resolve_mvbits): Declare resolution function for
1118 MVBITS
1119 * iresolve.c (gfc_resolve_mvbits): New function.
1120 (gfc_resolve_random_number): Remove empty line at end of function.
1121
1122 * trans-const.c (gfc_build_cstring_const): New function.
1123 (gfc_init_cst): Use new function.
1124 * trans-const.h (gfc_build_cstring_const): Add prototype.
1125 * trans-io.c (set_string, set_error_locus): Use new function.
1126 * trans-stmt.c (gfc_trans_goto): Use new function.
1127
1128 PR fortran/17708
1129 * parse.c (accept_statement): Don't treat END DO like END IF and
1130 END SELECT.
1131 (parse_do_block): Generate possible END DO label inside END DO
1132 block.
1133
1134 PR fortran/17776
1135 * check.c (gfc_check_system_sub): New function.
1136 * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_SYSTEM.
1137 * intrinsic.c (add_functions): Add 'system'.
1138 (add_subroutines): Add 'system'.
1139 * intrinsic.h (gfc_check_etime_sub, gfc_check_getcwd_sub):
1140 Move prototypes to other suborutines.
1141 (gfc_check_system_sub, gfc_resolve_system, gfc_resolve_system_sub):
1142 Add prototype.
1143 (gfc_resolve_system_clock): Fix formatting of prototype.
1144 * iresolve.c (gfc_resolve_system, gfc_resolve_system_sub): New
1145 functions.
1146 * trans-intrinsic.c (gfc_conv_intrinsic_function): Deal with
1147 GFC_ISYM_SYSTEM.
1148
1149 2004-10-04 Erik Schnetter <schnetter@aei.mpg.de>
1150
1151 * scanner.c (preprocessor_line): Accept preprocessor lines without
1152 file names. Check file names for closing quotes. Handle escaped
1153 quotes in file names.
1154
1155 2004-10-04 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1156 Paul Brook <paul@codesourcery.com>
1157
1158 * trans-array.c (gfc_conv_expr_descriptor): Check for substriungs.
1159 Use gfc_get_expr_charlen.
1160 * trans-expr.c (gfc_get_expr_charlen): New function.
1161 * trans.h (gfc_get_expr_charlen): Add prototype.
1162
1163 2004-10-04 Kazu Hirata <kazu@cs.umass.edu>
1164
1165 * trans-intrinsic.c: Fix a comment typo.
1166
1167 2004-10-03 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1168
1169 * simplify.c (range_check): Remove blank line at beginning of function.
1170 (gfc_simplify_dint): Same at end of function.
1171 (gfc_simplify_exponent, gfc_simplify_fraction): Simplify calculations.
1172 (gfc_simplify_bound): Fix indentation.
1173 (gfc_simplify_log10): Simplify calculation.
1174 (gfc_simplify_min, gfc_simplify_max): Remove blank line at beginning
1175 of function.
1176 (gfc_simplify_nearest): Same at end of function.
1177 (gfc_simplify_nint, gfc_simplify_idnint): Same at beginning of
1178 function.
1179 (gfc_simplify_rrspacing, gfc_simplify_set_exponent,
1180 gfc_simplify_spacing): Simplify calulations.
1181
1182 2004-10-03 Feng Wang <fengwang@nudt.edu.cn>
1183
1184 * trans-intrinsic.c: Fix comments on spacing and rrspacing
1185 (gfc_conv_intrinsic_rrspacing): Add fold on constant trees.
1186
1187 2004-10-01 Jan Hubicka <jh@suse.cz>
1188
1189 * f95-lang.c (gfc_expand_function): Update call of
1190 tree_rest_of_compilation.
1191 * trans-decl.c (gfc_generate_constructors): Likewise.
1192
1193 2004-09-26 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1194
1195 * trans-intrinsic.c: Comment fixes.
1196
1197 2004-09-25 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1198
1199 * decl.c (add_init_expr_to_sym, variable_decl): Comment fixes.
1200
1201 2004-09-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1202
1203 * trans-types.c (gfc_return_by_reference): Remove superfluous
1204 assertion.
1205
1206 * intrinsic.h (gfc_resolve_getcwd): Update prototype.
1207 * iresolve.c (gfc_resolve_getcwd): Add second argument to function.
1208
1209 PR fortran/17615
1210 * trans-expr.c (gfc_trans_arrayfunc_assign): Look at resolved
1211 function to determine return type.
1212
1213 2004-09-20 Jan Hubicka <jh@suse.cz>
1214
1215 * trans-decl.c (build_entry_thunks): Finalize the function; do not lower
1216 tree.
1217 (gfc_generate_function_code): Likewise.
1218
1219 2004-09-20 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1220
1221 PR fortran/15957
1222 * simplify.c (gfc_simplify_reshape): Set shape of return value
1223 correctly.
1224
1225 2004-09-17 Jeffrey D. Oldham <oldham@codesourcery.com>
1226 Zack Weinberg <zack@codesourcery.com>
1227
1228 * f95-lang.c, trans-expr.c, trans.c: Update for new tree-class
1229 enumeration constants.
1230
1231 2004-09-17 Paul Brook <paul@codesourcery.com>
1232
1233 * gfortran.h (struct gfc_linebuf): Don't use C99 empty arrays.
1234 (gfc_linebuf_header_size): Define.
1235 * scanner.c (load_file): Use it.
1236
1237 2004-09-16 Kazu Hirata <kazu@cs.umass.edu>
1238
1239 * array.c, data.c, decl.c, dependency.c, error.c, f95-lang.c,
1240 interface.c, intrinsic.c, io.c, misc.c, module.c, parse.h,
1241 resolve.c, scanner.c, trans-array.c, trans-array.h,
1242 trans-common.c, trans-const.h, trans-decl.c, trans-expr.c,
1243 trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.c,
1244 trans.h: Fix comment typos. Follow spelling conventions.
1245
1246 2004-09-16 Victor Leikehman <lei@il.ibm.com>
1247
1248 PR/15364
1249 * trans-io.c (transfer_array_component): New function.
1250 (transfer_expr): For array fields, call transfer_array_component.
1251
1252 2004-09-16 Kazu Hirata <kazu@cs.umass.edu>
1253
1254 * gfortran.texi: Fix a typo.
1255
1256 2004-09-15 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
1257
1258 * parse.c (eof_buf): Rename eof to eof_buf.
1259 (unexpected_eof): Same.
1260 (gfc_parse_file): Same.
1261
1262 2004-09-15 Steven G. Kargl <kargls@comcast.net>
1263
1264 * check.c (gfc_check_getcwd_sub): New function.
1265 * gfortran.h (GFC_ISYM_GETCWD): New symbol.
1266 * intrinsic.c (add_functions): Add function definition;
1267 Use symbol.
1268 * intrinsic.c (add_subroutines): Add subroutine definitions.
1269 * intrinsic.h: Add prototypes.
1270 * iresolve.c (gfc_resolve_getcwd, gfc_resolve_getcwd_sub):
1271 New functions.
1272 * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbol.
1273
1274 2004-09-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1275
1276 PR fortran/16485
1277 * module.c (write_symbol): Don't fill in module name here.
1278 (write_symbol0): Fill in here instead.
1279
1280 2004-09-14 Kazu Hirata <kazu@cs.umass.edu>
1281
1282 * data.c, decl.c, f95-lang.c, gfortran.h, match.c,
1283 trans-array.c, trans-common.c, trans-expr.c,
1284 trans-intrinsic.c, trans-stmt.c, trans-types.c, trans.h: Fix
1285 comment typos. Follow spelling conventions.
1286
1287 2004-09-09 Paul Brook <paul@codesourcery.com>
1288
1289 * scanner.c (get_file): Add ATTRIBUTE_UNUSED.
1290
1291 2004-09-08 Paul Brook <paul@codesourcery.com>
1292
1293 * array.c: Don't include assert.h.
1294 * data.c: Don't include assert.h. Replace assert and abort with
1295 gcc_assert and gcc_unreachable.
1296 * dependency.c: Ditto.
1297 * f95-lang.c: Ditto.
1298 * iresolve.c: Ditto.
1299 * resolve.c: Ditto.
1300 * simplify.c: Ditto.
1301 * symbol.c: Ditto.
1302 * trans-array.c: Ditto.
1303 * trans-common.c: Ditto.
1304 * trans-const.c: Ditto.
1305 * trans-decl.c: Ditto.
1306 * trans-expr.c: Ditto.
1307 * trans-intrinsic.c: Ditto.
1308 * trans-io.c: Ditto.
1309 * trans-stmt.c: Ditto.
1310 * trans-types.c: Ditto.
1311 * trans.c: Ditto.
1312
1313 2004-09-07 Per Bothner <per@bothner.com>
1314 Paul Brook <paul@codesourcery.com>
1315
1316 * error.c (show_locus): Handle mapped locations.
1317 * f95-lang.c (gfc_be_parse_file): Initialize mapped locations.
1318 * gfortran.h: Include input.h.
1319 (struct gfc_linebuf): Use source_location.
1320 * scanner.c (get_file): Initialize linemap.
1321 (preprocessor_line): Pass extra argument to get_file.
1322 (load_file): Ditto. Setup linemap.
1323 (gfc_new_file): Handle mapped locations.
1324 * trans-common.c (build_field, build_equiv_decl, build_common_decl):
1325 Set decl source locations.
1326 (gfc_trans_common): Set blank common block location.
1327 * trans-decl.c (gfc_set_decl_location): New function.
1328 (gfc_get_label_decl, gfc_get_symbol_decl): Use it.
1329 (trans_function_start): Move call to gfc_set_backend_locus..
1330 (build_function_decl): ... to here.
1331 (build_entry_thunks): Set and restore the backend locus.
1332 (gfc_generate_constructors): Remove excess arguments to
1333 init_function_start.
1334 (gfc_generate_block_data): Add comments. Set the decl locus.
1335 * trans-io.c (set_error_locus): Handle mapped locations.
1336 * trans.c (gfc_get_backend_locus, gfc_get_backend_locus): Ditto.
1337 (gfc_trans_code): Use SET_EXPR_LOCATION.
1338 (gfc_generate_code): Override the location of the new symbol.
1339 * trans.h (gfc_set_decl_location): Add prototype.
1340
1341 2004-08-31 Paul Brook <paul@codesourcery.com>
1342
1343 * trans-types.c (gfc_type_for_mode): Return NULL for unknown modes.
1344
1345 2004-09-01 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1346
1347 PR fortran/15327
1348 * trans-intrinsic.c (gfc_conv_intrinsic_merge): Do the right thing for
1349 strings.
1350
1351 2004-09-01 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1352
1353 PR fortran/16400
1354 PR fortran/16404
1355 (port from g95)
1356 * resolve.c (resolve_transfer): New function.
1357 (resolve_code): Call resolve_transfer in case of EXEC_TRANSFER.
1358
1359 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1360
1361 PR fortran/16579
1362 * trans-types.c (gfc_init_types): Make gfc_character1_type_node an
1363 unsigned char.
1364
1365 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1366
1367 * CONTRIB, NEWS, README, TODO: Remove obsolete files.
1368
1369 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1370
1371 PR fortran/17244
1372 * trans-types.c (gfc_return_by_reference): Remove TODO error,
1373 add comment pointing out possible issue WRT compatibility with g77.
1374
1375 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1376
1377 * trans-decl.c, trans-expr.c, trans-io.c, trans-types.c: Replace
1378 all occurences of 'gfc_strlen_type_node' by
1379 'gfc_charlen_type_node'.
1380 * trans-types.h: Same. Also update comment accordingly.
1381
1382 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1383
1384 * primary.c: Update copyright boilerplate to say GCC.
1385 * f95-lang.c: Change initial comment to say gfortran.
1386
1387 2004-08-31 Paul Brook <paul@codesourcery.com>
1388
1389 * trans-types.h: Add comments.
1390 (intmax_type_node, string_type_node, const_string_type_node): Remove.
1391
1392 2004-08-30 Richard Henderson <rth@redhat.com>
1393
1394 * Make-lang.in (fortran/f95-lang.o): Update dependencies.
1395 (fortran/trans-decl.o, fortran/trans-types.o): Likewise.
1396 * gfortran.h (gfc_integer_info): Add c_char, c_short, c_int,
1397 c_long, c_long_long.
1398 (gfc_logical_info): Add c_bool.
1399 (gfc_real_info): Add mode_precision, c_float, c_double, c_long_double.
1400 * trans-array.c (gfc_array_allocate): Use TYPE_PRECISION
1401 rather than gfc_int[48]_type_node for allocate choice.
1402 * trans-decl.c (gfc_build_intrinsic_function_decls): Cache
1403 local copies of some kind type nodes.
1404 (gfc_build_builtin_function_decls): Likewise.
1405 * trans-expr.c (gfc_conv_power_op): Likewise.
1406 * trans-intrinsic.c (gfc_conv_intrinsic_index,
1407 gfc_conv_intrinsic_scan, gfc_conv_intrinsic_verify,
1408 gfc_conv_intrinsic_trim, gfc_conv_intrinsic_repeat): Likewise.
1409 * trans-stmt.c (gfc_trans_pause, gfc_trans_stop,
1410 gfc_trans_character_select, gfc_trans_allocate): Likewise.
1411 * trans-io.c (gfc_pint4_type_node): Move into ...
1412 (gfc_build_io_library_fndecls): ... here. Cache local copies of
1413 some kind type nodes.
1414 * trans-types.c (gfc_type_nodes): Remove.
1415 (gfc_character1_type_node, gfc_strlen_type_node): New.
1416 (gfc_integer_types, gfc_logical_types): New.
1417 (gfc_real_types, gfc_complex_types): New.
1418 (gfc_init_kinds): Fill in real mode_precision.
1419 (gfc_build_int_type, gfc_build_real_type): New.
1420 (gfc_build_complex_type, gfc_build_logical_type): New.
1421 (c_size_t_size): New.
1422 (gfc_init_types): Loop over kinds.
1423 (gfc_get_int_type, gfc_get_real_type): Use gfc_validate_kind.
1424 (gfc_get_complex_type, gfc_get_logical_type): Likewise.
1425 (gfc_get_character_type_len): Likewise.
1426 (gfc_type_for_size): Loop over kinds; use a reduced set of
1427 unsigned type nodes.
1428 (gfc_type_for_mode): Loop over kinds.
1429 (gfc_signed_or_unsigned_type): Use gfc_type_for_size.
1430 (gfc_unsigned_type, gfc_signed_type): Use gfc_signed_or_unsigned_type.
1431 * trans-types.h (F95_INT1_TYPE, F95_INT2_TYPE, F95_INT4_TYPE,
1432 F95_INT8_TYPE, F95_INT16_TYPE, F95_REAL4_TYPE, F95_REAL8_TYPE,
1433 F95_REAl16_TYPE, F95_COMPLEX4_TYPE, F95_COMPLEX8_TYPE,
1434 F95_COMPLEX16_TYPE, F95_LOGICAL1_TYPE, F95_LOGICAL2_TYPE,
1435 F95_LOGICAL4_TYPE, F95_LOGICAL8_TYPE, F95_LOGICAL16_TYPE,
1436 F95_CHARACTER1_TYPE, NUM_F95_TYPES, gfc_type_nodes,
1437 gfc_int1_type_node, gfc_int2_type_node, gfc_int4_type_node,
1438 gfc_int8_type_node, gfc_int16_type_node, gfc_real4_type_node,
1439 gfc_real8_type_node, gfc_real16_type_node, gfc_complex4_type_node,
1440 gfc_complex8_type_node, gfc_complex16_type_node,
1441 gfc_logical1_type_node, gfc_logical2_type_node,
1442 gfc_logical4_type_node, gfc_logical8_type_node,
1443 gfc_logical16_type_node, gfc_strlen_kind): Remove.
1444 (gfc_character1_type_node): Turn in to a variable.
1445 (gfc_strlen_type_node): Likewise.
1446
1447 2004-08-30 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1448
1449 * gfortran.h (gfc_namespace): Add new field is_block_data.
1450 * parse.c (accept_statement): Remove special handling for BLOCK DATA.
1451 (parse_block_data): Record BLOCK DATA name, set is_block_data field.
1452 * trans.c (gfc_generate_code): Handle BLOCK DATA units.
1453 * trans.h (gfc_generate_block_data): Add prototype.
1454 * trans-decl.c (gfc_generate_block_data): New function.
1455
1456 2004-08-29 Richard Henderson <rth@redhat.com>
1457
1458 * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_export.
1459 * trans-types.c (gfc_init_kinds): Reject integer kinds larger
1460 than two HOST_WIDE_INT.
1461
1462 2004-08-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1463
1464 PR fortran/13910
1465 * decl.c (free_variable, free_value, gfc_free_data, var_list,
1466 var_element, top_var_list, match_data_constant, top_val_list,
1467 gfc_match_data): Move here from match.c.
1468 (match_old_style_init): New function.
1469 (variable_decl): Match old-style initialization.
1470 * expr.c (gfc_get_variable_expr): New function.
1471 * gfortran.h (gfc_get_variable_expr): Add prototype.
1472 * gfortran.texi: Start documentation for supported extensions.
1473 * match.c: Remove the functions moved to decl.c.
1474 * match.h (gfc_match_data): Move prototype to under decl.c.
1475 * symbol.c (gfc_find_sym_tree, gfc_find_symbol): Add/correct
1476 comments.
1477
1478 2004-08-29 Steven G. Kargl <kargls@comcast.net>
1479 Paul Brook <paul@codesourcery.com>
1480
1481 * check.c (gfc_check_besn, gfc_check_g77_math1): New functions.
1482 * f95-lang.c (DO_DEFINE_MATH_BUILTIN): Define.
1483 (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it.
1484 (build_builtin_fntypes): New function.
1485 (gfc_init_builtin_functions): Use it.
1486 * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_{J,Y}{0,1,N}
1487 and GFC_ISYM_ERF{,C}.
1488 (gfc_c_int_kind): Declare.
1489 * intrinsic.c (add_functions): Add [d]bes* and [d]erf*.
1490 * intrinsic.h (gfc_check_besn, gfc_check_g77_math1, gfc_resolve_besn,
1491 gfc_resolve_g77_math1): Add prototypes.
1492 * resolve.c (gfc_resolve_besn, gfc_resolve_g77_math1): New functions.
1493 * mathbuiltins.def: Add comment. Change third argument. Use
1494 DEFINE_MATH_BUILTIN_C. Add bessel and error functions.
1495 * trans-intrinsic.c (BUILT_IN_FUNCTION): Define.
1496 (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it.
1497 * trans-types.c (gfc_c_int_kind): Declare.
1498 (gfc_init_kinds): Set it.
1499
1500 2004-08-29 Steven G. Kargl <kargls@comcast.net>
1501 Paul Brook <paul@codesourcery.com>
1502
1503 * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_GET?ID.
1504 (gfc_check_f, gfc_simplify_f): Add f0.
1505 * intrinsic.c (do_check): Call f0. Flatten.
1506 (add_sym_0): Fix prototype. Set f0.
1507 (add_functions): Add getgid, getgid and getuid.
1508 (resolve_intrinsic): Remove obsolete comment.
1509 (do_simplify): Call f0.
1510 * intrinsic.h (gfc_resolve_getgid, gfc_resolve_getpid,
1511 gfc_resolve_getuid): Add prototypes.
1512 * iresolve.c (gfc_resolve_getgid, gfc_resolve_getpid,
1513 gfc_resolve_getuid): New functions.
1514 * trans-intrinsic.c (gfc_conv_intrinsic_function): Handle
1515 GFC_ISYM_GET?ID.
1516
1517 2004-08-28 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1518
1519 * error.c (gfc_error_init_1): Remove blank line in front of
1520 function body. Add missing blank.
1521 (gfc_buffer_error, error_char, error_string): Remove blank line in
1522 front of function body.
1523 (show_locus): Add comma in comment.
1524 (gfc_clear_warning, gfc_warning_check, gfc_clear_error,
1525 gfc_push_error, gfc_pop_error): Remove blank line in front of
1526 function body.
1527 (gfc_get_errors): Typo fix in comment in front of function. Remove
1528 blank line in front of function body.
1529
1530 2004-08-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1531
1532 * gfortran.h (gfc_default_*_kind): Remove prototypes, add extern
1533 variable declaration of same name.
1534 * arith.c, check.c, decl.c, dump_parse_tree.c, expr.c,
1535 intrinsic.c, io.c, iresolve.c, match.c, options.c, primary.c,
1536 resolve.c, simplify.c, symbol.c, trans-const.c, trans-io.c:
1537 Replace all calls to gfc_default_*_kind with variable accesses.
1538 * trans-types.c: Same as above.
1539 (gfc_default_*_kind_1): Rename to gfc_default_*_kind, remove
1540 static qualifier. Replace all occurences.
1541 (gfc_default_*_kind): Remove functions.
1542
1543 2004-08-26 Richard Henderson <rth@redhat.com>
1544
1545 * arith.c: Include system.h, not real system headers.
1546 (MPZ_NULL, MPF_NULL, DEF_GFC_INTEGER_KIND, DEF_GFC_LOGICAL_KIND,
1547 DEF_GFC_REAL_KIND, GFC_SP_KIND, GFC_SP_PREC, GFC_SP_EMIN, GFC_SP_EMAX,
1548 GFC_DP_KIND, GFC_DP_PREC, GFC_DP_EMIN, GFC_DP_EMAX, GFC_QP_KIND,
1549 GFC_QP_PREC, GFC_QP_EMIN, GFC_QP_EMAX): Remove.
1550 (gfc_integer_kinds, gfc_logical_kinds, gfc_real_kinds,
1551 gfc_index_integer_kind, gfc_default_integer_kind,
1552 gfc_default_real_kind,gfc_default_double_kind,
1553 gfc_default_character_kind, gfc_default_logical_kind,
1554 gfc_default_complex_kind, validate_integer, validate_real,
1555 validate_logical, validate_character,
1556 gfc_validate_kind): Move to trans-types.c.
1557 (gfc_set_model_kind): Use gfc_validate_kind.
1558 (gfc_set_model): Just copy the current precision to default.
1559 (gfc_arith_init_1): Use mpfr precision 128 for integer setup.
1560 * f95-lang.c (gfc_init_decl_processing): Invoke gfc_init_kinds.
1561 * gfortran.h: Update file commentary.
1562 * trans-types.c (MAX_INT_KINDS, MAX_REAL_KINDS): New.
1563 (gfc_default_integer_kind_1, gfc_default_real_kind_1,
1564 gfc_default_double_kind_1, gfc_default_character_kind_1,
1565 gfc_default_logical_kind_1, gfc_default_complex_kind_1): New.
1566 (gfc_init_kinds): New.
1567 (gfc_init_types): Don't set gfc_index_integer_kind here.
1568 * trans-types.h (gfc_init_kinds): Declare.
1569 * doc/invoke.texi: Clarify DOUBLE PRECISION behaviour wrt -r8.
1570
1571 2004-08-26 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1572
1573 * check.c (gfc_check_atan2): New function.
1574 * intrinsic.c (add_functions): Use gfc_check_atan2 for ATAN2
1575 * intrinsic.h (gfc_check_atan2): Add prototype.
1576
1577 2004-08-25 Richard Henderson <rth@redhat.com>
1578
1579 * arith.c (gfc_validate_kind): Add may_fail argument; abort if
1580 false and we don't validate the kind.
1581 (gfc_check_integer_range, gfc_check_real_range): Update to match.
1582 * check.c (kind_check): Likewise.
1583 * decl.c (gfc_match_old_kind_spec, gfc_match_kind_spec): Likewise.
1584 (match_char_spec, match_logical_spec): Likewise.
1585 * gfortran.h (gfc_validate_kind): Likewise.
1586 * options.c (gfc_handle_option): Likewise.
1587 * primary.c (match_integer_constant, match_real_constant,
1588 match_string_constant, match_logical_constant,
1589 match_const_complex_part): Likewise.
1590 * simplify.c (get_kind, gfc_simplify_bit_size, gfc_simplify_digits,
1591 gfc_simplify_epsilon, gfc_simplify_huge, gfc_simplify_ibclr,
1592 gfc_simplify_ibset, gfc_simplify_ishft, gfc_simplify_ishftc,
1593 gfc_simplify_maxexponent, gfc_simplify_minexponent,
1594 gfc_simplify_nearest, gfc_simplify_not, gfc_simplify_precision,
1595 gfc_simplify_radix, gfc_simplify_range, gfc_simplify_rrspacing,
1596 gfc_simplify_scale, gfc_simplify_spacing, gfc_simplify_tan,
1597 gfc_simplify_tiny): Likewise.
1598 * trans-intrinsic.c (gfc_conv_intrinsic_aint, gfc_conv_intrinsic_mod,
1599 gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_minmaxval,
1600 prepare_arg_info): Likewise.
1601
1602 2004-08-25 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1603
1604 * expr.c (gfc_check_assign): Add comment. Add new warning.
1605 * trans-expr.c (gfc_conv_function_call): Correctly dereference
1606 result of pointer valued function when not in pointer assignment.
1607
1608 2004-08-25 Paul Brook <paul@codesourcery.com>
1609
1610 * config-lang.in: Remove dead commented line.
1611 * module.c: Replace g95 with gfortran in comment.
1612
1613 2004-08-25 Paul Brook <paul@codesourcery.com>
1614
1615 PR fortran/17190
1616 * arith.c (gfc_mpfr_to_mpz): Workaround mpfr bug.
1617
1618 2004-08-25 Paul Brook <paul@codesourcery.com>
1619
1620 PR fortran/17144
1621 * trans-array.c (gfc_trans_allocate_temp_array): Remove
1622 string_length argument.
1623 (gfc_trans_array_ctor_element): New function.
1624 (gfc_trans_array_constructor_subarray): Use it.
1625 (gfc_trans_array_constructor_value): Ditto. Handle constant
1626 character arrays.
1627 (get_array_ctor_var_strlen, get_array_ctor_strlen): New functions.
1628 (gfc_trans_array_constructor): Use them.
1629 (gfc_add_loop_ss_code): Update to new gfc_ss layout.
1630 (gfc_conv_ss_descriptor): Remember section string length.
1631 (gfc_conv_scalarized_array_ref): Ditto. Remove dead code.
1632 (gfc_conv_resolve_dependencies): Update to new gfc_ss layout.
1633 (gfc_conv_expr_descriptor): Ditto.
1634 (gfc_conv_loop_setup): Ditto. Spelling fixes.
1635 * trans-array.h (gfc_trans_allocate_temp_array): Update prototype.
1636 * trans-const.c (gfc_conv_constant): Update to new gfc_ss layout.
1637 * trans-expr.c (gfc_conv_component_ref): Turn error into ICE.
1638 (gfc_conv_variable): Set string_length from section.
1639 (gfc_conv_function_call): Remove extra argument.
1640 (gfc_conv_expr, gfc_conv_expr_reference): Update to new gfc_ss layout.
1641 * trans-types.c (gfc_get_character_type_len): New function.
1642 (gfc_get_character_type): Use it.
1643 (gfc_get_dtype): Return zero for internal types.
1644 * trans-types.h (gfc_get_character_type_len): Add prototype.
1645 * trans.h (struct gfc_ss): Move string_length out of union.
1646
1647 2004-08-25 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1648
1649 * trans.h (build2_v, build3_v): New macros.
1650 (build_v): Remove.
1651 * f95-lang.c (gfc_truthvalue_conversion): Use build2 instead of
1652 build.
1653 * trans-array.c (gfc_conv_descriptor_data,
1654 gfc_conv_descriptor_offset, gfc_conv_descriptor_dimension,
1655 gfc_conv_descriptor_stride, gfc_conv_descriptor_lbound,
1656 gfc_conv_descriptor_ubound, gfc_trans_allocate_array_storage,
1657 gfc_trans_allocate_temp_array,
1658 gfc_trans_array_constructor_subarray,
1659 gfc_trans_array_constructor_value, gfc_conv_array_index_ref,
1660 gfc_trans_array_bound_check, gfc_conv_array_index_offset,
1661 gfc_conv_scalarized_array_ref, gfc_conv_array_ref,
1662 gfc_conv_array_ref, gfc_trans_preloop_setup,
1663 gfc_trans_scalarized_loop_end, gfc_conv_ss_startstride,
1664 gfc_conv_loop_setup, gfc_array_init_size,
1665 gfc_conv_array_initializer, gfc_trans_array_bounds,
1666 gfc_trans_auto_array_allocation, gfc_trans_dummy_array_bias,
1667 gfc_conv_expr_descriptor, gfc_conv_array_parameter,
1668 gfc_trans_deferred_array): Use buildN and buildN_v macros instead
1669 of build and build_v as appropriate.
1670 * trans-common.c (create_common): Same.
1671 * trans-decl.c (gfc_trans_auto_character_variable,
1672 gfc_trans_entry_master_switch, gfc_generate_function_code): Same.
1673 * trans-expr.c (gfc_conv_expr_present, gfc_conv_substring,
1674 gfc_conv_component_ref, gfc_conv_unary_op, gfc_conv_powi,
1675 gfc_conv_cst_int_power, gfc_conv_string_tmp, gfc_conv_concat_op,
1676 gfc_conv_expr_op, gfc_conv_function_call,
1677 gfc_trans_structure_assign): Same.
1678 * trans-intrinsic.c (build_fixbound_expr, build_round_expr,
1679 gfc_conv_intrinsic_aint, gfc_conv_intrinsic_bound,
1680 gfc_conv_intrinsic_cmplx, gfc_conv_intrinsic_mod,
1681 gfc_conv_intrinsic_dim, gfc_conv_intrinsic_sign,
1682 gfc_conv_intrinsic_dprod, gfc_conv_intrinsic_minmax,
1683 gfc_conv_intrinsic_anyall, gfc_conv_intrinsic_count,
1684 gfc_conv_intrinsic_arith, gfc_conv_intrinsic_minmaxloc,
1685 gfc_conv_intrinsic_minmaxval, gfc_conv_intrinsic_btest,
1686 gfc_conv_intrinsic_bitop, gfc_conv_intrinsic_singlebitop,
1687 gfc_conv_intrinsic_ibits, gfc_conv_intrinsic_ishft,
1688 gfc_conv_intrinsic_merge, gfc_conv_intrinsic_strcmp,
1689 gfc_conv_allocated, gfc_conv_associated, prepare_arg_info,
1690 gfc_conv_intrinsic_spacing, gfc_conv_intrinsic_rrspacing,
1691 gfc_conv_intrinsic_trim, gfc_conv_intrinsic_repeat,
1692 gfc_conv_intrinsic_iargc): Same.
1693 * trans-io.c (set_parameter_value, set_parameter_ref, set_string,
1694 set_flag, add_case, io_result, transfer_namelist_element,
1695 transfer_expr): Same.
1696 * trans-stmt.c (gfc_trans_goto, gfc_trans_return, gfc_trans_if_1,
1697 gfc_trans_arithmetic_if, gfc_trans_do, gfc_trans_do_while,
1698 gfc_trans_integer_select, gfc_trans_logical_select,
1699 gfc_trans_character_select, gfc_trans_forall_loop,
1700 gfc_trans_nested_forall_loop, gfc_do_allocate,
1701 generate_loop_for_temp_to_lhs, generate_loop_for_rhs_to_temp,
1702 compute_inner_temp_size, compute_overall_iter_number,
1703 allocate_temp_for_forall_nest, gfc_trans_pointer_assign_need_temp,
1704 gfc_trans_forall_1, gfc_evaluate_where_mask,
1705 gfc_trans_where_assign, gfc_trans_allocate): Same.
1706 * trans-types.c (gfc_get_dtype, gfc_get_array_type_bounds): Same.
1707 * trans.c (gfc_add_modify_expr, gfc_finish_block,
1708 gfc_build_array_ref, gfc_build_function_call,
1709 gfc_trans_runtime_check): Same.
1710
1711 2004-08-25 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1712
1713 * trans-const.c (gfc_conv_mpz_to_tree): Change call to
1714 build_int_cst to build_int_cst_wide in accordance to Nathan's
1715 previous patch.
1716
1717 2004-08-25 Nathan Sidwell <nathan@codesourcery.com>
1718
1719 * trans-array.c (gfc_trans_array_constructor_value): Adjust
1720 build_int_cst calls.
1721 * trans-const.c (gfc_build_string_const, gfc_init_constants,
1722 gfc_conv_mpz_to_tree, gfc_conv_constant_to_tree): Likewise.
1723 * trans-decl.c (gfc_get_symbol_decl, build_entry_thunks,
1724 gfc_trans_entry_master_switch): Likewise.
1725 * trans-intrinsic.c (gfc_conv_intrinsic_ibits,
1726 gfc_conv_intrinsic_len, prepare_arg_info): Likewise.
1727 * trans-io.c (add_case, set_error_locus,
1728 transfer_namelist_element, transfer_expr): Likewise.
1729 * trans-stmt.c (gfc_trans_label_assign, gfc_trans_pause,
1730 gfc_trans_stop, gfc_trans_character_select): Likewise.
1731 * trans-types.c (gfc_init_types, gfc_get_dtype): Likewise.
1732 * trans.c (gfc_trans_runtime_check): Likewise.
1733
1734 2004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1735
1736 * trans-decl.c, trans-types.c: Add and remove blank lines as
1737 required.
1738
1739 2004-08-24 Richard Henderson <rth@redhat.com>
1740
1741 * trans-const.c (gfc_conv_mpz_to_tree): Fix 64-bit shift warning.
1742
1743 2004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1744
1745 * resolve.c (merge_argument_lists): Revert unintentionally
1746 committed change.
1747
1748 2004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1749
1750 * trans-decl.c (build_function_decl): Fix spelling in comment.
1751 (build_entry_thunks): Remove code with no function.
1752 (gfc_build_intrinsic_function_decls): Remove empty line.
1753
1754 * resolve.c (resolve_entries): Fix a bunch of comment typos.
1755
1756 2004-08-24 Nathan Sidwell <nathan@codesourcery.com>
1757
1758 * f95-lang.c (gfc_init_decl_processing): Adjust
1759 build_common_tree_nodes call.
1760
1761 2004-08-24 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1762
1763 * trans-types.c: Spelling and formatting fixes.
1764
1765 2004-08-23 Richard Henderson <rth@redhat.com>
1766
1767 * trans-const.c (gfc_conv_mpz_to_tree): Use mpz_getlimbn instead
1768 of going through an intermediate string. Fix 32/64 int/long bug.
1769
1770 2004-08-23 Eric Christopher <echristo@redhat.com>
1771
1772 * trans-types.c (gfc_type_for_mode): Remove VECTOR_TYPE_SUPPORTED_P
1773 usage. Use build_vector_type_for_mode for vector types.
1774
1775 2004-08-22 Richard Henderson <rth@redhat.com>
1776
1777 PR 13465
1778 * data.c (find_con_by_offset): Search ordered list; handle
1779 elements with repeat counts.
1780 (gfc_assign_data_value_range): New.
1781 * gfortran.h (struct gfc_data_value): Make repeat unsigned.
1782 (gfc_assign_data_value_range): Declare.
1783 * match.c (top_val_list): Extract repeat count into a temporary.
1784 * resolve.c (values): Make left unsigned.
1785 (next_data_value): Don't decrement left.
1786 (check_data_variable): Use gfc_assign_data_value_range.
1787
1788 2004-08-22 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1789
1790 * trans-const.c, trans-decl.c, trans-expr.c: Spelling fixes.
1791
1792 2004-08-22 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1793
1794 * check.c (gfc_check_reduction): Rename to ...
1795 (check_reduction): ... this. Make static. Don't check type of
1796 first argument.
1797 (gfc_check_minval_maxval, gfc_check_prodcut_sum): New functions.
1798 * intrinsic.c (add_functions): Change MAXVAL, MINVAL, PRODUCT and
1799 SUM to use new check functions.
1800 (check_specific): Change logic to call new functions.
1801 * intrinsic.h (gfc_check_minval_maxval, gfc_check_product_sum):
1802 Add prototypes.
1803 (gfc_check_reduction): Remove prototype.
1804
1805 2004-08-20 Paul Brook <paul@codesourcery.com>
1806 Canqun Yang <canqun@nudt.edu.cn>
1807
1808 PR fortran/17077
1809 * trans-array.c (gfc_conv_array_parameter): Pass correct pointer
1810 for automatic arrays.
1811 * trans-types.c (gfc_get_nodesc_array_type): Add comment.
1812
1813 2004-08-19 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1814 (Port from g95)
1815
1816 PR fortran/17074
1817 * match.c (match_simple_forall, match_simple_where): Forward-declare.
1818 (gfc_match_if): Order statement list alphabetically, add WHERE and
1819 FORALL, remove double PAUSE.
1820 (gfc_match_simple_where, match_forall_header,
1821 gfc_match_simple_forall): New functions.
1822 (gfc_match_forall): Use match_forall_header.
1823
1824 2004-08-19 Paul Brook <paul@codesourcery.com>
1825
1826 PR fortran/17091
1827 * gfortran.h (gfc_access): Give ACCESS_UNKNOWN value 0.
1828 * symbol.c (gfc_clear_attr): Use memset.
1829
1830 2004-08-19 Paul Brook <paul@codesourcery.com>
1831
1832 PR fortran/14976
1833 PR fortran/16228
1834 * data.c (assign_substring_data_value): Remove.
1835 (create_character_intializer): New function.
1836 (gfc_assign_data_value): Track the typespec for the current
1837 subobject. Use create_character_intializer.
1838
1839 2004-08-19 Erik Schnetter <schnetter@aei.mpg.de>
1840
1841 PR fortran/16946
1842 * check.c (gfc_check_reduction): New function.
1843 (gfc_check_minval_maxval): Removed.
1844 (gfc_check_product): Removed.
1845 (gfc_check_sum): Removed.
1846 * intrinsic.h: Add/remove declarations for these.
1847 * gfortran.h: Add field f3red to union gfc_check_f.
1848 * intrinsic.c (add_sym_3red): New function.
1849 (add_functions): Register maxval, minval, product, and sum intrinsics
1850 through add_sym_3red.
1851 (check_specific): Handle f3red union field.
1852 * iresolve.c: Whitespace change.
1853
1854 2004-08-18 Paul Brook <paul@codesourcery.com>
1855
1856 * trans-types.c (gfc_sym_type): Use pointer types for optional args.
1857
1858 2004-08-18 Victor Leikehman <lei@il.ibm.com>
1859
1860 PR fortran/13278
1861 * trans-io.c (transfer_namelist_element): New. Recursively handle
1862 derived-type variables. Pass string lengths.
1863 (build_dt): Code moved to build_namelist, with some
1864 changes and additions.
1865 (gfc_build_io_library_fndecls): Declare the fifth
1866 argument in st_set_nml_var_char -- string_length.
1867
1868 2004-08-17 Paul Brook <paul@codesourcery.com>
1869 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1870
1871 PR fortran/13082
1872 * decl.c (get_proc_name): Update mystery comment.
1873 (gfc_match_entry): Check for errors earlier. Add entry point to list.
1874 * dump-parse-tree.c (gfc_show_code_node): Print EXEC_ENTRY nodes.
1875 * gfortran.h (symbol_attribute): Add entry_master. Document entry.
1876 (struct gfc_entry_list): Define.
1877 (gfc_get_entry_list): Define.
1878 (struct gfc_namespace): Add refs and entries.
1879 (enum gfc_exec_op): Add EXEC_ENTRY.
1880 (struct gfc_code): Add ext.entry.
1881 * module.c (ab_attribute, attr_bits): Remove AB_ENTRY.
1882 (mio_symbol_attribute): Don't save/reture addr->entry.
1883 (mio_namespace_ref): Refcount namespaces.
1884 * parse.c (accept_statement): Handle ST_ENTRY.
1885 (gfc_fixup_sibling_symbols): Mark symbol as referenced.
1886 (parse_contained): Fixup sibling references to entry points
1887 after parsing the procedure body.
1888 * resolve.c (resolve_contained_fntype): New function.
1889 (merge_argument_lists, resolve_entries): New functions.
1890 (resolve_contained_functions): Use them.
1891 (resolve_code): Handle EXEC_ENTRY.
1892 (gfc_resolve): Call resolve_entries.
1893 * st.c (gfc_free_statement): Handle EXEC_ENTRY.
1894 * symbol.c (gfc_get_namespace): Refcount namespaces.
1895 (gfc_free_namespace): Ditto.
1896 * trans-array.c (gfc_trans_dummy_array_bias): Treat all args as
1897 optional when multiple entry points are present.
1898 * trans-decl.c (gfc_get_symbol_decl): Remove incorrect check.
1899 (gfc_get_extern_function_decl): Add assertion. Fix coment.
1900 (create_function_arglist, trans_function_start, build_entry_thunks):
1901 New functions.
1902 (gfc_build_function_decl): Rename ...
1903 (build_function_decl): ... to this.
1904 (gfc_create_function_decl): New function.
1905 (gfc_generate_contained_functions): Use it.
1906 (gfc_trans_entry_master_switch): New function.
1907 (gfc_generate_function_code): Use new functions.
1908 * trans-stmt.c (gfc_trans_entry): New function.
1909 * trans-stmt.h (gfc_trans_entry): Add prototype.
1910 * trans-types.c (gfc_get_function_type): Add entry point argument.
1911 * trans.c (gfc_trans_code): Handle EXEC_ENTRY.
1912 (gfc_generate_module_code): Call gfc_create_function_decl.
1913 * trans.h (gfc_build_function_decl): Remove.
1914 (gfc_create_function_decl): Add prototype.
1915
1916 2004-08-15 Andrew Pinski <apinski@apple.com>
1917
1918 PR fortran/17030
1919 * f95-lang.c (gfc_init_builtin_functions): Initialize the builtins
1920 for cabs{,f} and copysign{,f}.
1921 * trans-decl.c (gfor_fndecl_math_cabsf): Delete.
1922 (gfor_fndecl_math_cabs): Delete.
1923 (gfor_fndecl_math_sign4): Delete.
1924 (gfor_fndecl_math_sign8): Delete.
1925 (gfc_build_intrinsic_function_decls): Remove the
1926 initializing of cabs{,f} and copysign{,f} functions.
1927 * trans-intrinsic.c (gfc_conv_intrinsic_abs): Use the builtins
1928 instead of the functions definitions.
1929 (gfc_conv_intrinsic_sign): Likewise.
1930 * trans.h (gfor_fndecl_math_cabsf): Delete.
1931 (gfor_fndecl_math_cabs): Delete.
1932 (gfor_fndecl_math_sign4): Delete.
1933 (gfor_fndecl_math_sign8): Delete.
1934
1935 2004-08-15 Nathan Sidwell <nathan@codesourcery.com>
1936
1937 * trans-array.c (gfc_trans_array_constructor_value): Use
1938 build_int_cst.
1939 * trans-const.c (gfc_build_string_const,
1940 gfc_init_constants, gfc_conv_mpz_to_tree,
1941 gfc_conv_constant_to_tree): Likewise.
1942 * trans-decl.c (gfc_get_symbol_decl): Likewise.
1943 * trans-intrinsic.c (gfc_conv_intrinsic_ibits,
1944 gfc_conv_intrinsic_len, prepare_arg_info): Likewise.
1945 * trans-io.c (add_case, set_error_locus, build_dt,
1946 transfer_expr): Likewise.
1947 * trans-stmt.c (gfc_trans_label_assign, gfc_trans_pause,
1948 gfc_trans_stop, gfc_trans_character_select): Likewise.
1949 * trans-types.c (gfc_init_types, gfc_get_dtype): Likewise.
1950 * trans.c (gfc_trans_runtime_check): Likewise.
1951
1952 2004-08-14 Paul Brook <paul@codesourcery.com>
1953
1954 * trans-decl.c (gfc_build_function_decl): Remove dead code.
1955
1956 2004-08-14 Paul Brook <paul@codesourcery.com>
1957
1958 * trans-arry.c (gfc_trans_auto_array_allocation): Remove unused var.
1959
1960 2004-08-13 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1961
1962 * gfortran.h: Add comments.
1963 * parse.c (parse_contained): Fix comment typo.
1964 * resolve.c (was_declared): Ditto.
1965 * symbol.c: Ditto.
1966
1967 2004-08-11 Paul Brook <paul@codeourcery.com>
1968
1969 PR fortran/16917
1970 * intrinsic.c (add_functions): Add dfloat as an alias for dble.
1971
1972 2004-08-10 Richard Henderson <rth@redhat.com>
1973
1974 * f95-lang.c (gfc_init_builtin_functions): Remove
1975 __builtin_stack_alloc, add __builtin_alloca.
1976 * trans-array.c (gfc_trans_auto_array_allocation): Use DECL_EXPR.
1977 * trans-decl.c (gfc_trans_auto_character_variable): Likewise.
1978
1979 2004-08-10 Paul Brook <paul@codesourcery.com>
1980
1981 * trans-io.c (transfer_expr): Handle pointters.
1982
1983 2004-08-10 Paul Brook <paul@codesourcery.com>
1984
1985 PR fortran/16919
1986 * trans-array.c (gfc_add_loop_ss_code): Handle GFC_SS_COMPONENT.
1987 (gfc_conv_array_index_offset): Allow "temporary" with nonzero delta.
1988 (gfc_trans_preloop_setup, gfc_trans_scalarized_loop_boundary):
1989 Handle GFC_SS_COMPONENT.
1990 (gfc_conv_ss_startstride): Ditto. Set ss->shape.
1991 (gfc_conv_loop_setup): Tweak commends. Remove dead code.
1992 Use ss->shape.
1993 (gfc_conv_array_initializer): Call specific initializer routines.
1994 * trans-expr.c (gfc_trans_structure_assign): New function.
1995 (gfc_trans_subarray_assign): New function.
1996 (gfc_trans_subcomponent_assign): New fucntion
1997 (gfc_conv_structure): Use them.
1998 * trans.h (gfc_ss_type): Add GFC_SS_COMPONENT.
1999 (gfc_ss): Add shape.
2000
2001 2004-08-08 Victor Leikehman <lei@il.ibm.com>
2002
2003 * simplify.c (gfc_simplify_shape): Bugfix.
2004 * expr.c (gfc_copy_shape_excluding): New function.
2005 * gfortran.h (gfc_get_shape): Bugfix.
2006 (gfc_copy_shape_excluding): Added declaration.
2007 * iresolve.c (gfc_resolve_all, gfc_resolve_any, gfc_resolve_count,
2008 gfc_resolve_cshift, gfc_resolve_eoshift, gfc_resolve_lbound,
2009 gfc_resolve_ubound, gfc_resolve_transpose): Added compile
2010 time resolution of shape.
2011
2012 2004-08-06 Janne Blomqvist <jblomqvi@cc.hut.fi>
2013
2014 * intrinsic.c (add_subroutines): Add getenv and
2015 get_environment_variable. (add_sym_5s): New function.
2016 * intrinsic.h (gfc_resolve_get_environment_variable): Add
2017 prototype.
2018 * iresolve.c (gfc_resolve_get_environment_variable): New
2019 function.
2020
2021 2004-08-06 Feng Wang <fengwang@nudt.edu.cn>
2022
2023 * f95-lang.c (gfc_init_builtin_functions): Fix the number of
2024 __builtin_pow[f] arguments.
2025
2026 2004-08-06 Steven G. Kargl <kargls@comcast.net>
2027
2028 * arith.c: Add #define for model numbers. Remove global GMP variables.
2029 (natural_logarithm,common_logarithm,exponential,sine,
2030 cosine,arctangent,hypercos,hypersine ): Remove.
2031 (gfc_mpfr_to_mpz,gfc_set_model_kind,gfc_set_model): New functions.
2032 (arctangent2,gfc_arith_init_1,gfc_arith_done_1
2033 gfc_check_real_range, gfc_constant_result, gfc_range_check,
2034 gfc_arith_uminus,gfc_arith_plus, gfc_arith_minus, gfc_arith_times,
2035 gfc_arith_divide,complex_reciprocal,complex_pow_ui,
2036 gfc_arith_power,gfc_compare_expr,compare_complex,gfc_convert_real,
2037 gfc_convert_complex,gfc_int2real,gfc_int2complex,
2038 gfc_real2int,gfc_real2real,gfc_real2complex,
2039 gfc_complex2int,gfc_complex2real,gfc_complex2complex): Convert GMP
2040 to MPFR, use new functions.
2041 * arith.h: Remove extern global variables.
2042 (natural_logarithm,common_logarithm,exponential, sine, cosine,
2043 arctangent,hypercos,hypersine): Remove prototypes.
2044 (arctangent2): Update prototype from GMP to MPFR.
2045 (gfc_mpfr_to_mpz, gfc_set_model_kind,gfc_set_model): Add prototypes.
2046 * dump-parse-tree.c (gfc_show_expr): Convert GMP to MPFR.
2047 * expr.c (free_expr0,gfc_copy_expr): Convert GMP to MPFR.
2048 * gfortran.h (GFC_REAL_BITS): Remove.
2049 (arith): Add ARITH_NAN.
2050 Include mpfr.h. Define GFC_RND_MODE.
2051 Rename GCC_GFORTRAN_H GFC_GFC_H.
2052 (gfc_expr): Convert GMP to MPFR.
2053 * module.c: Add arith.h, correct type in comment.
2054 (mio_gmp_real): Convert GMP to MPFR.
2055 (mio_expr): Use gfc_set_model_kind().
2056 * primary.c: Update copyright date with 2004.
2057 (match_real_constant,match_const_complex_part): Convert GMP to MPFR.
2058 * simplify.c: Remove global GMP variables
2059 (gfc_simplify_abs,gfc_simplify_acos,gfc_simplify_aimag,
2060 gfc_simplify_aint,gfc_simplify_dint,gfc_simplify_anint,
2061 gfc_simplify_dnint,gfc_simplify_asin,gfc_simplify_atan,
2062 gfc_simplify_atan2,gfc_simplify_ceiling,simplify_cmplx,
2063 gfc_simplify_conjg,gfc_simplify_cos,gfc_simplify_cosh,
2064 gfc_simplify_dim,gfc_simplify_dprod,gfc_simplify_epsilon,
2065 gfc_simplify_exp,gfc_simplify_exponent,gfc_simplify_floor,
2066 gfc_simplify_fraction,gfc_simplify_huge,gfc_simplify_int,
2067 gfc_simplify_ifix,gfc_simplify_idint,gfc_simplify_log,
2068 gfc_simplify_log10,simplify_min_max,gfc_simplify_mod,
2069 gfc_simplify_modulo,gfc_simplify_nearest,simplify_nint,
2070 gfc_simplify_rrspacing,gfc_simplify_scale,
2071 gfc_simplify_set_exponent,gfc_simplify_sign,gfc_simplify_sin,
2072 gfc_simplify_sinh,gfc_simplify_spacing,gfc_simplify_sqrt,
2073 gfc_simplify_tan,gfc_simplify_tanh,gfc_simplify_tiny,
2074 gfc_simplify_init_1,gfc_simplify_done_1): Convert GMP to MPFR.
2075 Use new functions.
2076 * trans-const.c (gfc_conv_mpfr_to_tree): Rename from
2077 gfc_conv_mpf_to_tree. Convert it to use MPFR
2078 (gfc_conv_constant_to_tree): Use it.
2079 * trans-const.h: Update prototype for gfc_conv_mpfr_to_tree().
2080 * trans-intrinsic.c: Add arith.h, remove gmp.h
2081 (gfc_conv_intrinsic_aint,gfc_conv_intrinsic_mod): Convert GMP to MPFR.
2082
2083 2004-08-06 Victor Leikehman <lei@il.ibm.com>
2084 Paul Brook <paul@codesourcery.com>
2085
2086 * trans-array.c (gfc_trans_allocate_array_storage,
2087 gfc_trans_allocate_temp_array, gfc_add_loop_ss_code,
2088 gfc_conv_loop_setup): For functions, if the shape of the result
2089 is not known in compile-time, generate an empty array descriptor for
2090 the result and let the callee to allocate the memory.
2091 (gfc_trans_dummy_array_bias): Do nothing for pointers.
2092 (gfc_conv_expr_descriptor): Use function return values directly.
2093 * trans-expr.c (gfc_conv_function_call): Always add byref call
2094 insn to pre chain.
2095 (gfc_trans_pointer_assignment): Add comments.
2096 (gfc_trans_arrayfunc_assign): Don't chain on expression.
2097
2098 2004-08-01 Roger Sayle <roger@eyesopen.com>
2099
2100 * options.c (gfc_init_options): Don't warn about the use GNU
2101 extensions by default.
2102 (gfc_post_options): Warn about GNU extensions with -pedantic.
2103 (gfc_handle_option): Don't warn about GNU extensions with -std=gnu.
2104
2105 2004-07-30 Richard Henderson <rth@redhat.com>
2106
2107 * trans-expr.c (gfc_conv_expr_reference): Create a CONST_DECL
2108 for TREE_CONSTANTs.
2109
2110 2004-07-25 Richard Henderson <rth@redhat.com>
2111
2112 * trans-decl.c (gfc_build_function_decl): Set DECL_ARTIFICIAL
2113 and DECL_IGNORED_P on RESULT_DECL.
2114 (gfc_generate_constructors): Likewise.
2115
2116 2004-07-18 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2117
2118 PR fortran/16465
2119 * lang.opt (ffixed-line-length-none, ffixed-line-length-): New
2120 options.
2121 (ffixed-line-length-80, ffixed-line-length-132): Remove.
2122 * options.c (gfc_handle_options): Deal with changed options.
2123 * scanner.c (load_line): Change second arg to 'char **',
2124 allocate if pointing to NULL. Keep track of buffer's length.
2125 Adapt buffer size to overlong lines. Pad lines to full length
2126 in fixed form.
2127 (load_file): Adapt to new interface of load_line.
2128
2129 2004-07-17 Joseph S. Myers <jsm@polyomino.org.uk>
2130
2131 * trans.h (builtin_function): Declare.
2132
2133 2004-07-16 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2134
2135 PR fortran/16404
2136 (parts ported from g95)
2137 * parse.h (gfc_state_data): New field do_variable.
2138 (gfc_check_do_variable): Add prototype.
2139 * parse.c (push_state): Initialize field 'do_variable'.
2140 (gfc_check_do_variable): New function.
2141 (parse_do_block): Remember do iterator variable.
2142 (parse_file): Initialize field 'do_variable'.
2143 * match.c (gfc_match_assignment, gfc_match_do,
2144 gfc_match_allocate, gfc_match_nullify, gfc_match_deallocate):
2145 Add previously missing checks.
2146 (gfc_match_return): Reformat error message.
2147 * io.c (match_out_tag): New function.
2148 (match_open_element, match_close_element,
2149 match_file_element, match_dt_element): Call match_out_tag
2150 instead of match_vtag where appropriate.
2151 (match_io_iterator, match_io_element): Add missing check.
2152 (match_io): Reformat error message.
2153 (match_inquire_element): Call match_out_tag where appropriate.
2154
2155 * parse.c (gfc_check_do_variable): Fix error locus.
2156
2157 2004-07-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2158
2159 PR fortran/15129
2160 * trans-decl.c (gfc_build_function_decl): Create a new chardecl
2161 for every assumed length character dummy argument.
2162
2163 PR fortran/15140
2164 * trans-decl.c (gfc_trans_deferred_vars): Remove bogus assertion.
2165
2166 PR fortran/13792
2167 * simplify.c (gfc_simplify_bound): Copy the bound expression.
2168
2169 2004-07-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2170
2171 PR fortran/15324
2172 * trans-array.c gfc_trans_g77_array,
2173 gfc_trans_dummy_array_bias): Don't call gfc_trans_string_init
2174 for assumed length characters.
2175 (gfc_conv_expr_descriptor): Set se->string_length if dealing
2176 with a character expression.
2177 (gfc_cvonv_array_parameter): Pass string length when passing
2178 character array according to g77 conventions.
2179
2180 2004-07-12 Paul Brook <paul@codesourcery.com>
2181
2182 * expr.c (gfc_check_assign_symbol): Handle pointer assignments.
2183 * trans-array.c (gfc_trans_auto_array_allocation): Remove
2184 initialization code.
2185 * trans-common.c (create_common): Use gfc_conv_initializer.
2186 * trans-decl.c (gfc_get_symbol_decl): Use gfc_conv_initializer.
2187 * trans-expr.c (gfc_conv_initializer): New function.
2188 (gfc_conv_structure): Use it.
2189 * trans.h (gfc_conv_initializer): Add prototype.
2190
2191 2004-07-11 Paul Brook <paul@codesourcery.com>
2192
2193 PR fortran/15986
2194 * parse.c (gfc_fixup_sibling_symbols): Also look for untyped
2195 variables.
2196 (parse_contained): Mark contained symbols as referenced.
2197
2198 2004-07-11 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2199
2200 PR fortran/16455
2201 * module.c (gfc_dump_module, gfc_use_module): Print locus
2202 when opening of module file fails.
2203
2204 PR fortran/16404
2205 * io.c (match_io): Flag 'WRITE(...), ...' as extension.
2206
2207 PR fortran/16404
2208 * match.c (gfc_match_program): A program name is obligatory.
2209 (gfc_match_return): RETURN in main program is an extension.
2210 (gfc_match_block_data): A space is required before a block data
2211 name.
2212
2213 PR fortran/16433
2214 * primary.c (match_boz_constant): Call gfc_notify_std only if
2215 we actually have a non-standard boz-literal-constant.
2216
2217 PR fortran/15754
2218 * expr.c (gfc_check_assign): Print ranks if incompatible. Issue
2219 warning if assigning NULL().
2220
2221 2004-07-11 Joseph S. Myers <jsm@polyomino.org.uk>
2222
2223 * f95-lang.c (set_block): Remove.
2224 (gfc_clear_binding_stack): New.
2225 (LANG_HOOKS_CLEAR_BINDING_STACK): Define.
2226 (struct binding_level): Remove block_created_by_back_end.
2227 (clear_binding_level): Likewise.
2228 (poplevel): Don't handle block_created_by_back_end.
2229
2230 2004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2231
2232 * trans-decl.c (gfc_create_module_variable): Nothing to do if
2233 symbol is in common, because we ...
2234 (gfc_generate_module_vars): Call gfc_trans_common.
2235
2236 2004-07-10 Paul Brook <paul@codesourcery.com>
2237
2238 * trans-array.c (gfc_build_null_descriptor): New function.
2239 (gfc_trans_static_array_pointer): Use it.
2240 * trans-array.h (gfc_build_null_descriptor): Add prototype.
2241 * trans-expr.c (gfc_conv_structure): Handle array pointers.
2242
2243 2004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2244
2245 PR fortran/16336
2246 * decl.c (gfc_match_save): Use-associated common block
2247 doesn't collide.
2248 * gfortran.h (gfc_common_head): Add new field 'name'.
2249 Fix typo in comment after #endif.
2250 * match.c (gfc_get_common): Add new argument from_common,
2251 mangle name if flag is set, fill in new field in structure
2252 gfc_common_head.
2253 (match_common): Set new arg in call to gfc_get_common,
2254 use-associated common block doesn't collide.
2255 * match.h (gfc_get_common): Adapt prototype.
2256 * module.c (load_commons): Set new arg in call to
2257 gfc_get_common.
2258 * symbol.c (free_common_tree): New function.
2259 (gfc_free_namespace): Call new function.
2260 * trans-common.c (several functions): Remove argument
2261 'name', use name from gfc_common_head instead.
2262
2263 2004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2264
2265 * expr.c (gfc_check_pointer_assign): Verify that rank of the LHS
2266 and RHS match. Return early if the RHS is NULL().
2267
2268 PR fortran/16336
2269 * match.c (match_common): Fix error reporting for used common.
2270
2271 PR fortran/15969
2272 * trans-expr.c (gfc_conv_structure): Handle initialization
2273 of scalar pointer components.
2274
2275 * parse.c (decode_statement): Fix matching of BLOCK DATA.
2276
2277 * trans-decl.c (generate_local_decl): Remove workaround obsoleted
2278 by fix for PR 15481.
2279
2280 2004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2281
2282 * trans-common.c: Fix whitespace issues, make variable names
2283 more readable.
2284 (create_common): Additionally, make loop logic more obvious.
2285
2286 2004-07-10 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2287 Paul Brook <paul@codesourcery.com>
2288
2289 PR fortran/13415
2290 * trans-common.c (calculate_length): Remove ...
2291 (get_segment_info): Merge into here. Save field type.
2292 (build_field): Use saved type.
2293 (create_common, new_condition, new_segment, finish_equivalences):
2294 Use new get_segment_info.
2295 * trans-types.c: Update comment.
2296
2297 2004-07-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2298
2299 PR fortran/14077
2300 * moduele.c (mio_symbol): Don't I/O initial values unless
2301 symbol is a parameter.
2302
2303 2004-07-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2304
2305 PR fortran/13201
2306 * resolve.c (resolve_symbol): Verify that the shape of a
2307 parameter array is not only explicit, but also constant.
2308 * array.c (gfc_is_compile_time_shape): New function.
2309 * gfortran.h (gfc_is_compile_time_shape): Add prototype.
2310
2311 2004-07-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2312
2313 PR fortran/15481
2314 PR fortran/13372
2315 PR fortran/13575
2316 PR fortran/15978
2317 * module.c (write_symbol, write_symtree): Remove workaround.
2318 * primary.c (match_actual_arglist): Enhance comment.
2319 (gfc_match_rvalue): Handle function call with first argument
2320 a keyword argument correctly.
2321 * resolve.c (resolve_symbol): Change call to
2322 gfc_set_default_type to issue error if no implicit type
2323 can be found.
2324 * trans-decl.c (gfc_create_module_variable): Remove workaround.
2325
2326 2004-07-08 Paul Brook <paul@codesourcery.com>
2327
2328 * intrinsic.c (add_sym_4s): New function.
2329 (add_subroutines): Change gfc_add_sym_? to gfc_add_sym_?s.
2330
2331 2004-07-04 Janne Blomqvist <jblomqvi@cc.hut.fi>
2332 Paul Brook <paul@codesourcery.com>
2333
2334 PR fortran/15280
2335 PR fortran/15665
2336 * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_IARGC and
2337 GFC_ISYM_COMMAND_ARGUMENT_COUNT.
2338 * intrinsic.c (add_functions): Identify iargc. Add
2339 command_argument_count.
2340 (add_subroutines): Resolve getarg. Add get_command and
2341 get_command_argument.
2342 * intrinsic.h (gfc_resolve_getarg, gfc_resolve_get_command,
2343 gfc_resolve_get_command_argument): Add prototypes.
2344 * iresolve.c (gfc_resolve_getarg, gfc_resolve_get_command,
2345 gfc_resolve_get_command_argument): New functions.
2346 * trans-decl.c (gfor_fndecl_iargc): New variable.
2347 (gfc_build_intrinsic_function_decls): Set it.
2348 * trans-intrinsic.c (gfc_conv_intrinsic_iargc): New function.
2349 (gfc_conv_intrinsic_function): Use it.
2350 * trans.h (gfor_fndecl_iargc): Declare.
2351
2352 2004-07-04 Matthias Klose <doko@debian.org>
2353
2354 * Make-lang.in: Generate and install gfortran man page.
2355 * invoke.texi: Remove extra '@c man end'.
2356
2357 2004-07-04 Richard Henderson <rth@redhat.com>
2358
2359 * f95-lang.c (gfc_mark_addressable): Don't put_var_into_stack.
2360
2361 2004-07-04 Paul Brook <paul@codesourcery.com>
2362
2363 * decl.c (gfc_match_implicit_range): Don't use typespec.
2364 (gfc_match_implicit): Handle character selectors.
2365 * gfortran.h (gfc_set_implicit): Remove prototype.
2366 (gfc_add_new_implicit_range, gfc_merge_new_implicit): Update.
2367 * parse.c (accept_statement): Don't call gfc_set_implicit.
2368 * symbol.c (new_ts): Remove.
2369 (gfc_set_implicit_none): Use same loop bounds as other functions.
2370 (gfc_set_implicit): Remove.
2371 (gfc_clear_new_implicit, gfc_add_new_implicit_range): Only set flags.
2372 (gfc_merge_new_implicit): Combine with gfc_set_implicit.
2373
2374 2004-06-30 Richard Henderson <rth@redhat.com>
2375
2376 * match.c (var_element): Remove unused variable.
2377
2378 * trans-decl.c (gfc_generate_function_code): Don't set
2379 x_whole_function_mode_p.
2380 (gfc_generate_constructors): Likewise.
2381
2382 2004-06-30 Richard Henderson <rth@redhat.com>
2383
2384 * trans-decl.c (gfc_generate_function_code): Don't set
2385 immediate_size_expand.
2386 (gfc_generate_constructors): Likewise.
2387
2388 2004-06-30 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2389
2390 PR fortran/16161
2391 * decl.c (gfc_match_type_spec): Rename second argument to
2392 'implicit_flag', reverse meaning. Don't match_char_spec if
2393 'implicit_flag' is set. Rename to ...
2394 (match_type_spec): ... this.
2395 (gfc_match_implicit_none, match_implicit_range): Move here
2396 from match.c.
2397 (gfc_match_implicit): Move here from match.c, try to
2398 match_char_len if match_implicit_range doesn't succeed for
2399 CHARACTER implicits. Call renamed fucntion match_type_spec.
2400 (gfc_match_data_decl, match_prefix): Call renamed function
2401 match_type_spec.
2402 * match.c (gfc_match_implicit_none, match_implicit_range,
2403 gfc_match_implicit): Move to decl.c.
2404 * match.h (gfc_match_implicit_none, gfc_match_implicit):
2405 Move protoypes to section 'decl.c'.
2406 (gfc_match_type_spec): Remove prototype.
2407
2408 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2409
2410 * decl.c, interface.c, symbol.c, trans-common.c: Add 2004 to
2411 copyright years.
2412
2413 2004-06-29 Steven Bosscher <stevenb@suse.de>
2414
2415 Make sure types in assignments are compatible. Mostly mechanical.
2416 * trans-const.h (gfc_index_one_node): New define.
2417 * trans-array.c (gfc_trans_allocate_array_storage,
2418 gfc_trans_allocate_temp_array, gfc_trans_array_constructor_subarray,
2419 gfc_trans_array_constructor_value, gfc_trans_array_constructor,
2420 gfc_conv_array_ubound, gfc_conv_array_ref,
2421 gfc_trans_scalarized_loop_end, gfc_conv_section_startstride,
2422 gfc_conv_ss_startstride, gfc_conv_loop_setup, gfc_array_init_size,
2423 gfc_trans_array_bounds, gfc_trans_dummy_array_bias,
2424 gfc_conv_expr_descriptor, gfc_trans_deferred_array): Use the correct
2425 types in assignments, conversions and conditionals for expressions.
2426 * trans-expr.c (gfc_conv_expr_present, gfc_conv_substring,
2427 gfc_conv_unary_op, gfc_conv_cst_int_power, gfc_conv_string_tmp,
2428 gfc_conv_function_call, gfc_trans_pointer_assignment,
2429 gfc_trans_scalar_assign): Likewise.
2430 * trans-intrinsic.c (build_fixbound_expr, gfc_conv_intrinsic_bound,
2431 gfc_conv_intrinsic_anyall, gfc_conv_intrinsic_count,
2432 gfc_conv_intrinsic_minmaxloc, gfc_conv_intrinsic_btest,
2433 gfc_conv_intrinsic_singlebitop, gfc_conv_intrinsic_ishft,
2434 gfc_conv_intrinsic_ishftc, gfc_conv_intrinsic_strcmp,
2435 gfc_conv_allocated, gfc_conv_associated,
2436 gfc_conv_intrinsic_rrspacing, gfc_conv_intrinsic_trim): Likewise.
2437 * trans-io.c (set_string): Likewise.
2438 * trans-stmt.c (gfc_trans_do, gfc_trans_forall_loop,
2439 gfc_do_allocate, generate_loop_for_temp_to_lhs,
2440 generate_loop_for_rhs_to_temp, compute_inner_temp_size,
2441 compute_overall_iter_number, gfc_trans_assign_need_temp,
2442 gfc_trans_pointer_assign_need_temp, gfc_trans_forall_1,
2443 gfc_evaluate_where_mask, gfc_trans_where_assign,
2444 gfc_trans_where_2): Likewise.
2445 * trans-types.c (gfc_get_character_type, gfc_build_array_type,
2446 gfc_get_nodesc_array_type, gfc_get_array_type_bounds): Likewise.
2447
2448 * trans.c (gfc_add_modify_expr): Add sanity check that types
2449 for the lhs and rhs are the same for scalar assignments.
2450
2451 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2452
2453 * dump-parse-tree.c (show_common): New function.
2454 (gfc_show_namespace): Show commons.
2455
2456 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2457 Andrew Vaught <andyv@firstinter.net>
2458
2459 PR fortran/13249
2460 PR fortran/15481
2461 * decl.c (gfc_match_save): Adapt to new common structures,
2462 don't allow saving USE-associated common.
2463 * dump-parse-tree (gfc_show_attr): (saved_)common are not
2464 symbol attributes any longer.
2465 (gfc_show_symbol): Don't show old-style commons any longer.
2466 (gfc_show_namespace): Adapt call to gfc_traverse_symtree to new
2467 interface.
2468 * gfortran.h (symbol_attribute): Remove common and saved_common
2469 attributes.
2470 (gfc_symbol): Remove common_head element.
2471 (gfc_common_head): New struct.
2472 (gfc_get_common_head): New macro.
2473 (gfc_symtree): Add field 'common' to union.
2474 (gfc_namespace): Add field 'common_root'; change type of field
2475 'blank_common' to blank_common.
2476 (gfc_add_data): New prototype.
2477 (gfc_traverse_symtree): Expect a symtree as first argument
2478 instead of namespace.
2479 * match.c (gfc_get_common): New function.
2480 (match_common_name): Change to take char * as argument, adapt,
2481 fix bug with empty name.
2482 (gfc_match_common): Adapt to new data structures. Disallow
2483 redeclaration of USE-associated COMMON-block. Fix bug with
2484 empty common.
2485 (var_element): Adapt to new common structures.
2486 * match.h (gfc_get_common): Declare.
2487 * module.c: Add 2004 to copyright years, add commons to module
2488 file layout description.
2489 (ab_attribute, attr_bits, mio_symbol_attributes): Remove code
2490 for removed attributes.
2491 (mio_symbol): Adapt to new way of storing common relations.
2492 (load_commons): New function.
2493 (read_module): Skip common list on first pass, load_commons at
2494 second.
2495 (write_commons): New function.
2496 (write_module): Call write_commons().
2497 * symbol.c (gfc_add_saved_comon, gfc_add_common): Remove
2498 functions related to removed attributes.
2499 (gfc_add_data): New function.
2500 (gfc_clear_attr): Don't set removed attributes.
2501 (gfc_copy_attr): Don't copy removed attributes.
2502 (traverse_symtree): Remove.
2503 (gfc_traverse_symtree): Don't traverse symbol
2504 tree of the passed namespace, but require a symtree to be passed
2505 instead. Unify with traverse_symtree.
2506 (gfc_traverse_ns): Call gfc_traverse_symtree according to new
2507 interface.
2508 (save_symbol): Remove setting of removed attribute.
2509 * trans-common.c (gfc_sym_mangled_common_id): Change to
2510 take 'char *' argument instead of 'gfc_symbol'.
2511 (build_common_decl, new_segment, translate_common): Adapt to new
2512 data structures, add new
2513 argument name.
2514 (create_common): Adapt to new data structures, add new
2515 argument name. Fix typo in intialization of derived types.
2516 (finish_equivalences): Add second argument in call to
2517 create_common.
2518 (named_common): take 'gfc_symtree' instead of 'gfc_symbol'.
2519 (gfc_trans_common): Adapt to new data structures.
2520 * trans-decl.c (gfc_create_module_variables): Remove test for
2521 removed attribute.
2522
2523 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2524
2525 * io.c: Add 2004 to copyright years.
2526
2527 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2528 Andrew Vaught <andyv@firstinter.net>
2529
2530 * gfortran.h (gfc_gsymbol): New typedef.
2531 (gfc_gsym_root): New variable.
2532 (gfc_get_gsymbol, gfc_find_gsym): New prototypes.
2533 * parse.c (global_used): New function.
2534 (parse_block_data): Check for double empty BLOCK DATA,
2535 use global symbol table.
2536 (parse_module): Use global symbol table.
2537 (add_global_procedure, add_global_program): New functions.
2538 (gfc_parse_file): Use global symbol table.
2539 * symbol.c (gfc_gsym_root): New variable.
2540 (gfc_find_gsym, gsym_compare, gfc_get_gsymbol): New
2541 functions.
2542
2543 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2544
2545 * module.c (mio_gmp_real): Correct writing of negative numbers.
2546
2547 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2548
2549 PR fortran/15963
2550 * expr.c (check_intrinsic_op): Allow comparison of characters.
2551 Make logic easier.
2552
2553 2004-06-26 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2554 Andrew Vaught <andyv@firstinter.net>
2555
2556 * decl.c (contained_procedure): New function.
2557 (match_end): Verify correctness of END STATEMENT in
2558 all cases.
2559
2560 2004-06-26 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2561 Andrew Vaught <andyv@firstinter.net>
2562
2563 PR fortran/15190
2564 * decl.c (gfc_match_type_spec), io.c (match_io), parse.c
2565 (decode_statement): Enforce required space in free-form.
2566
2567 2004-06-22 Richard Kenner <kenner@vlsi1.ultra.nyu.edu>
2568
2569 * f95-lang.c (LANG_HOOKS_GIMPLE_BEFORE_INLINING): Deleted.
2570 * trans-array.c (gfc_conv_descriptor_data): Add operand
2571 for COMPONENT_REF.
2572 (gfc_conv_descriptor_offset, gfc_conv_descriptor_dtype): Likewise.
2573 (gfc_conv_descriptor_dimension, gfc_conv_descriptor_stride): Likewise.
2574 (gfc_conv_descriptor_lbound, gfc_conv_descriptor_ubound): Likewise.
2575 * trans-common.c (create_common): Likewise.
2576 * trans-expr.c (gfc_conv_component_ref): Likewise.
2577 * trans-io.c (set_parameter_value): Likewise.
2578 (set_parameter_ref, set_string, set_flag, io_result): Likewise.
2579 (transfer_expr): Likewise.
2580 * trans-decl.c (gfc_trans_auto_character_variable):
2581 Set up to get DECL_SIZE and DECL_SIZE_UNIT gimplified.
2582 (gfc_gimplify_function): New function.
2583 (gfc_generate_function-code): Properly handle nested functions.
2584 * trans.c (gfc_build_array_ref): Add two new operands for ARRAY_REF.
2585
2586 2004-06-22 Janne Blomqvist <jblomqvi@cc.hut.fi>
2587
2588 PR fortran/15750
2589 * io.c (gfc_match_inquire): Bugfix for iolength related stuff.
2590 (gfc_resolve_inquire): Resolve the iolength tag. Return
2591 SUCCESS at end of function if no failure has occured.
2592 * resolve.c (resolve_code): Resolve if iolength is encountered.
2593 * trans-io.c: (ioparm_iolength, iocall_iolength,
2594 iocall_iolength_done): New variables.
2595 (last_dt): Add IOLENGTH.
2596 (gfc_build_io_library_fndecls ): Set iolength related variables.
2597 (gfc_trans_iolength): Implement.
2598 (gfc_trans_dt_end): Treat iolength as a third form of data transfer.
2599
2600 2004-06-21 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de
2601
2602 PR fortran/15511
2603 * scanner.c (load_line): Don't truncate preprocessor lines.
2604 Reformat error message.
2605 (preprocessor_line): Issue warning in case of malformed
2606 preprocessor line.
2607
2608 2004-06-21 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2609
2610 * resolve.c (resolve_symbol): Add comment in function body.
2611 (check_data_variable): Change type of mark to ar_type, adapt code
2612 accordingly.
2613
2614 2004-06-21 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2615
2616 * array.c (gfc_insert_constructor): Avoid redundant call to
2617 mpz_comp. Add 2004 to copyright years.
2618
2619 2004-06-21 Joseph S. Myers <jsm@polyomino.org.uk>
2620
2621 * trans.h (stmtblock_t): Change has_scope to unsigned int.
2622
2623 2004-06-20 Steven G. Kargl <kargls@comcast.net>
2624
2625 * arith.c (gfc_range_check): correct complex underflow.
2626
2627 2004-06-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2628
2629 PR fortran/15962
2630 * match.c (match_case_selector): Call gfc_match_init_expr
2631 instead of gfc_match_expr.
2632 * resolve.c (validate_case_label_expr): No need to check for
2633 constant, since it wouldn't have been matched with the fix to
2634 match.c.
2635
2636 2004-06-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2637
2638 PR fortran/15211
2639 * trans-intrinsic.c (gfc_conv_intrinsic_len): Deal with arrays
2640 of strings.
2641
2642 2004-06-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2643
2644 PR fortran/15510
2645 * trans-deecl.c (generate_local_decl): Do not issue warning for
2646 unused variables if they're use associated.
2647
2648 2004-06-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2649 Andrew Vaught <andyv@firstinter.net>
2650
2651 PR fortran/14928
2652 * gfortran.h (gfc_check_f): Add new field f3ml.
2653 * check.c (gfc_check_minloc_maxloc): Take argument list instead
2654 of individual arguments, reorder if necessary.
2655 * intrinsic.h (gfc_check_minloc_maxloc): ... adapt prototype.
2656 * intrinsic.c (add_sym_3ml): New function.
2657 (add_functions): Change to add_sym_3ml for MINLOC, MAXLOC.
2658 (check_specific): Catch special case MINLOC, MAXLOC.
2659
2660 2004-06-14 Paul Brook <paul@codesourcery.com>
2661
2662 * intrinsic.c (add_sym_2s): Use correct function types.
2663
2664 2004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2665
2666 * Make-lang.in (F95_OBJS, F95_PARSER_OBJS): Alphabetize. Move data.c
2667 * data.c (gfc_get_section_index): Remove dependency on trans.h.
2668
2669 2004-06-12 Steven G. Kargl <kargls@comcast.net>
2670
2671 * check.c (gfc_check_second_sub, gfc_check_irand, gfc_check_rand
2672 gfc_check_srand, gfc_check_etime, gfc_check_etime_sub): New functions.
2673 * gfortran.h (gfc_generic_isym_id): New symbols GFC_ISYM_ETIME,
2674 GFC_ISYM_IRAND, GFC_ISYM_RAND, GFC_ISYM_SECOND.
2675 * trans-intrinsic.c: Use symbols.
2676 * intrinsic.c (add_sym_2s): New function.
2677 * intrinsic.c: Add etime, dtime, irand, rand, second, srand.
2678 * intrinsic.h: Function prototypes.
2679 * iresolve.c (gfc_resolve_etime_sub, gfc_resolve_second_sub
2680 gfc_resolve_srand): New functions.
2681
2682 2004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2683
2684 PR fortran/14957
2685 * decl.c (gfc_match_end): Require END {SUBROUTINE|FUNCTION} for
2686 contained procedure.
2687
2688 2004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2689
2690 PR fortran/12841
2691 * interface.c (compare_parameter, compare_actual_formal): Don't
2692 check types and array shapes for NULL()
2693 * trans-expr.c (conv_function_call): No double indirection for
2694 NULL()
2695
2696 2004-06-09 Toon Moene <toon@moene.indiv.nluug.nl>
2697
2698 * trans-expr.c (gfc_conv_cst_int_power): Compute
2699 x**(-n) by converting it to (1/x)**n instead of
2700 1/x**n.
2701
2702 2004-06-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2703
2704 PR fortran/13372
2705 * module.c (write_symbol, write_symtree): Don't write symbols
2706 wrongly added to namespace.
2707 * trans-decl.c (gfc_create_module_variable): Don't create a
2708 backend decl for a symbol incorrectly added to namespace.
2709
2710 2004-06-09 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2711
2712 PR fortran/13201
2713 * resolve.c (resolve_symbol): Verify that parameter array has an
2714 explicit shape. Fix typos and coding style issues in surrounding
2715 lines.
2716
2717 2004-06-05 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2718
2719 PR fortran/15478
2720 * gfortran.texi: The documentation doesn't contain infomration on
2721 how to report bugs, and shouldn't, so remove the line which
2722 says it does.
2723
2724 2004-06-05 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2725
2726 * intrinsic.c (sort_actual): Keep track of type of missing
2727 arguments. (Missing from previous commit.)
2728
2729 2004-06-03 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2730
2731 * gfortran.h (gfc_actual_arglist): New field missing_arg_type.
2732 * interface.c (compare_actual_formal): Keep type of omitted
2733 optional arguments.
2734 * trans-expr.c (gfc_conv_function_call): Add string length
2735 argument for omitted string argument.
2736
2737 2004-06-03 Paul Brook <paul@codesourcery.com>
2738
2739 * trans.c (gfc_finish_block, gfc_add_expr_to_block): Build statement
2740 lists instead of compound expr chains.
2741 (gfc_trans_code): Annotate statement lists.
2742
2743 2004-06-03 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2744
2745 * trans-array.c: Fix spelling in comments.
2746
2747 2004-06-02 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2748
2749 PR fortran/15557
2750 * data.c (assign_substring_data_value): New function.
2751 (gfc_assign_data_value): Call the new function if we're dealing
2752 with a substring LHS.
2753
2754 2004-06-01 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2755
2756 PR fortran/15477
2757 * gfortran.h (GFC_VERSION): Remove.
2758 * gfortran.texi (version-gfortran): Remove, replace by version-GCC
2759 where used.
2760
2761 2004-05-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2762
2763 * trans-types.c: Fix spelling & layout in comments.
2764
2765 2004-05-30 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2766
2767 PR fortran/14067
2768 * trans-const.c (gfc_conv_string_init): Allow variable string
2769 length lower than initialization string length.
2770
2771 2004-05-30 Paul Brook <paul@codesourcery.com>
2772
2773 PR fortran/15620
2774 * trans-decl.c (gfc_shadow_sym, gfc_restore_sym): New functions.
2775 * trans-expr.c (gfc_trans_string_copy): New function.
2776 (gfc_conv_statement_function): Use them. Create temp vars. Enforce
2777 character lengths.
2778 (gfc_conv_string_parameter): Use gfc_trans_string_copy.
2779 * trans-stmt.c (gfc_trans_forall_1): Use gfc_{shadow,restore}_sym.
2780 * trans.h (struct gfc_saved_var): Define.
2781 (gfc_shadow_sym, gfc_restore_sym): Add prototypes.
2782
2783 2004-05-30 Steven G. Kargl <kargls@comcast.net>
2784
2785 * iresolve.c (gfc_resolve_random_number): Clean up conditional.
2786
2787 2004-05-29 Steven G. Kargl <kargls@comcast.net>
2788
2789 * simplify.c (gfc_simplify_log): Remove useless line of code.
2790
2791 2004-05-29 Paul Brook <paul@codesourcery.com>
2792
2793 * trans-common.c (find_equivalence): Find multiple rules.
2794
2795 2004-05-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2796
2797 * gfortran.h (gfc_current_locus, gfc_set_locus): Remove.
2798 (gfc_current_locus): Declare new global variable.
2799 * scanner.c (gfc_current_locus, gfc_set_locus): Remove.
2800 (gfc_current_locus1): Rename ...
2801 (gfc_current_locus): ... to this.
2802 (gfc_at_eof, gfc_at_bol, gfc_at_eol, gfc_advance_line, next_char,
2803 skip_fixed_comments, skip_free_comments, gfc_next_char_literal,
2804 gfc_peek_char, gfc_gobble_whitespace, gfc_new_file): Use
2805 gfc_current_locus instead of gfc_current_locus1, gfc_set_locus()
2806 and gfc_current_locus(), respectively.
2807 * array.c (match_subscript, gfc_match_array_ref, match_array_list,
2808 match_array_cons_element, gfc_match_array_constructor):
2809 Read/modify gfc_current_locus instead of calling gfc_set_locus()
2810 and gfc_current_locus().
2811 * decl.c (gfc_match_null, variable_decl, gfc_match_kind_spec,
2812 match_attr_spec, gfc_match_function_decl, gfc_match_end,
2813 attr_decl1, gfc_match_save): Likewise.
2814 * error.c (error_print, gfc_internal_error): Likewise.
2815 * expr.c (gfc_int_expr, gfc_default_logical_kind): Likewise.
2816 * interface.c (gfc_add_interface): Likewise.
2817 * io.c (gfc_match_format, match_dt_format, match_dt_element,
2818 match_io_iterator, match_io): Likewise.
2819 * match.c (gfc_match_space, gfc_match_eos,
2820 gfc_match_small_literal_int, gfc_match_st_label,
2821 gfc_match_strings, gfc_match_name, gfc_match_iterator,
2822 gfc_match_char, gfc_match, gfc_match_assignment,
2823 gfc_match_pointer_assignment, gfc_match_if, gfc_match_do,
2824 gfc_match_nullify, gfc_match_call, match_implicit_range,
2825 gfc_match_implicit, gfc_match_data, match_case_selector,
2826 gfc_match_case, match_forall_iterator): Likewise.
2827 * matchexp.c (gfc_match_defined_op_name, next_operator,
2828 match_level_1, match_mult_operand, match_ext_mult_operand,
2829 match_add_operand, match_ext_add_operand, match_level_2,
2830 match_level_3, match_level_4, match_and_operand, match_or_operand,
2831 match_equiv_operand, match_level_5, gfc_match_expr): Likewise.
2832 * module.c (gfc_match_use, mio_array_ref, mio_expr): Likewise.
2833 * parse.c (match_word, decode_statement, next_free, next_fixed,
2834 add_statement, verify_st_order, parse_if_block, gfc_parse_file):
2835 Likewise.
2836 * primary.c (match_digits, match_integer_constant,
2837 match_boz_constant, match_real_constant, match_substring,
2838 next_string_char, match_charkind_name, match_string_constant,
2839 match_logical_constant, match_const_complex_part,
2840 match_complex_constant, match_actual_arg, match_keyword_arg,
2841 gfc_match_actual_arglist, gfc_match_structure_constructor,
2842 gfc_match_rvalue, gfc_match_variable): Likewise.
2843 * st.c (gfc_get_code): Likewise.
2844 * symbol.c (check_conflict, check_used, check_done,
2845 duplicate_attr, add_flavor, gfc_add_procedure, gfc_add_intent,
2846 gfc_add_access, gfc_add_explicit_interface, gfc_add_type,
2847 gfc_add_component, gfc_reference_st_label, gfc_new_symbol): Likewise.
2848
2849 2004-05-26 Roger Sayle <roger@eyesopen.com>
2850
2851 * io.c (format_asterisk): Silence compiler warnings by correcting
2852 the number of elements of a "locus" initializer.
2853
2854 2004-05-25 Roger Sayle <roger@eyesopen.com>
2855
2856 PR fortran/13912
2857 * matchexp.c: Allow unary operators after arithmetic operators
2858 as a GNU extension.
2859 (match_ext_mult_operand, match_ext_add_operand): New functions.
2860 (match_mult_operand): Tweak to call match_ext_mult_operand.
2861 (match_add_operand): Tweak to call match_ext_mult_operand.
2862 (match_level_2): Rearrange to call match_ext_add_operand.
2863
2864 2004-05-25 Paul Brook <paul@codesourcery.com>
2865
2866 * expr.c (check_inquiry): Remove bogus tests.
2867
2868 2004-05-23 Paul Brook <paul@codesourcery.com>
2869
2870 PR fortran/13773
2871 * expr.c (restricted_args): Remove redundant checks/argument.
2872 (external_spec_function): Update to match.
2873 (restricted_intrinsic): Rewrite.
2874
2875 2004-05-23 Paul Brook <paul@codesourcery.com>
2876 Victor Leikehman <lei@haifasphere.co.il>
2877
2878 * gfortran.h (struct gfc_symbol): Add equiv_built.
2879 * trans-common.c: Change int to HOST_WIDE_INT. Capitalize error
2880 messages.
2881 (current_length): Remove.
2882 (add_segments): New function.
2883 (build_equiv_decl): Create initialized common blocks.
2884 (build_common_decl): Always add decl to bindings.
2885 (create_common): Create initializers.
2886 (find_segment_info): Reformat to match coding conventions.
2887 (new_condition): Use add_segments.
2888 (add_condition, find_equivalence, add_equivalences): Move iteration
2889 inside functions. Only process each segment once.
2890 (new_segment, finish_equivalences, translate_common): Simplify.
2891
2892 2004-05-23 Steven G. Kargl <kargls@comcast.net>
2893
2894 * check.c (gfc_check_random_seed): Issue for too many arguments.
2895
2896 2004-05-22 Steven G. Kargl <kargls@comcast.net>
2897
2898 * intrinsic.c (add_subroutines): Use add_sym_3s for random_seed.
2899
2900 2004-05-22 Paul Brook <paul@codesourcery.com>
2901
2902 * dump-parse-tree.c (gfc_show_equiv): New function.
2903 (gfc_show_namespace): Use it.
2904
2905 2004-05-22 Victor Leikehman <lei@haifasphere.co.il>
2906
2907 PR fortran/13249
2908 * symbol.c (gfc_add_common): Disable checks to work around other more
2909 fundamental inadequacies.
2910
2911 2004-05-22 Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
2912
2913 * trans-decl.c (gfc_get_extern_function_decl): Set DECL_IS_PURE
2914 only for functions.
2915 (gfc_build_function_decl): Likewise.
2916
2917 2004-05-22 Steven G. Kargl <kargls@comcast.net>
2918
2919 * check.c (gfc_check_system_clock): New function.
2920 * intrinsic.c (add_sym_3s): New function.
2921 (add_subroutines): Use it.
2922 * intrinsic.h (gfc_check_system_clock, gfc_resolve_system_clock):
2923 Add prototypes.
2924 * iresolve.c (gfc_resolve_system_clock): New function.
2925
2926 2004-05-22 Steven G. Kargl <kargls@comcast.net>
2927
2928 * invoke.texi: Document -Wunderflow and spell check.
2929 * lang.opt: Add Wunderflow.
2930 * gfortran.h (gfc_option_t): Add warn_underflow option.
2931 * options.c (gfc_init_options, set_Wall): Use it.
2932 * primary.c (match_real_constant): Explicitly handle UNDERFLOW.
2933 * arith.c (gfc_arith_uminus, gfc_arith_plus, gfc_arith_minus,
2934 gfc_arith_times, gfc_arith_divide, gfc_arith_power, gfc_real2real,
2935 gfc_real2complex, gfc_complex2real, gfc_complex2complex): Ditto.
2936 * arith.c (common_logarithm): Fix typo in comment.
2937
2938 2004-05-21 Roger Sayle <roger@eyesopen.com>
2939
2940 * io.c (check_format): As a GNU extension, allow the comma after a
2941 string literal to be optional in a format. Use gfc_notify_std to
2942 issue an error/warning as appropriate.
2943
2944 2004-05-21 Roger Sayle <roger@eyesopen.com>
2945
2946 * io.c (check_format): Use gfc_notify_std to determine whether to
2947 issue an error/warning for omitting the digits from the X format.
2948
2949 2004-05-20 Roger Sayle <roger@eyesopen.com>
2950
2951 * io.c (check_format): Allow the number before the X format to
2952 be optional when not -pedantic.
2953
2954 2004-05-18 Feng Wang <fengwang@nudt.edu.cn>
2955 Paul Brook <paul@codesourcery.com>
2956
2957 * f95-lang.c (gfc_init_builtin_functions): Use vold_list_node.
2958 Create decls for __builtin_pow{,f}.
2959 * gfortran.h (PREFIX_LEN): Define.
2960 * trans-decl.c (gfor_fndecl_math_powi): Add.
2961 (gfor_fndecl_math_powf, gfor_fndecl_math_pow): Remove.
2962 (gfc_build_intrinsic_function_decls): Create decls for powi.
2963 * trans-expr.c (powi_table): Add.
2964 (gfc_conv_integer_power): Remove.
2965 (gfc_conv_powi): New function.
2966 (gfc_conv_cst_int_power): New function.
2967 (gfc_conv_power_op): Use new powi routines.
2968 * trans.h (struct gfc_powdecl_list): Add.
2969 (gfor_fndecl_math_powi): Add.
2970 (gfor_fndecl_math_powf, gfor_fndecl_math_pow): Remove.
2971
2972 2004-05-18 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2973
2974 * trans.c, trans-decl.c: Fix comment typos.
2975
2976 2004-05-18 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2977
2978 * trans-const.c (gfc_conv_mpf_to_tree): Fix typo.
2979
2980 2004-05-18 Steve Kargl <kargls@comcast.net>
2981
2982 * arith.c (gfc_int2complex): Fix incorrect range checking.
2983
2984 2004-05-18 Paul Brook <paul@codesourcery.com>
2985
2986 PR fortran/13930
2987 * decl.c (add_init_expr_to_sym): Remove incorrect check.
2988 (default_initializer): Move to expr.c.
2989 (variable_decl): Don't assign default initializer to variables.
2990 * expr.c (gfc_default_initializer): Move to here.
2991 * gfortran.h (gfc_default_initializer): Add prototype.
2992 * resolve.c (resolve_symbol): Check for illegal initializers.
2993 Assign default initializer.
2994
2995 2004-05-17 Steve Kargl <kargls@comcast.net>
2996
2997 * arith.c (gfc_arith_power): Complex number raised to 0 power is 1.
2998
2999 2004-05-17 Steve Kargl <kargls@comcast.net>
3000
3001 * arith.c (gfc_real2complex): Range checking wrong part of complex
3002 number.
3003
3004 2004-05-16 Paul Brook <paul@codesourcery.com>
3005
3006 * options.c (gfc_handle_module_path_options): Fix buffer overrun.
3007
3008 2004-05-16 Paul Brook <paul@codesourcery.com>
3009
3010 * arith.c (gfc_range_check): Fix logic error.
3011
3012 2004-05-16 Steve Kargl <sgk@troutmask.apl.washington.edu>
3013
3014 * arith.c: Fix comment typos.
3015
3016 2004-05-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3017
3018 PR fortran/13742
3019 * decl.c (add_init_expr_to_sym): Verify that COMMON variable is
3020 not initialized in a disallowed fashion.
3021 * match.c (gfc_match_common): Likewise.
3022 (var_element): Verify that variable is not in the blank COMMON,
3023 if it is in a common.
3024
3025 2004-05-15 Joseph S. Myers <jsm@polyomino.org.uk>
3026
3027 * Make-lang.in (f95.generated-manpages): Remove.
3028 (f95.srcextra): New.
3029 (f95.info, fortran/gfortran.info, fortran/gfortran.dvi,
3030 f95.maintainer-clean): Generate info and dvi files in objdir/doc.
3031 (f95.dvi): Remove.
3032 (dvi): New.
3033 (f95.install-info): Remove.
3034 (install-info): New.
3035
3036 2004-05-15 Victor Leikehman <lei@haifasphere.co.il>
3037
3038 * decl.c (add_init_expr_to_sym): Check for variable size arrays.
3039
3040 2004-05-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3041
3042 * primary.c (match_boz_constant): Use gfc_notify_std() for
3043 issuing a warning or an error.
3044
3045 2004-05-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3046
3047 PR fortran/13826
3048 * primary.c (match_structure_constructor): Rename ...
3049 (gfc_match_structure_constructor): ... to this. Make non-static.
3050 (gfc_match_rvalue): Call renamed function.
3051 * match.h (gfc_match_structure_constructor): Declare.
3052 * match.c (gfc_match_data_constant): Handle structure
3053 constructor.
3054
3055 2004-05-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3056
3057 PR fortran/13702
3058 (Port from g95)
3059 * gfortran.h (gfc_linebuf): New typedef.
3060 (linebuf): Remove.
3061 (gfc_file): Revamped, use new gfc_linebuf.
3062 (locus): Revamped, use new types.
3063 (gfc_current_file): Remove.
3064 (gfc_current_form, gfc_source_file): New global variables.
3065 * match.c (gfc_match_space, gfc_match_strings): Use
3066 gfc_current_form to find source form.
3067 * module.c (gfc_dump_module): Use gfc_source_file when printing
3068 module header.
3069 * error.c (show_locus, show_loci) Use new data structures to print
3070 locus.
3071 * scanner.c (first_file, first_duplicated_file, gfc_current_file):
3072 Remove.
3073 (file_head, current_file, gfc_current_form, line_head, line_tail,
3074 gfc_current_locus1, gfc_source_file): New global variables.
3075 (gfc_scanner_init1): Set new global variables.
3076 (gfc_scanner_done1): Free new data structures.
3077 (gfc_current_locus): Return pointer to gfc_current_locus1.
3078 (gfc_set_locus): Set gfc_current_locus1.
3079 (gfc_at_eof): Set new variables.
3080 (gfc_at_bol, gfc_at_eol, gfc_advance_line, gfc_next_char): Adapt
3081 to new locus structure.
3082 (gfc_check_include): Remove.
3083 (skip_free_comments, skip_fixed_comments): Use gfc_current_locus1.
3084 (gfc_skip_comments): Use gfc_current_form, find locus with
3085 gfc_current_locus1.
3086 (gfc_next_char): Use gfc_current_form.
3087 (gfc_peek_char, gfc_gobble_whitespace): Use gfc_current_locus1.
3088 (load_line): Use gfc_current_form. Recognize ^Z as EOF. Fix
3089 comment formatting.
3090 (get_file): New function.
3091 (preprocessor_line, include_line): New functions.
3092 (load_file): Move down, rewrite to match new data structures.
3093 (gfc_new_file): Rewrite to match new data structures.
3094 * parse.c (next_statement): Remove code which is now useless. Use
3095 gfc_source_form and gfc_source_file where appropriate.
3096 * trans-decl.c (gfc_get_label_decl): adapt to new data structures
3097 when determining locus of frontend code.
3098 * trans-io.c (set_error_locus): Same.
3099 * trans.c (gfc_get_backend_locus, gfc_set_backend_locus): Likewise.
3100 * lang-specs.h (@f77-cpp-input, @f95-cpp-input): Remove '-P' from
3101 preprocessor flags.
3102 (all): Add missing initializers.
3103
3104 2004-05-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3105
3106 * Make-lang.in (trans-common.o): Remove redundant dependency.
3107 (data.c): Replace object file name ...
3108 (data.o): ... by the correct one.
3109
3110 2004-05-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3111
3112 * dump-parse-tree.c (gfc_show_array_ref): Print colon only
3113 for ranges when dumping array references.
3114
3115 2004-05-14 Victor Leikehman <lei@haifasphere.co.il>
3116
3117 * decl.c (variable_decl): Always apply default initializer.
3118
3119 2004-05-08 Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
3120
3121 PR fortran/15206
3122 * trans-intrinsic.c (gfc_conv_intrinsic_rrspacing): Fixed to
3123 handle zero correctly.
3124
3125 2004-05-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3126
3127 * match.c (gfc_match): Eliminate dead code.
3128
3129 2004-05-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3130
3131 * parse.c (gfc_statement_next_fixed): (Change from Andy's tree)
3132 Detect bad continuation line in fixed form sources.
3133
3134 2004-05-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3135
3136 PR fortran/15205
3137 * iresolve.c (gfc_resolve_nearest): Add new function.
3138 * intrinsic.h: ... declare it here.
3139 * intrinsic.c (add_functions): ... add it as resolving function
3140 for NEAREST.
3141
3142 2004-05-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3143
3144 PR fortran/14066
3145 * match.c (gfc_match_do): Allow infinite loops with
3146 label-do-stmt. Do not enforce space after comma.
3147
3148 2004-05-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3149
3150 PR fortran/15051
3151 * parse.c (parse_interface): Allow empty INTERFACE, remove
3152 seen_body.
3153
3154 2004-05-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3155
3156 * Make-lang.in, arith.c, arith.h, array.c, bbt.c, check.c,
3157 decl.c, dependency.c, dependency.h, dump-parse-tree.c, error.c,
3158 expr.c, f95-lang.c, gfortran.h, interface.c, intrinsic.c,
3159 intrinsic.h, io.c, iresolve.c, lang-specs.h, match.c, match.h,
3160 matchexp.c, misc.c, module.c, options.c, parse.c, parse.h,
3161 primary.c, resolve.c, scanner.c, simplify.c, st.c, symbol.c,
3162 trans-array.c, trans-array.h, trans-common.c, trans-const.c,
3163 trans-const.h, trans-decl.c, trans-expr.c, trans-intrinsic.c,
3164 trans-io.c, trans-stmt.c, trans-stmt.h, trans-types.c,
3165 trans-types.h, trans.c, trans.h: Update copyright years and
3166 boilerplate.
3167 * data.c: Likewise, also removed two whitespace-only lines.
3168 * gfortranspec.c, lang.opt: Update copyright years.
3169
3170 2004-05-14 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3171
3172 PR fortran/14568
3173 * trans-decl.c (generate_local_decl): Don't warn for unused
3174 variables which are in common blocks.
3175
3176 2004-05-13 Diego Novillo <dnovillo@redhat.com>
3177
3178 * Make-lang.in, f95-lang.c, trans-array.c, trans-decl.c,
3179 trans-expr.c, trans-intrinsic.c, trans-io.c, trans-stmt.c,
3180 trans.c: Rename tree-simple.[ch] to tree-gimple.[ch].
3181
3182 2004-05-13 Victor Leikehman <lei@haifasphere.co.il>
3183
3184 PR fortran/15314
3185 * trans-expr.c (gfc_conv_structure): Use field type, not expr type.
3186
3187 2004-05-13 Joseph S. Myers <jsm@polyomino.org.uk>
3188
3189 * gfortran.texi: Use @table @emph instead of @itemize @emph.
3190 Remove "set DEVELOPMENT".
3191 (Compiling GFORTRAN): Remove.
3192
3193 2004-05-09 Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
3194
3195 * array.c (match_subscript, match_array_ref): Add comments
3196 explaining argument 'init'.
3197 * decl.c, f95-lang.c, match.c, resolve.c, trans-array.c,
3198 trans-expr.c, trans.c: Fix some typos in comments.
3199 * dump-parse-tree.c (gfc_show_expr): Remove wrong comment.
3200 * primary.c (match_digits, match_integer_constant): Add comment
3201 explaining signflag.
3202
3203 2004-05-01 Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
3204
3205 PR fortran/13940
3206 * primary.c: Include system.h and flags.h, needed for pedantic.
3207 (match_boz_constant): Allow "x" for hexadecimal constants, warn if
3208 pedantic is set.
3209
3210 2004-05-01 Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
3211
3212 PR fortran/13940
3213 * match.c (match_data_constant): Handle case where
3214 gfc_find_symbol sets sym to NULL
3215
3216 2004-04-28 Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
3217
3218 * Make-lang.in (f95-lang.o, trans-intrinsic.o): Add missing
3219 dependency on mathbuiltins.def
3220
3221 2004-04-24 Victor Leikehman <lei@il.ibm.com>
3222
3223 * trans-io.c (transfer_expr): Implemented recursive printing
3224 of derived types.
3225
3226 2004-04-24 Andrew Pinski <pinskia@physics.uc.edu>
3227
3228 * gfortranspec.c: Do not include multilib.h.
3229
3230 2004-04-24 Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
3231
3232 * trans-intrinsic.c: Fix comment, this is not trans-expr.c. Add
3233 2004 to copyright years.
3234 * trans-expr.c, trans-decl.c: Comment update, we now generate
3235 GENERIC, not SIMPLE. Add 2004 to copyright years.
3236
3237 2004-04-24 Paul Brook <paul@codesourcery.com>
3238
3239 * Make-lang.in (gfortranspec.o): Add dependency on $(TM_H).
3240
3241 2004-04-24 Feng Wang <fengwang@nudt.edu.cn>
3242
3243 PR 14817
3244 * arith.c (gfc_arith_divide): Fix complex divide.
3245
3246 2004-04-23 Andrew Pinski <pinskia@physics.uc.edu>
3247
3248 * gfortranspec.c: Include the target headers.
3249
3250 2004-04-18 Feng Wang <fengwang@nudt.edu.cn>
3251
3252 PR fortran/14921
3253 PR fortran/14540
3254 * arith.c (arctangent2): New function.
3255 * arith.h (arctangent2): Add function prototype.
3256 * simplify.c (gfc_simplify_atan2): Use it.
3257 (gfc_simplify_log): Use it.
3258
3259 2004-04-12 Diego Novillo <dnovillo@redhat.com>
3260
3261 * fortran/f95-lang.c (gfc_expand_stmt): Remove.
3262 (LANG_HOOKS_RTL_EXPAND_STMT): Remove.
3263
3264 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3265
3266 PR fortran/14872
3267 * trans-io.c (build_dt): Change REC to value.
3268
3269 2004-04-11 Feng Wang <fengwang@nudt.edu.cn>
3270
3271 PR 14394
3272 * trans-const.c (gfc_conv_mpf_to_tree): Loosen the maximum digits of
3273 the real value when converting mpf to string.
3274
3275 2004-04-11 Feng Wang <fengwang@nudt.edu.cn>
3276
3277 PR 14395
3278 * trans-intrinsic.c (gfc_conv_intrinsic_cmplx): Fix the imag part of
3279 the result.
3280
3281 2004-04-11 Feng Wang <fengwang@nudt.edu.cn>
3282
3283 PR fortran/14377
3284 * simplify.c (simplify_min_max): Convert the type of the result.
3285
3286 2004-04-11 Paul Brook <paul@codesourcery.com>
3287
3288 * gfortran.texi: Use full target triplet.
3289
3290 2004-04-11 Paul Brook <paul@codesourcery.com>
3291
3292 * Make-lang.in (GFORTRAN_TEXI): Set it.
3293 (fortran/dfortran.dvi): Use it. Add fortran to include paths.
3294 (fortran/gfortran.info): Ditto.
3295 * gfortran.texi: Major update.
3296 * invoke.texi: New file.
3297
3298 2004-04-10 Paul Brook <paul@codesourcery.com>
3299
3300 * trans-array.c (gfc_trans_allocate_temp_array,
3301 gfc_conv_tmp_array_ref): Don't use GFC_DECL_STRING.
3302 * trans-decl.c (gfc_build_dummy_array_decl,
3303 gfc_get_symbol_decl, gfc_build_function_decl,
3304 gfc_create_module_variable): Ditto.
3305 * trans-expr.c (gfc_conv_variable): Ditto.
3306 * trans-intrinsic.c (gfc_conv_intrinsic_len): Ditto.
3307 * trans.h (GFC_DECL_STRING): Remove.
3308 (GFC_DECL_PACKED_ARRAY, GFC_DECL_PARTIAL_PACKED_ARRAY,
3309 GFC_DECL_ASSIGN): Renumber flags.
3310
3311 2004-04-05 Paul Brook <paul@codesourcery.com>
3312
3313 PR 13252
3314 PR 14081
3315 * f95-lang.c (gfc_init_builtin_functions): Add stack_alloc, stack_save
3316 and stack_restore.
3317 * gfortran.h (struct gfc_charlen): Add backend_decl.
3318 * trans-array.c (gfc_trans_allocate_temp_array,
3319 gfc_conv_temp_array_ref, gfc_conv_resolve_dependencies,
3320 (gfc_conv_loop_setup, gfc_array_allocate, gfc_conv_array_init_size):
3321 Remove old, broken string handling.
3322 (gfc_trans_auto_array_allocation, gfc_trans_g77_array,
3323 gfc_trans_dummy_array_bias, gfc_conv_expr_descriptor,
3324 gfc_trans_deferred_array): Handle character arrays.
3325 * trans-const.c (gfc_conv_const_charlen): New function.
3326 * trans-const.h (gfc_conv_const_charlen): Add prototype.
3327 * trans-decl.c (gfc_finish_var_decl): Don't mark automatic variables
3328 as static.
3329 (gfc_build_dummy_array_decl): Handle arrays with unknown element size.
3330 (gfc_create_string_length): New function.
3331 (gfc_get_symbol_decl): Create lengths for character variables.
3332 (gfc_get_fake_result_decl): Ditto.
3333 (gfc_build_function_decl): Only set length for assumed length
3334 character arguments.
3335 (gfc_trans_dummy_character): New function.
3336 (gfc_trans_auto_character_variable): Rewrite.
3337 (gfc_trans_deferred_vars): Handle more types of character variable.
3338 (gfc_create_module_variable): String lengths have moved.
3339 (gfc_generate_function_code): Initialize deferred var chain earlier.
3340 * trans-expr.c (gfc_conv_init_string_length): Rename ...
3341 (gfc_trans_init_string_length): ... to this.
3342 (gfc_conv_component_ref, gfc_conv_variable, gfc_conv_concat_op,
3343 gfc_conv_function_call): Update to new format for character variables.
3344 (gfc_conv_string_length): Remove.
3345 (gfc_conv_string_parameter): Update assertion.
3346 * trans-intrinsic.c (gfc_conv_intrinsic_len): Use new location.
3347 * trans-io.c (set_string): Use new macro names.
3348 * trans-stmt.c (gfc_trans_label_assign. gfc_trans_goto): Ditto.
3349 * trans-types.c (gfc_get_character_type): Use existing length expr.
3350 (gfc_is_nodesc_array): Make public.
3351 (gfc_get_dtype_cst): Rename ...
3352 (gfc_get_dtype): ... to this. Handle unknown size arrays.
3353 (gfc_get_nodesc_array_type): Use new name.
3354 (gfc_sym_type): New character variable code.
3355 (gfc_get_derived_type): Ditto.
3356 (gfc_get_function_type): Evaluate character variable lengths.
3357 * trans-types.h (gfc_strlen_kind): Define.
3358 (gfc_is_nodesc_array): Add prototype.
3359 * trans.h: Update prototypes.
3360 (struct lang_type): Update comments.
3361 (GFC_DECL_STRING_LEN): New name for GFC_DECL_STRING_LENGTH.
3362 (GFC_KNOWN_SIZE_STRING_TYPE): Remove.
3363
3364 2004-04-04 Paul Brook <paul@codesourcery.com>
3365
3366 * gfortran.h (struct gfc_option_t): Remove flag_g77_calls.
3367 * options.c (gfc_init.options, gfc_handle_option): Ditto.
3368 * trans-expr.c (gfc_conv_function_call): Ditto.
3369 * trans-types.c (gfc_is_nodesc_array): Ditto
3370 * lang.opt (fg77-calls): Remove.
3371
3372 2004-04-04 Paul Brook <paul@codesourcery.com>
3373
3374 * trans-array.c (OFFSET_FIELD): Rename from BASE_FIELD.
3375 (gfc_conv_descriptor_base): Rename ...
3376 (gfc_conv_descriptor_offset): ... to this.
3377 (gfc_trans_allocate_array_storage): Set offset to zero.
3378 (gfc_conv_array_base): Rename ...
3379 (gfc_conv_array_offset): ... to this.
3380 (gfc_conv_array_index_ref): Add offset parameter.
3381 (gfc_conv_array_ref): Include offset.
3382 (gfc_trans_preloop_setup): Use existing offset.
3383 (gfc_trans_allocate_temp_array, gfc_array_allocate,
3384 gfc_trans_auto_array_allocation, gfc_trans_g77_array,
3385 gfc_trans_dummy_array_bias, gfc_conv_expr_descriptor,
3386 gfc_conf_ss_descriptor): Set offset.
3387 * trans-array.h: Rename prototypes.
3388 * trans-const.h (gfc_index_zero_node): Define.
3389 * trans-decl.c (gfc_build_qualified_array): Change base to offset.
3390 * trans-types.c (gfc_get_array_type_bounds): Ditto.
3391 (gfc_get_nodesc_array_type): Calculate offset before upper bound.
3392
3393 2004-03-25 Diego Novillo <dnovillo@redhat.com>
3394
3395 * convert.c (convert): Don't handle WITH_RECORD_EXPR.
3396
3397 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3398
3399 PR 14055
3400 * arith.c (gfc_convert_integer,gfc_convert_real): Removed leading '+'
3401 before conversion by gmp library call.
3402
3403 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3404
3405 PR 12921
3406 * trans-io.c (gfc_trans_open): Change RECL= to a value parameter.
3407
3408 2004-02-24 Richard Henderson <rth@redhat.com>
3409
3410 * trans-array.c (gfc_trans_dummy_array_bias): Fix typo.
3411
3412 2004-02-19 Loren J. Rittle <ljrittle@acm.org>
3413
3414 * Make-lang.in ($(srcdir)/fortran/gfortran.info): Move...
3415 (fortran/gfortran.info): ... to here.
3416 (f95.srcinfo): New.
3417
3418 2004-02-16 Richard Henderson <rth@redhat.com>
3419
3420 * Make-lang.in (f95-lang.o, trans-decl.o): Depend on cgraph.h.
3421 * f95-lang.c (LANG_HOOKS_EXPAND_DECL): Remove.
3422 (LANG_HOOKS_CALLGRAPH_EXPAND_FUNCTION): New.
3423 (gfc_expand_function): Rename from expand_function_body, make static,
3424 don't do anything except invoke tree_rest_of_compilation.
3425 (gfc_be_parse_file): Invoke cgraph.
3426 (gfc_expand_decl): Remove.
3427 (gfc_init_builtin_functions): Add __builtin_init_trampoline and
3428 __builtin_adjust_trampoline.
3429 * trans-decl.c (gfc_get_extern_function_decl): Don't set DECL_CONTEXT.
3430 (gfc_finalize): New.
3431 (gfc_generate_function_code): Use it. Lower nested functions.
3432 * trans-expr.c (gfc_conv_function_call): Add static chain operand
3433 to call_expr.
3434 * trans.c (gfc_build_function_call): Likewise.
3435 * trans.h (expand_function_body): Remove.
3436
3437 2004-02-15 Victor Leikehman <lei@il.ibm.com>
3438
3439 PR gfortran/13433
3440 * trans-decl.c (gfc_build_function_decl) For functions
3441 returning CHARACTER pass an extra length argument,
3442 following g77 calling conventions.
3443 * trans-types.c (gfc_get_function_type) Ditto.
3444 * trans-expr.c (gfc_conv_function_call) Ditto.
3445
3446 2004-02-14 Paul Brook <paul@codesourcery.com>
3447
3448 * f95-lang.c (gfc_init_builtin_functions): Build chain properly.
3449
3450 2004-02-12 Paul Brook <paul@nowt.org>
3451
3452 * BUGS: Remove.
3453
3454 2004-02-08 Steve Kargl <sgk@troutmask.apl.washington.edu>
3455
3456 * gfortran.texi: Fix typos.
3457
3458 2004-02-07 Bud Davis <bdavis9659@comcast.net>
3459
3460 PR gfortran/13909
3461 * intrinsic.c (add_conversions) Use logical conversion instead
3462 of real.
3463 * trans-types.c (gfc_get_logical_type) implemented logical*1
3464 and logical*2.
3465
3466 2004-01-17 Paul Brook <paul@codesourcery.com>
3467
3468 * lang-specs.h: Remove %<fixed-form.
3469
3470 2004-01-15 Toon Moene <toon@moene.indiv.nluug.nl>
3471
3472 * lang-specs.h: Enable preprocessing of source files
3473 ending in .F, .fpp, .FPP, .F90 and .F95.
3474
3475 2004-01-13 Toon Moene <toon@moene.indiv.nluug.nl>
3476
3477 PR fortran/12912
3478 * lang-specs.h: Enable compilation of files ending
3479 in .f, .for and .FOR.
3480
3481 2004-01-11 Paul Brook <paul@codesourcery.com>
3482
3483 * trans-stmt.c (gfc_trans_if_1): New function.
3484 (gfc_trans_if): Use it.
3485
3486 2004-01-11 Erik Schnetter <schnetter@uni-tuebingen.de>
3487
3488 * gfortran.h (GFC_MAX_SYMBOL_LEN): Increase.
3489 (gfc_option_t): Add max_identifier_length.
3490 * lang.opt: Add fmax-identifier-length.
3491 * match.c (parse_name): Use limit.
3492 * options.c (gfc_init_options): Set max_identifier_length.
3493 (gfc_handle_option): Ditto.
3494
3495 2004-01-11 Feng Wang <fengwang@nudt.edu.cn>
3496
3497 * intrinsic.c (add_functions): Add resolve function to dcmplx.
3498 * intrinsic.h (gfc_resolve_dcmplx): Add prototype.
3499 * iresolve.c (gfc_resolve_dcmplx): New function.
3500
3501 2004-01-10 Paul Brook <paul@codesourcery.com>
3502
3503 * trans-decl.c (gfc_get_symbol_decl): Don't set subroutine attr.
3504 * trans-types.c (gfc_sym_type): Handle external dummy procedures.
3505 (gfc_return_by_reference): Correct condition.
3506 (gfc_get_function_type): Ditto.
3507
3508 2004-01-10 Paul Brook <paul@codesourcery.com>
3509
3510 * trans-intrinsic.c (gfc_conv_intrinsic_minmax): Convert mismatched
3511 types.
3512
3513 2004-01-10 Huang Chun <chunhuang73@hotmail.com>
3514
3515 * iresolve.c: Use correct kind.
3516
3517 2004-01-10 Huang Chun <chunhuang73@hotmail.com>
3518
3519 PR fortran/13467
3520 * trans-decl.c (gfc_create_module_variable): Output array valued
3521 parameters.
3522
3523 2004-01-10 Paul Brook <paul@codesourcery.com>
3524
3525 * resolve.c (resolve_branch): Get error message right way round.
3526
3527 2004-01-10 Canqun Yang <canqun@nudt.edu.cn>
3528
3529 * trans-array (gfc_conv_loop_setup): Adjust comment to track
3530 reality.
3531 (gfc_array_allocate): Don't count size of element twice.
3532
3533 2004-01-04 Paul Brook <paul@codesourcery.com>
3534
3535 * lang.opt (i8, r8, std=*): Remove RejectNegative.
3536
3537 2004-01-04 Paul Brook <paul@codesourcery.com>
3538
3539 * error.c (gfc_notify_std): New function.
3540 * gfortran.h (gfc_notify_std): Declare.
3541 (GFC_STD_*): Define.
3542 (gfc_option_t): Add warn_std and allow_std.
3543 * intrinsic.c (gfc_init_expr_extensions): Fix logic.
3544 (gfc_intrinsic_func_interface): Use gfc_notify_std.
3545 * check.c (check_rest): Use gfc_notify_std.
3546 * match.c (gfc_match_pause): Ditto.
3547 (gfc_match_assign): Ditto.
3548 (gfc_match_goto): Ditto.
3549 * resolve.c (resolve_branch): Ditto.
3550 * lang.opt: Add std=<foo> and w.
3551 * options.c (gfc_init_options): Set allow_std and warn_std.
3552 (gfc_handle_option): Handle OPT_std_* and OPT_w.
3553
3554 2004-01-01 Paul Brook <paul@codesourcery.com>
3555
3556 * array.c (gfc_append_constructor): Take constructor, not expression.
3557 * data.c (struct gfc_expr_stack): Remove.
3558 (expr_stack): Remove.
3559 (find_con_by_offset): Rename from find_expr_in_con.
3560 (find_con_by_component): Rename from find_component_in_con.
3561 (gfc_get_expr_stack): Remove.
3562 (gfc_assign_data_value): Rewrite.
3563 (gfc_expr_push): Remove.
3564 (gfc_expr_pop): Remove.
3565 (gfc_advance_section): Rename from
3566 gfc_modify_index_and_calculate_offset. Handle unbounded sections.
3567 (gfc_get_section_index): Handle unbounded sections.
3568 * gfortran.h: Update prototypes.
3569 * resolve.c (check_data_variable): Array section maight not be the
3570 last ref.
3571
3572 2004-01-01 Paul Brook <paul@codesourcery.com>
3573
3574 PR fortran/13432
3575 * resolve.c (resolve_symbol): Allow assumed length function results.
3576
3577 2004-01-01 Steve Kargl <sgk@troutmask.apl.washington.edu>
3578
3579 * match.c (gfc_match_pause): Fix spelling.
3580
3581 2004-01-01 Steven Bosscher <stevenb@suse.de>
3582
3583 PR fortran/13251
3584 * trans-expr.c (gfc_conv_variable): Take the type kind of a substring
3585 reference from the expression.
3586
3587 2003-12-26 Feng Wang <fengwang@nudt.edu.cn>
3588
3589 * dump-parse-tree.c (gfc_show_code_node): Add ASSIGN and ASSIGNED GOTO
3590 dumping.
3591 * gfortran.h (gfc_statement): New ST_LABEL_ASSIGNMENT.
3592 (gfc_exec_op): New EXEC_LABEL_ASSIGN.
3593 (symbol_attribute):New variable attribute: assign.
3594 * io.c (resolve_tag):Integer variable is allowed.
3595 (match_dt_format): Add ASSIGN statement. Set assign flag.
3596 * match.c (gfc_match_if): Change ST_NONE to ST_LABEL_ASSIGNMENT.
3597 (gfc_match_assign): Add ASSIGN statement. Set assign flag.
3598 (gfc_match_goto): Add ASSIGNED GOTO statement. Set assign flag.
3599 * parse.c (decode_statement): Add ST_LABEL_ASSIGNMENT.
3600 (next_statement): Add ST_LABEL_ASSIGNMENT.
3601 (gfc_ascii_statement): Add ST_LABEL_ASSIGNMENT.
3602 * resolve.c (resolve_code): Resolve ASSIGN and ASSIGNED GOTO statement.
3603 (resolve_blocks): Resolve ASSIGNED GOTO statement label list.
3604 * st.c (gfc_free_statement): Add EXEC_LABEL_ASSIGN.
3605 * trans-decl.c (gfc_get_symbol_decl): Create the shadow variable for
3606 assign. Put them into the stuct lang_decl.
3607 * trans-io.c (set_string): Add the assign statement.
3608 * trans-stmt.c (gfc_trans_label_assign): New function.
3609 (gfc_trans_goto): Translate ASSIGNED GOTO statement.
3610 * trans-stmt.h (gfc_trans_label_assign): Added function prototype.
3611 * trans.c (gfc_trans_code): Add EXEC_LABEL_ASSIGN.
3612 * trans.h (lang_decl):Add shadow variable decl tree needed by assign.
3613 (GFC_DECL_ASSIGN_ADDR(node)): New macro to access this.
3614 (GFC_DECL_ASSIGN(node)): New macro to access flag.
3615
3616 2003-12-31 Huang Chun <chunhuang73@hotmail.com>
3617
3618 PR fortran/13434
3619 * trans-intrinsic.c (gfc_conv_intrinsic_minmaxval): Fixed bug in
3620 minval/maxval.
3621
3622 2003-12-22 Toon Moene <toon@moene.indiv.nluug.nl>
3623
3624 * options.c (gfc_init_options): Set flag_argument_noalias to 2, to indicate
3625 that arguments to subroutines/functions can't alias themselves, nor global
3626 memory.
3627
3628 2003-12-20 Steven Bosscher <stevenb@suse.de>
3629
3630 * trans-expr.c (gfc_conv_expr_op): Fold the result expression.
3631 * trans.c (gfc_add_modify_expr, gfc_add_expr_to_block): Likewise.
3632
3633 2003-12-12 Huang Chun <chunhuang73@hotmail.com>
3634
3635 * primary.c (match_substring): Fix substring bug for start point
3636 or end point is NULL.
3637 * trans-expr.c (gfc_conv_substring): Ditto
3638 * trans-types.c (gfc_sym_type): Get correct type of scalar
3639 character variables.
3640 * trans-intrinsic.c (gfc_conv_intrinsic_len): Handle character in
3641 derived type.
3642
3643 2003-12-10 Richard Henderson <rth@redhat.com>
3644
3645 * options.c (gfc_post_options): Don't ever use rtl inlining.
3646
3647 2003-12-05 Canqun Yang <canqun@nudt.edu.cn>
3648
3649 * trans-common.c: Re-implement COMMON blocks and EQUIVALENCE lists.
3650 * trans-equivalence.c: Remove.
3651 * trans-decl.c (gfc_get_symbol_decl): Update to match.
3652 (gfc_generate_function_code): Ditto.
3653 * trans-array.c (gfc_conv_array_parameter): Ditto.
3654 * Make-lang.in (F95_OBJS): Remove fortran/trans-equivalence.o
3655 (F95_ADDITIONAL_OBJS): Add stor-layout.o
3656 * trans.h (gfc_trans_equivalence): Remove.
3657 * gfortran.h (struct gfc_equiv): Add used field.
3658 (struct gfc_symbol): Remove addr_base, addr_offset, equiv_ring,
3659 equiv_offset fields.
3660
3661 2003-12-05 Richard Henderson <rth@redhat.com>
3662
3663 * trans.c (gfc_build_addr_expr): New.
3664 (gfc_build_indirect_ref, gfc_build_array_ref): New.
3665 * trans.h: Declare them.
3666 * trans-array.c, trans-expr.c, trans-intrinsic.c, trans-io.c,
3667 trans-stmt.c, trans.c (*): Use them.
3668
3669 * f95-lang.c (gfc_post_options): Remove dead prototype.
3670 * trans-array.c (gfc_trans_deferred_vars): Remove unused variable.
3671 * trans-stmt.c (gfc_evaluate_where_mask): Fix temporary_list
3672 allocation size.
3673
3674 2003-12-01 Feng Wang <fengwang@nudt.edu.cn>
3675
3676 * io.c (gfc_match_format): Check for missing format label.
3677
3678 2003-11-30 Huang Chun <chunhuang73@hotmail.com>
3679
3680 PR fortran/13155
3681 * trans-decl.c (gfc_sym_mangled_function_id): Don't mangle symbols
3682 from interfaces in modules.
3683
3684 2003-11-30 Paul Brook <paul@nowt.org>
3685
3686 * trans-array.c (gfc_trans_g77_array): Make non-static.
3687 (gfc_trans_assumed_size): Remove.
3688 (gfc_trans_dummy_array_bias): Explicitly free temporary.
3689 * trans-array.h (gfc_trans_g77_array): Add prototype.
3690 (gfc_trans_assumed_size): Remove.
3691 * trans-decls.c (gfor_fndecl_push_context): Remove.
3692 (gfor_fndecl_pop_context): Remove.
3693 (gfc_build_function)decls): Don't create them.
3694 (gfc_trans_deferred_vars): Update to match. Remove dead code.
3695 * trans-stmt.c (gfc_trans_pointer_assign_need_temp): Free temp.
3696
3697 2003-11-30 Kejia Zhao <kejia_zh@nudt.edu.cn>
3698
3699 * trans-array.c (gfc_conv_array_parameter): Simplify
3700 array argument passing for array name actual argument.
3701 * trans-expr.c (gfc_conv_function_call): Ditto
3702 * trans-types.c (gfc_is_nodesc_array):Ditto.
3703
3704 2003-11-30 Paul Brook <paul@nowt.org>
3705
3706 * f95-lang.c (gfc_post_options): Move ...
3707 * options.c (gfc_post_options): .. to here. Handle inlining options.
3708 * gfortran.h (gfc_post_options): Add prototype.
3709
3710 2003-11-28 Richard Henderson <rth@redhat.com>
3711
3712 * trans.c (gfc_create_var_np): Use create_tmp_var_raw.
3713
3714 2003-11-28 Huang Chun <chunhuang73@hotmail.com>
3715
3716 * trans.h (has_alternate_specifier): New global variable.
3717 * match.c (gfc_match_call): Handle actual arguments associated with
3718 alternate return indicators.
3719 * trans-expr.c (gfc_conv_function_call): Ditto
3720 * trans-stmt.c (gfc_trans_call): Ditto
3721 (gfc_trans_return): Handle return statement with value.
3722 * trans-decl.c (gfc_generate_function_code): Handle functions with
3723 asterisk dummy.
3724 (gfc_get_fake_result_decl): Ditto
3725 * trans-types.c (gfc_get_function_type): Ditto
3726 * resolve.c (resolve_actual_arglist): Check alternate return indicators.
3727 (resolve_formal_arglist): Check asterisk dummy.
3728
3729 2003-11-27 Paul Brook <paul@nowt.org>
3730
3731 * trans-array.c (gfc_tran_allocate_array_storage): Use new memory
3732 allocation interface.
3733 (gfc_conv_ array_parameter): Ditto.
3734 (gfc_trans_auto_array_allocation): Ditto. Also free the memory.
3735 * trans-array.c: Update prototype.
3736 * trans-decl.c (gfc_build_builtin_function_decls): Update prototypes.
3737 (gfc_trans_auto_character_variable): Use new memory alloc interface.
3738 * trans-expr.c (gfc_conv_string_tmp): Ditto.
3739 (gfc_conv_function_call): Use gfc_conv_string_tmp.
3740 * trans-stmt.c (gfc_do_allocate): Use new memory alloc interface.
3741 * trans-intrinsic.c (gfc_conv_intrinsic_trim): Ditto.
3742 * trans.h (gfc_ss_info): Remove unused pdata field.
3743 * trans.c (gfc_create_var_np): Change T to V.
3744
3745 2003-11-26 Richard Henderson <rth@redhat.com>
3746
3747 * mathbuiltins.def: Move acos, asin, cosh, log10, sinh, tanh from ...
3748 * trans-intrinsic.c (gfc_intrinsic_map): ... here. Add SCALE,
3749 FRACTION, NEAREST, SET_EXPONENT.
3750 (gfc_intrinsic_map_t): Add libm_name, complex_available, is_constant.
3751 Fix GTY marking. Remove unnecessary const's.
3752 (LIBM_FUNCTION): Rename from I_LIB.
3753 (LIBF_FUNCTION): New.
3754 (gfc_get_intrinsic_lib_fndecl): Handle libm and libgfortran naming
3755 conventions. Assume the expr signature is correct. Mark const.
3756 (gfc_conv_intrinsic_exponent): Use library functions.
3757 (gfc_conv_intrinsic_set_exponent): Remove.
3758 (gfc_conv_intrinsic_scale): Remove.
3759 (gfc_conv_intrinsic_nearest): Remove.
3760 (gfc_conv_intrinsic_fraction): Remove.
3761 (gfc_conv_intrinsic_function): Update.
3762 * trans-decl.c (gfor_fndecl_math_exponent4): New.
3763 (gfor_fndecl_math_exponent8): New.
3764 (gfc_build_intrinsic_function_decls): Set them.
3765 * trans.h: Declare them.
3766
3767 2003-11-25 Canqun Yang <canqun@nudt.edu.cn>
3768
3769 * trans-common.c (gfc_layout_global_equiv): Locate the error for
3770 underflow COMMON block.
3771 (gfc_trans_one_common): Fix bug for size of COMMON block containing
3772 EQUIVALENCE object. Also fix typo in an error message.
3773
3774 2003-11-25 Diego Novillo <dnovillo@redhat.com>
3775
3776 * Make-lang.in: Add check-gfortran to lang_checks.
3777 (check-f95): Alias for check-gfortran.
3778
3779 2003-11-25 Jason Merrill <jason@redhat.com>
3780
3781 * Make-lang.in (f95.tags): Create TAGS.sub files in each
3782 directory and TAGS files that include them for each front end.
3783
3784 2003-11-24 Paul Brook <paul@nowt.org>
3785
3786 PR fortran/13154
3787 * trans-decl.c (gfc_greate_module_variable): Skip COMMON blocks.
3788
3789 2003-11-24 Paul Brook <paul@nowt.org>
3790
3791 * expr.c (simplify_const_ref): Return SUCCESS for things we don't
3792 handle.
3793 * resolve.c (gfc_resolve_expr): Resolve contents before rank/shape.
3794
3795 2003-11-24 Paul Brook <paul@nowt.org>
3796
3797 PR fortran/13105
3798 * array.c (gfc_array_ref_shape): Handle elemental dimensions.
3799 * trans-array.c (gfc_trans_preloop_setup): Use correct dim lookup.
3800
3801 2003-11-20 Richard Henderson <rth@redhat.com>
3802
3803 * trans-array.c (gfc_trans_allocate_array_storage): Use convert.
3804 (gfc_conv_array_base): Likewise.
3805 * trans-decl.c (gfc_trans_auto_character_variable): Likewise.
3806 * trans-expr.c (gfc_conv_string_tmp): Likewise.
3807 * trans-intrinsic.c (gfc_conv_intrinsic_trim): Likewise.
3808 * trans-stmt.c (gfc_trans_character_select): Likewise.
3809
3810 2003-11-13 Paul Brook <paul@nowt.org>
3811
3812 * trans-decl.c (gfc_sym_mangled_function_id): Dont mangle externals.
3813
3814 2003-11-13 Canqun Yang <canqun@nudt.edu.cn>
3815
3816 * resolve.c (gfc_resolve): Also resolve EQUIVALENCE objects.
3817 (resolve_equivalence): New function.
3818 (resolve_equivalence_derived): New function.
3819
3820 2003-11-12 Richard Henderson <rth@redhat.com>
3821
3822 * trans.c (gfc_trans_code): Use annotate_with_locus instead of
3823 annotate_all_with_locus.
3824
3825 2003-11-11 Canqun Yang <canqun@nudt.edu.cn>
3826
3827 * options.c (gfc_init_options): Set flag_max_stack_var_size as 32768.
3828 * trans-decl.c (gfc_finish_var_decl): Modified.
3829
3830 2003-11-08 Paul Brook <paul@nowt.org>
3831
3832 PR fortran/12704
3833 * trans-intrinsic.c (gfc_conv_intrinsics_minmaxloc): Handle zero-size
3834 arrays.
3835
3836 2003-11-06 Paul Brook <paul@nowt.org>
3837
3838 * trans-intrinsic.c (gfc_conv_intrinsics_minmaxloc): Initialize pos.
3839
3840 2003-11-02 Canqun Yang <canqun@nudt.edu.cn>
3841
3842 * match.c (gfc_match_stopcode): Assign '0' to stop_code.
3843
3844 2003-10-27 Anthony Green <green@redhat.com>
3845
3846 * Make-lang.in (f95.stageprofile): Use tabs, not spaces.
3847 (f95.stagefeedback): Ditto.
3848
3849 2003-10-27 Andrew Pinski <pinskia@physics.uc.edu>
3850
3851 PR fortran/12682
3852 * Make-lang.in (f95.stageprofile): Add.
3853 (f95.stagefeedback): Add.
3854
3855 2003-10-23 Richard Henderson <rth@redhat.com>
3856
3857 * f96-lang.c (gfc_gimplify_expr): Remove.
3858 (LANG_HOOKS_GIMPLIFY_EXPR): Remove.
3859 (LANG_HOOKS_GIMPLE_BEFORE_INLINING): New.
3860
3861 2003-10-23 Richard Henderson <rth@redhat.com>
3862
3863 * f95-lang.c (gfc_gimplify_expr): Return gimplify_status.
3864
3865 2003-10-20 Paul Brook <paul@nowt.org>
3866
3867 * trans-expr.c (gfc_conv_integer_power): Use boolean_type_node.
3868 * trans-stmt.c (gfc_trans_do_while): Ditto.
3869
3870 2003-10-17 Paul Brook <paul@nowt.org>
3871
3872 * simplify.c (gfc_simplify_shape): Use gfc_array_dimen_size.
3873
3874 2003-10-17 Paul Brook <paul@nowt.org>
3875
3876 * trans-io.c (gfc_build_io_library_fndecls): Set TREE_PUBLIC.
3877
3878 2003-10-17 Feng Wang <wf_cs@yahoo.com>
3879
3880 * iresolve.c (gfc_resolve_maxloc): Change the result's kind and type.
3881 (gfc_resolve_minloc): Ditto.
3882 * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Use correct types.
3883 Return the value after subtracting the lower bound.
3884
3885 2003-10-16 Richard Henderson <rth@redhat.com>
3886
3887 * f95-lang.c (expand_function_body): Don't check flag_disable_gimple.
3888
3889 2003-10-16 Steven Bosscher <steven@gcc.gnu.org>
3890
3891 * lang.c: Remove -M option for now, it's in the way for C.
3892
3893 2003-10-14 Jason Merrill <jason@redhat.com>
3894
3895 * Make-lang.in (f95.tags): New rule.
3896
3897 2003-10-13 Richard Henderson <rth@redhat.com>
3898
3899 * trans.c (gfc_trans_code): Use annotate_all_with_locus.
3900
3901 2003-10-13 Paul Brook <paul@nowt.org>
3902
3903 * trans-decl.c (generate_local_decl): Don't create junk variables.
3904
3905 2003-10-13 Paul Brook <paul@nowt.org>
3906
3907 * resolve.c (resolve_formal_arglist): Use function result decl in
3908 preference to function decl.
3909
3910 2003-10-12 Richard Henderson <rth@redhat.com>
3911
3912 * f95-lang.c (gfc_define_builtin): New const_p argument. Set
3913 TREE_READONLY. Update all callers.
3914
3915 2003-10-12 Feng Wang <wf_cs@yahoo.com>
3916
3917 * iresolve.c (gfc_resolve_cshift): Change to match implementation.
3918 * trans-intrinsic.c (gfc_conv_intrinsic_function): Remove CSHIFT.
3919 (gfc_is_intrinsic_libcall): Add CSHIFT.
3920
3921 2003-10-12 Richard Henderson <rth@redhat.com>
3922
3923 * trans-array.c (gfc_trans_static_array_pointer): Set TREE_INVARIANT.
3924 (gfc_trans_array_constructor_value): Likewise.
3925 (gfc_conv_array_initializer): Likewise.
3926 * trans-stmt.c (gfc_trans_character_select): Likewise.
3927
3928 2003-11-12 Kejia Zhao <kejia_zh@yahoo.com.cn>
3929
3930 * trans-intrinsic.c (integer_kind_info, real_kind_info): Remove.
3931
3932 2003-10-11 Huang Chun <jiwang@mail.edu.cn>
3933
3934 * check.c (gfc_check_repeat): Check arguments are scalar.
3935 (gfc_check_trim): New function.
3936 * intrinsic.h (gfc_check_trim): Add prototype.
3937 * intrinsic.c (add_functions): Use it.
3938 * trans.h (gfor_fndecl_string_trim, gfor_fndecl_string_repeat):
3939 Decalare.
3940 * trans-decl.c: Ditto.
3941 (gfc_build_intrinsic_fucntion_decls): Set them.
3942 * trans-intrinsic.c (gfc_conv_intrinsic_len): Handle result vars.
3943 (gfc_conv_intrinsic_trim): New function.
3944 (gfc_conv_intrinsic_repeat): New function.
3945 (gfc_conv_intrinsic_function): Use them.
3946
3947 2003-10-11 Huang Chun <jiwang@mail.edu.cn>
3948
3949 * trans-types.c (gfc_sym_type): Handle result variables.
3950
3951 2003-10-11 Huang Chun <jiwang@mail.edu.cn>
3952
3953 * trans-intrinsic.c (gfc_conv_intrinsic_char): Don't use
3954 gfc_get_character_type.
3955
3956 2003-10-11 Feng Wang <wf_cs@yahoo.com>
3957
3958 * trans-expr.c (gfc_conv_variable): Check sym->ts, not the decl.
3959
3960 2003-10-11 Paul Brook <paul@nowt.org>
3961
3962 * iresolve.c (gfc_resolve_dint, gfc_resolve_dnint): New functions.
3963 (gfc_resolve_dprod): New function.
3964 (gfc_resolve_aint, gfc_resolve_anint): Only base name on arg type.
3965 * intrinsic.h (gfc_resolve_dint, gfc_resolve_dnint): Declare.
3966 (gfc_resolve_dprod): Declare.
3967 * intrinsic.c (add_functions): Use them.
3968 * trans-decl.c (gfc_get_extern_function_decl): Only pass one arg.
3969
3970 2003-10-06 Richard Henderson <rth@redhat.com>
3971
3972 * f95-lang.c (gfc_init_builtin_functions): Add clzll.
3973 * trans-intrinsic.c (call_builtin_clz): Use it.
3974
3975 2003-10-05 Paul Brook <paul@nowt.org>
3976
3977 * f95-lang.c (expand_function_body): Call (push|pop)_function_context.
3978 * trans-decl.c (gfc_generate_function_code): Set
3979 cfun->function_end_locus.
3980
3981 2003-09-24 Jason Merrill <jason@redhat.com>
3982
3983 * f95-lang.c, trans-decl.c: Use DECL_SOURCE_LOCATION instead of
3984 TREE_LOCUS.
3985
3986 2003-09-21 Lifang Zeng <zlf605@hotmail.com>
3987 Paul Brook <paul@nowt.org>
3988
3989 * Make-lang.in (F95_OBJS): Add fortran/data.o.
3990 * array.c (gfc_inser_constructor): New function.
3991 (gfc_get_constructor): New function.
3992 (gfc_free_constructor): Initialize offset and repeat.
3993 (iterator_stack): Remove.
3994 (expand_info): Add offset, component and repeat fields.
3995 (expand_constructor): Set them.
3996 (expand): Set new fields.
3997 (gfc_copy_constructor): Ditto. Avoid recursion.
3998 * gfortran.h: Add prototypes for new functions.
3999 (gfc_constructor): Add offset, component and repeat.
4000 (iteratio_stack): Move to here.
4001 * resolve.c (check_data_variable): Convert data values into variable
4002 initializers.
4003 (traverse_data_list): Build implicit loop chain.
4004 (gfc_resolve): Ditto.
4005 * trans-array.c (gfc_conv_array_intializer): Handle repeat count.
4006 * trans-decl.c (gfc_get_symbol_decl): Use gfc_conv_structure.
4007 * trans-expr.c (gfc_conv_structure): Handle array initializers.
4008 (gfc_conv_expr): Update to match.
4009 * trans.h (gfc_conv_structure): Declare.
4010 * data.c: New file.
4011
4012 2003-09-20 Kejia Zhao <kejia_zh@yahoo.com.cn>
4013
4014 * trans.h: Add declarations for gfor_fndecl_si_kind and
4015 gfor_fndecl_sr_kind.
4016 * trans-decl.c (g95_build_intrinsic_function_decls): Build them.
4017 * trans-intrinsic.c (g95_conv_intrinsic_si_kind): New function.
4018 (g95_conv_intrinsic_sr_kind): New function.
4019 (g95_conv_intrinsic_function): Add SELECTED_INT_KIND and
4020 SELECTED_REAL_KIND.
4021
4022 2003-09-17 Lars Segerlund <Lars.Segerlund@comsys.se>
4023
4024 * iresolve.c (gfc_resolve_random_number): Generate _r4 & _r8
4025 instead of _4 and _8 as postfix for libgfortran calls.
4026
4027 2003-09-16 Paul Brook <paul@nowt.org>
4028
4029 * array.c (compare_bounds): New function.
4030 (gfc_compare_array_spec): Use it.
4031
4032 2003-09-14 Paul Brook <paul@nowt.org>
4033
4034 * primary.c (gfc_match_rvalue): Make sure sym->result is set.
4035 * trans-expr.c (gfc_conv_string_parameter): Also allow PRAM_DECLs.
4036
4037 2003-09-14 Paul Brook <paul@nowt.org>
4038
4039 * check.c (dim_rank_check): Allow assumed bounds if requested.
4040 (gfc_check_lbound): Call it.
4041 (gfc_check_ubound): Ditto.
4042 (gfc_check_size): Change to match.
4043 * simplify.c (gfc_simplify_bound): New function.
4044 (gfc_simplify_lbound): New function.
4045 (gfc_simplify_ubound): New function.
4046 * intrinsic.h: Declare them.
4047 * intrinsic.c (add_functions): Use them.
4048
4049 2003-09-14 Paul Brook <paul@nowt.org>
4050
4051 * io.c (format_lex): Initialize negative_flag.
4052 (check_format): Intialize repeat.
4053 * trans-io.c (gfc_new_nml_name_expr): Declare static.
4054 (gfc_new_var_expr): Ditto.
4055
4056 2003-09-14 Paul Brook <paul@nowt.org>
4057
4058 * trans-array.c (gfc_conv_array_initializer): Handle derived types.
4059 * trans-decl.c (gfc_get_symbol_decl): Only do local scalar values.
4060
4061 2003-09-12 Paul Brook <paul@nowt.org>
4062
4063 * trans-intrinsic.c (gfc_conv_intrinsic_sign): Call fold.
4064
4065 2003-09-12 Zdenek Dvorak <rakdver@atrey.karlin.mff.cuni.cz>
4066
4067 * fortran/trans.c (gfc_finish_block): Call rationalize_compound_expr
4068 for a correct expression.
4069
4070 2003-09-10 Kejia Zhao <kejia_zh@yahoo.com.cn>
4071
4072 * trans-intrinsic.c (real_compnt_info): New struct.
4073 (prepare_arg_info): New function.
4074 (gfc_conv_intrinsic_set_exponent): New function.
4075 (gfc_conv_intrinsic_scale): New function.
4076 (gfc_conv_intrinsic_nearest): New function.
4077 (gfc_conv_intrinsic_fraction): New function.
4078 (gfc_conv_intrinsic_exponent): New function.
4079 (gfc_conv_intrinsic_spacing): New function.
4080 (gfc_conv_intrinsic_rrspacing): New function.
4081 (gfc_conv_intrinsic_function): Use them.
4082
4083 2003-08-24 XiaoQiang Zhang (zhangapache@yahoo.com>
4084
4085 * trans-const.c (gfc_conv_mpz_to_tree): Fix bug, parameter for
4086 build_int_2 changed from (high, low) to (low, high).
4087 * trans-io.c (ioparm_namelist_name, ioparm_namelist_name_len,
4088 ioparm_namelist_read_mode, iocall_set_nml_val_int,
4089 iocall_set_nml_val_float, iocall_set_nml_val_char,
4090 iocall_set_nml_val_complex, iocall_set_nml_val_log): New declaration.
4091 (gfc_build_io_library_fndecls): Add variable initialization.
4092 (gfc_new_nml_name_expr, get_new_var_expr): New function.
4093 (build_dt): Add namelist support.
4094 * io.c (value): New variable.
4095 (check_format): Support FMT_H now.
4096
4097 2003-09-07 Paul Brook <paul@nowt.org>
4098
4099 * io.c (gfc_resolve_dt): Error if format label is not defined.
4100
4101 2003-09-07 Kejia Zhao <kejia_zh@yahoo.com.cn>
4102
4103 * trans-intrinsic.c (gfc_conv_intrinsic_aint): Fix two bugs. One is
4104 about case_switch's break. The other is about building the condition
4105 statement tree, which judges the argument in the range of the
4106 corresponding integer type.
4107 * trans-intrinsic.c (gfc_conv_intrinsic_mod): MOD and MODULO can work
4108 for the large values.
4109
4110 2003-09-05 Paul Brook <paul@nowt.org>
4111
4112 * f95-lang.c (expand_function_body): Gimplify the function.
4113
4114 2003-09-04 Jeff Law <law@redhat.com>
4115
4116 * f95-lang.c (DEFINE_MATH_BUILTIN): C arrays start at
4117 index zero!
4118
4119 2003-09-04 Paul Brook <paul@nowt.org>
4120
4121 * f95-lang.c (gfc_define_builtin): Also set implicit_built_in_decls.
4122 (gfc_expand_stmt): New function.
4123 (LANG_HOOKS_RTL_EXPAND_STMT): Define.
4124 (expand_function_body): Use tree_rest_of_compilation.
4125 * trans-decl.c (gfc_generate_function_code): Don't free cfun.
4126
4127 2003-09-03 Jeff Law <law@redhat.com>
4128
4129 * f95-lang.c (gfc_init_builtin_functions): C arrays start at
4130 index zero!
4131
4132 2003-08-30 Paul Brook <paul@nowt.org>
4133
4134 * f95-lang.c (builtin_function): Remove #if 0 code.
4135 (gfc_define_builtin): New function.
4136 (gfc_init_builtin_functions): Use mathbuiltins.def not ../builtins.def.
4137 * mathbuiltins.def: New file.
4138 * trans-intrinsic.c (gfc_intrinsic_map_t): Add builtin code fields.
4139 (gfc_intrinsic_map): Use mathbuiltins.def.
4140 (gfc_intrinsic_builtin_t): Remove.
4141 (gfc_build_intrinsic_lib_fndecls): Update.
4142 * trans-types.c (gfc_init_types): Remove redundant initilaization of
4143 signed_size_type_node.
4144
4145 2003-08-29 Paul Brook <paul@nowt.org>
4146
4147 * arith.c (gfc_real_kinds): Use correct minimum exponents.
4148
4149 2003-08-22 Kejia Zhao <kejia_zh@yahoo.com.cn>
4150
4151 * trans-instinsic.c (gfc_conv_intrinsic_mod): Also do MODULO.
4152 (gfc_conv_intrinsic_function): Add MODULO.
4153
4154 2003-08-22 Jason Merrill <jason@redhat.com>
4155
4156 * trans-array.c (gfc_conv_expr_descriptor): Update use of predicates.
4157
4158 2003-08-22 Andreas Jaeger <aj@suse.de>
4159
4160 * Make-lang.in (f95.install-common): Add DESTDIR support.
4161 * (f95.install-info): Likewise.
4162 (f95.uninstall): Likewise.
4163
4164 2003-08-19 Diego Novillo <dnovillo@redhat.com>
4165
4166 * trans-types.c (gfc_init_types): Initialize
4167 signed_size_type_node with size_type_node.
4168
4169 2003-08-18 Paul Brook <paul@nowt.org>
4170
4171 * dependency.c (gfc_dependency): New enum.
4172 (check_another_array_ref): Remove.
4173 (gfc_get_array_from_component): Remove.
4174 (get_x): Remove.
4175 (get_range): Remove.
4176 (get_no_of_elements): Use mpz_t, not mpf_t.
4177 (transform_sections): New function.
4178 (gfc_check_range_range): Rename ...
4179 (gfc_check_section_vs_section): ... to this. Use new function.
4180 (gfc_is_inside_range): Rewrite to match.
4181 (gfc_check_element_vs_section): Ditto.
4182 (gfc_check_element_vs_element): Ditto.
4183 (get_deps): Ditto.
4184 (gfc_dep_resolver): Ditto. Remove unused parameter.
4185 * Dependency.h (gfc_check_range_range, gfc_check_element_vs_section,
4186 gfc_check_element_vs_element, gfc_is_inside_range,
4187 gfc_get_array_from_component): Remove prototypes for static functions.
4188 (gfc_dep_resolver): Update prototype.
4189 * trans-array.c (gfc_conv_resolve_dependencies): Change to match.
4190
4191 2003-08-15 Paul Brook <paul@nowt.org>
4192
4193 * trans-decl.c (gfc_build_qualified_array): Don't add symbols for
4194 return values to parent scope.
4195 (gfc_build_dummy_array_decl): Ditto.
4196
4197 2003-08-14 Paul Brook <paul@nowt.org>
4198
4199 * trans-stmt.c (gfc_trans_allocate): Handle NULL refs. Allocate the
4200 size of the type, not the pointer.
4201 * resolve.c (resolve_symbol): Give more accurate error message.
4202
4203 2003-08-10 Paul Brook <paul@nowt.org>
4204
4205 * trans-decl.c (gfc_build_function_decl): Only mangle global symbols.
4206
4207 2003-08-10 Paul Brook <paul@nowt.org>
4208
4209 * trans-stmt.c (gfc_trans_allocate): Correctly handle non-array derived
4210 type components.
4211
4212 2003-08-10 Chun Huang <compiler@sohu.com>
4213
4214 * resolve.c (resolve_formal_arglist): Resolve STATEMENT function.
4215 (resolve_symbol): Ditto.
4216 * trans-expr.c (gfc_conv_statement_function): New function.
4217 (gfc_conv_function_expr): Use it.
4218
4219 2003-08-10 Paul Brook <paul@nowt.org>
4220
4221 * trans-array.c (gfc_conv_ss_startstride): Handle functions.
4222 (walk_function_expr): Set section rank.
4223 * trans-intrinsic.c (gfc_walk_intrinsic_libfunc): Ditto.
4224
4225 2003-08-10 Paul Brook <paul@nowt.org>
4226
4227 * intrinsic.c (add_sym): Prefix names with correct string.
4228 (add_sym_0s): New function.
4229 (add_subroutines): Register abort.
4230
4231 2003-08-10 Erik Schnetter <schnetter@uni-tuebingen.de>
4232
4233 * gfortran.h: Introduce options to control the mangling.
4234 * lang.opt: Likewise.
4235 * options.c (gfc_init_options): Handle the options.
4236 * trans-common.c (gfc_sym_mangled_common_id): New function.
4237 (gfc_build_common_decl): Call it.
4238 * trans-decl.c (gfc_sym_mangled_function_id): New function.
4239 (gfc_get_extern_function_decl, gfc_build_function_decl): Call it.
4240
4241 2003-08-09 Paul Brook <paul@nowt.org>
4242
4243 * module.c (mio_symbol): Always ouput a namespace for formal args.
4244 (load_needed): Namespace now belong to their proper symbol.
4245 (gfc_dump_module): Change G95=>GFORTRAN.
4246
4247 2003-08-05 Paul Brook <paul@nowt.org>
4248
4249 * options.c: Force -fg77-calls.
4250
4251 2003-08-02 Paul Brook <paul@nowt.org>
4252
4253 * Makelang.in: Rename G95_* to GFORTRAN_*.
4254 * All sources: Rename G95_* to GFC_*.
4255
4256 2003-08-01 Paul Brook <paul@nowt.org>
4257
4258 * fortran/Make-lang.in: Use GMPLIBS.
4259 * fortran/config-lang.in: Set need_gmp.
4260 * trans-expr.c (gfc_conv_variable): Remove incorrect assertion.
4261
4262 2003-07-27 Andreas Jaeger <aj@suse.de>
4263
4264 * trans-decl.c (gfc_generate_constructors): Convert prototype to
4265 ISO C90.
4266 * trans-const.c (gfc_init_constants): Likewise.
4267 * trans-intrinsic.c (gfc_build_intrinsic_lib_fndecls): Likewise.
4268
4269 * gfortranspec.c: Convert to ISO C90.
4270 (lang_specific_driver): Correct copyright, remove ALT_LIBM usage.
4271
4272 2003-07-26 Paul Brook <paul@nowt.org>
4273
4274 * lang.opt: Add -fdump-parse-tree.
4275 * options.c (gfc_handle_option): Ditto.
4276 * resolve.c (resolve_forall_iterators): Convert to proper type.
4277 * trans-stmt.c (gfc_trans_forall_1): Create temp var with correct type.
4278
4279 2003-07-26 Paul Brook <paul@nowt.org>
4280
4281 * Makefile.in: Add build dependencies on files common with rest of gcc.
4282
4283 2003-07-26 Lifang Zeng <zlf605@hotmail.com>
4284
4285 * trans.h: Declare g95_trans_pointer_assignment.
4286 * trans-expr.c (g95_trans_pointer_assignment): New function.
4287 (g95_trans_pointer_assign): Use it.
4288 * trans-stmt.c (g95_trans_forall_1): Handle pointer assignment.
4289 (g95_trans_pointer_assign_need_temp): New function.
4290
4291 2003-07-26 Paul Brook <paul@nowt.org>
4292
4293 * gfortran.texi: Replace references to g95.
4294
4295 2003-07-26 Paul Brook <paul@nowt.org>
4296
4297 Rename g95_* to gfc_*.
4298
4299 2003-07-25 Paul Brook <paul@nowt.org>
4300
4301 * gfortran.h: Rename from g95.h.
4302 * trans-types.c (boolean_type_node, booelan_true_node,
4303 boolean_false_node): Remove.
4304 * trans-types.h: Ditto.
4305
4306 2003-07-25 Chun Huang <compiler@sohu.com>
4307
4308 * parse.c (accept_statement): Implement BLOCK DATA statement.
4309 * trans-expr.c (g95_conv_variable): Fix bug for dereference pointer
4310 variables.
4311
4312 2003-07-24 Lifang Zeng <zlf605@hotmail.com>
4313
4314 * trans-stmt.c (temporary_list): Define.
4315 (g95_trans_assign_need_temp): New function.
4316 (g95_trans_forall_1): Modified for WHERE.
4317 (g95_trans_where_assign): Modified.
4318 (g95_trans_where_2): Modified.
4319 (g95_evaluate_where_mask): Modified.
4320 (g95_trans_where): Modified.
4321 (g95_get_temp_expr): Removed.
4322 (g95_add_to_where_stmt_list): Removed.
4323 (compute_overall_iter_number): Modified for WHERE.
4324 * trans.h: Remove where_stmt_list.
4325
4326 2003-07-24 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4327
4328 * lang.opt: Correct description of options -J and -M.
4329
4330 2003-07-23 Steven Bosscher <steven@gcc.gnu.org>
4331
4332 * lang.opt: Move help text to here.
4333 * lang-options.h: Remove.
4334
4335 2003-07-23 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4336 * iresolve.c (g95_resolve_transpose): Proper variable in switch.
4337 * simplify.c (g95_simplify_nearest): Fix typo and use a correct test
4338 on kind.
4339
4340 2003-07-22 Steven Bosscher <steven@gcc.gnu.org>
4341 Paul Brook <paul@nowt.org>
4342
4343 * check.c (check_rest): Use global pedantic flag.
4344 * io.c (data_desc): Ditto.
4345 * error.c (g95_warning, g95_warning_now): Use global flag.
4346 * f95-lang.c (LANG_HOOKS_HANDLE_OPTION): Rename from DECODE.
4347 (expand_function_body): Update to new prototypes.
4348 (g95_init): Use new option names.
4349 * g95.h (g95_option_t): Standardize names.
4350 (g95_init_options, g95_handle_option): Update prototypes.
4351 * interface.c: Use new option names.
4352 * match.c: Ditto.
4353 * module.c: Ditto.
4354 * parse.c: Ditto.
4355 * primary.c: Ditto.
4356 * resolve.c: Ditto.
4357 * scanner.c: Ditto.
4358 * simplify.c: Ditto.
4359 * symbol.c: Ditto.
4360 * trans-array.c: Ditto.
4361 * trans-expr.c: Ditto.
4362 * trans-types.c: Ditto.
4363 * trans-decl.c: Ditto.
4364 (g95_build_library_function_decl): Remove obsolete VPARAMS.
4365 * trans.h: Ditto.
4366 * options.c (g95_display_help): Remove.
4367 (g95_init_options): Convert to new scheme.
4368 (set_Wall): Ditto
4369 (g95module_option): Ditto, rename from g95_parse_arg.
4370 (g95_handle_module_path_options): New function.
4371 * trans-equivalence.c: Fix error message.
4372 * lang.opt: Corrections.
4373
4374 2003-07-21 Steven Bosscher <steven@gcc.gnu.org>
4375
4376 * lang.opt: New file.
4377
4378 2003-07-21 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4379
4380 * decl.c (match_attr_spec): Set colon_seen.
4381
4382 2003-07-14 Paul Brook <paul@nowt.org>
4383
4384 * trans-array.c: Update comment.
4385 (g95_trans_array_constructor_subarray): Cleanup loopinfo data.
4386 * trans-intrinsic.c (g95_conv_intrinsic_anyall,count,arith,
4387 minmaxloc,minmaxval): Ditto.
4388 * trans-io.c (g95_trans_transfer): Ditto.
4389 * trans-stmt.c: Remove unneeded prototypes.
4390 (generate_loop_for_lhs_to_rhs): Rename vars. Add loop post chain.
4391 (generate_loop_for_rhs_to_temp): Rename vars. Don't share loopinfo.
4392 (compute_inner_temp_size): Remove bits of dead code. Add comments.
4393 Don't share loopinfo.
4394 (compute_overall_iter_number): Declare as static.
4395 (allocate_temp_for_forall_nest): Ditto.
4396 (g95_trans_forall_1): Don't pass shared loopinfo.
4397 * trans.c (g95_start_block): Expand comment.
4398
4399 2003-07-12 Paul Brook <paul@nowt.org>
4400
4401 * arith.c (g95_index_integer_kind): Remove unused initializer.
4402 * trans-stmt.c (generate_loop_for_temp_to_lhs): Don't multiply array
4403 index by size of element.
4404 (generate_loop_for_rhs_to_temp): Ditto.
4405 (allocate_temp_for_forall_nest): Use element size, not index size.
4406
4407 2003-07-11 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4408
4409 * arith.c (g95_index_integer_kind): Add a TODO.
4410 * simplify.c (g95_simplify_nearest): Add a TODO.
4411
4412 2003-07-09 Chun Huang <compiler@sohu.com>
4413
4414 * trans.h: Add declarations for gfor_fndecl_string_scan and
4415 gfor_fndecl_string_verify.
4416 * trans-decl.c (g95_build_intrinsic_function_decls): Build them.
4417 * trans-intrinsic.c (g95_conv_intrinsic_scan): New function.
4418 (g95_conv_intrinsic_verify): New function.
4419 (g95_conv_intrinsic_function): Add SCAN and VERIFY.
4420 * simplify.c (g95_simplify_scan, g95_simplify_verify): Fix bug in case
4421 of parameter 'BACK=.TRUE.'
4422
4423 2003-07-05 Lifang Zeng <zlf605@hotmail.com>
4424
4425 * trans-stmt.c (iter_info, forall_info): Define.
4426 (g95_trans_forall_block): Remove.
4427 (g95_trans_forall_loop): Use forall info blocks.
4428 (g95_trans_nested_forall_loop): New function.
4429 (g95_do_allocate): Handle things other than logical masks.
4430 (generate_loop_for_temp_to_lhs): New function.
4431 (generate_loop_for_rsh_to_temp): New function.
4432 (compute_inner_temp_size): New function.
4433 (compute_overall_iter_number): New function.
4434 (allocate_temp_for_forall_nest): New function.
4435 (g95_trans_forall): Move body ...
4436 (g95_trans_forall_1): ... to here. Handle loops with temporaries.
4437
4438 2003-07-02 Paul Brook <paul@nowt.org>
4439
4440 * trans-decl.c (create_index_var, g95_build_qualified_array): Put vars
4441 in correct scope. Change callers to match.
4442 * trans-types.c (g95_get_dtype_cst): Allow rank 7 arrays.
4443 * iresolve.c (g95_resolve_reshape): Only use constant shapes.
4444
4445 2003-07-02 Paul Brook <paul@nowt.org>
4446
4447 * trans-array.c (g95_conv_loop_setup): Remove dead var. Use
4448 expression shape for all expressions.
4449 * trans-decl.c (g95_symbol_init): Allow adding at very end of list.
4450
4451 2003-07-03 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4452
4453 * g95.h (g95_option_t), lang-options.h, options.c (g95_init_options,
4454 g95_parse_arg), intrinsic.c (g95_convert_type): support of
4455 -Wconversion.
4456 * intrinsic.c, g95.h: Add g95_convert_type_warn,
4457 * resolve.c (g95_resolve_index): Call it.
4458
4459 2003-07-02 Paul Brook <paul@nowt.org>
4460
4461 * iresolve.c (g95_resolve_reshape): Set expression shape.
4462 (g95_resolve_shape): Ditto.
4463 * simplify.c (g95_simplify_shape): Move common code outside condition.
4464 * trans-array.c (g95_conv_array_initializer): Teach it how to count.
4465
4466 2003-07-01 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4467
4468 * array.c (g95_array_dimen_size): Deal with EXPR_ARRAY to improve
4469 conformance checks.
4470
4471 2003-06-29 Paul Brook <paul@nowt.org>
4472
4473 * array.c (g95_simplify_iterator_var): Don't bother with return value.
4474 * expr.c (find_array_element, find_component_ref): New functions.
4475 (remove_subobject_ref): New function.
4476 (simplify_const_ref): Use them. Rename from simplify_component_ref.
4477 (simplify_ref_chain): New function.
4478 (g95_simplify_expr): Use it. Simplify parameter variable subobjects.
4479 (g95_specification_expr): Simplify the expression.
4480 * resolve.c (resolve_operator): Check simplifications return code.
4481 (g95_resolve_expr): Ditto.
4482
4483 2003-06-26 Paul Brook <paul@nowt.org>
4484
4485 * expr.c (simplify_component_ref): New function.
4486 (g95_simplify_expr): Use it.
4487 * resolve.c (resolve_structure_cons): Handle references.
4488
4489 2003-06-25 Paul Brook <paul@nowt.org>
4490
4491 * trans-io.c (build_dt): Handle internal units.
4492
4493 2003-06-25 Canqun Yang <canqun@yahoo.com.cn>
4494
4495 * trans-common.c (g95_build_common_decl): Array index range starts at 0.
4496 (g95_build_common_decl, g95_layout_global_equiv, g95_trans_one_common):
4497 Use g95_array_index_type instead of integer_type_node.
4498 (g95_build_common_decl, g95_set_common_master_type): Use
4499 g95_character1_type_node instead of char_type_node.
4500 * trans-equivalence.c (g95_layout_local_equiv): As above.
4501
4502 2003-06-24 Steven G. Kargl <kargls@attbi.com>
4503
4504 * g95.h (g95_option_t), options.c (g95_init_options, g95_parse_arg):
4505 remove last remains of -fquiet.
4506
4507 2003-06-22 Paul Brook <paul@nowt.org>
4508
4509 * resolve.c (resolve_operator): Don't fail if we can't simplify.
4510 (g95_resolve_expr): Ditto.
4511 (resolce_code): Mark as static.
4512 * trans-stmt.c (g95_trans_chaaracter_select): Mark labels because the
4513 gimplifer doesn't (yet).
4514
4515 2003-06-20 Paul Brook <paul@nowt.org>
4516
4517 * g95.h: Add ST_PAUSE and EXEC_PAUSE.
4518 * match.c (g95_match_if): Add ST_PAUSE.
4519 (g95_match_stopcode): New function.
4520 (g95_match_pause, g95_match_stop): Use it.
4521 * parse.c (g95_ascii_statement): Handle ST_PAUSE.
4522 (decode_stmt, next_statement, parse_executable): Ditto.
4523 * resolve.c (resolve_code): Ditto.
4524 * st.c (g95_free_statement): Ditto.
4525 * trans-stmt.c (g95_trans_pause): New function.
4526 * trans-stmt.h: Declare it.
4527 * trans.c (g95_trans_code): Use it.
4528 * trans-decl.c (gfor_fndecl_pause_numeric, gfor_fndecl_pause_string):
4529 Declare.
4530 (g95_build_builtin_function_decls): Initialize them.
4531 * trans.h: Ditto.
4532 * dump-parse-tree.c (g95_show_code_node): Handle EXEC_PAUSE.
4533
4534 2003-06-18 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4535
4536 * io.c (g95_match_open , g95_match_close, g95_match_inquire,
4537 match_filepos): Fix error handling.
4538
4539 2003-06-18 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4540
4541 * array.c (spec_dimen_size, ref_dimen_size, g95_array_dimen_size):
4542 Add assertions on arguments.
4543 * resolve.c (expression_shape): Remove useless &.
4544 * simplify.c (get_kind, g95_simplify_bit_size, g95_simplify_digits,
4545 g95_simplify_ibclr, g95_simplify_ibits, g95_simplify_ibset,
4546 g95_simplify_ishft,g95_simplify_ishftc, g95_simplify_maxexponent,
4547 g95_simplify_minexponent, g95_simplify_radix, g95_simplify_range
4548 g95_simplify_rrspacing, g95_simplify_scale, g95_simplify_spacing,
4549 g95_simplify_tan, g95_simplify_tiny): Clean predicates and assertions.
4550 (g95_simplify_not, g95_simplify_scale): Add assertions.
4551
4552 2003-06-15 Paul Brook <paul@nowt.org>
4553
4554 Clean up stuff to work with the ssa optimizers.
4555 * convert.c (convert): Handle BOOLEAN_TYPEs.
4556 * f95-lang.c (g95_truthvalue_conversion): Implement.
4557 * trans-array.c (g95_trans_array_constructor_value): Group multiple
4558 scalar values.
4559 * trans.h (g95_truthvalue_conversion): Declare.
4560 * trans-intrinsic.c (g95_conv_intrinsic_anyall): Use bool constants.
4561 * trans-stmt.c (g95_trans_character_select): Don't create array
4562 assignments. Mark labels as indirect jump targets.
4563 * trans-types.h (g95_init_types): Use BOOLEAN_TYPE nodes.
4564 (g95_get_dtype_cst): Handle LOGICAL types.
4565
4566 2003-06-14 Paul Brook <paul@nowt.org>
4567
4568 * f95-lang.c (g95_gimplify_expr): New function.
4569 * trans-array.c (g95_trans_array_constructor_value): Don't create
4570 array assignments.
4571 (g95_conv_expr_descriptor): Rename simple->gimple.
4572 * trans-expr.c (conv_expr_op): Use proper logical operators.
4573 * trans-intrinsic.c (build_fixbound_expr): New function.
4574 (build_fix_expr): Ditto.
4575 (g95_conv_intinsic_aint): Use them. Use builtin functions.
4576 (g95_conv_intrinsic_function): Add FLOOR and CEILING.
4577
4578 2003-06-10 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4579
4580 * array.c (g95_compare_array_spec): Remove unreachable code.
4581 * expr.c (g95_copy_expr): Likewise.
4582 * intrinsic.c (g95_convert_type): Likewise.
4583 * misc.c (g95_code2string): Likewise.
4584 * simplify.c (g95_simplify_ishft, g95_simplify_real,
4585 g95_simplify_reshape, g95_simplify_sign, g95_simplify_sqrt): Likewise.
4586 * trans-stmt.c (g95_trans_select): Likewise.
4587 * primary.c (extend_ref): Add an assertion.
4588 * simplify.c (g95_convert_constant): Add const.
4589 * intrinsic.h: Remove g95_check_x_ni.
4590 * f95-lang.c (g95_finish): Call g95_release_include_path.
4591
4592 2003-06-10 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4593
4594 * resolve.c (resolve_contained_functions): Fix typo introduced on
4595 2003-01-13.
4596
4597 2003-06-09 Paul Brook <paul@nowt.org>
4598
4599 * g95.h: Include system.h not hwint.h.
4600 * many: use safe-ctype.h not ctype.h. Change isalpha -> ISALPHA, etc.
4601 * misc.c (g95_getmem): Use xmalloc/memset instead of calloc.
4602
4603 2003-06-09 Paul Brook <paul@nowt.org>
4604
4605 * g95.h (g95_symbol): Add fields for COMMON and EQUIVALENCE variables.
4606 * Make-lang.in (F95_OBJS): Add files for COMMON and EQUIVALENCE.
4607 * trans-decl.c (g95_add_decl_to_functions): Make non-static.
4608 (g95_get_symbol_decl): Handle COMMON and EQUIVALENCE objects.
4609 (g95_generate_function_code): Translate COMMON and EQUIVALENCE
4610 objects.
4611 * trans.h (g95_trans_equivalence, g95_trans_common,
4612 g95_add_decl_to_function): Declare.
4613 * trans-common.c, trans-equivalence.c: New files.
4614
4615 2003-06-08 Steven Bosscher <steven@gcc.gnu.org>
4616
4617 * intrinsic.c (g95_intrinsic_extension): Remove.
4618 (add_functions): Substitute g95_check_x for g95_check_x_ni
4619 everywhere.
4620 (g95_init_expr_extensions): New function.
4621 (g95_intrinsic_func_interface): Use it.
4622 * intrinsic.h: Remove extern decl for g95_intrinsic_extension.
4623 * check.c (g95_check_digit, g95_check_huge, g95_check_kind,
4624 g95_check_precision, g95_check_present, g95_check_radix,
4625 g95_check_range, g95_check_selected_real_kind): Do not set
4626 g95_intrinsic_extension.
4627 (g95_check_x_ni): Remove now duplicate of g95_check_x.
4628
4629 * expr.c (check_inquiry): Add FIXME, fixup some code style.
4630
4631 2003-06-06 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4632
4633 * g95.h (ref_type): Name this type explicitly.
4634 * module.c (MIO_NAME): Add specialisations of mio_name.
4635 (mio_symbol_attribute, mio_typespec, mio_array_ref,
4636 mio_array_spec, mio_ref, mio_expr, mio_symbol): Use them.
4637 (ab_attribute): Name this type explicitly.
4638 (mio_symbol_attribute, mio_expr): Add cast to call to find_enum.
4639
4640 2003-06-05 Kejia Zhao <kejia_zh@yahoo.com.cn>
4641
4642 * trans-intrinsic.c (g95_conv_allocated): New function.
4643 (g95_conv_intrinsic_function): Make G95_ISYM_ALLOCATED work.
4644
4645 2003-06-05 Steven Bosscher <steven@gcc.gnu.org>
4646
4647 * f95-lang.c: Don't include g95-support.h
4648 (g95_mark_addressable): Add prototype.
4649 (g95_init_decl_processing): Remove C front end hack.
4650 * f95-tree.c: Remove file.
4651 * support.c: Remove file.
4652 * g95-support.h: Remove file.
4653 * trans-types.c (g95_init_types): Set up boolean
4654 type related tree nodes.
4655 * Make-lang.in: Remove rules for dead files and
4656 dependencies on them.
4657
4658 2003-06-05 Steven Bosscher <steven@gcc.gnu.org>
4659
4660 * Make-lang.in (F95_ADDITIONAL_OBJS): Remove the final
4661 C front end dependency. Also, convert.c does not depend on
4662 g95-support.h anymore.
4663 * convert.c: Don't include c-common.h and g95-support.h
4664 * f95-lang.c: Don't inlude c-common.h and c-common.def (3x).
4665 (g95_stmt_tree, g95_scope_stmt_stack, anon_aggr_type_p,
4666 stmts_are_full_exprs_p, current_stmt_tree,
4667 current_scope_stmt_stack): Remove.
4668 * g95-support.h (unsigned_conversion_warning): Kill proto.
4669 (boolean_type_node, boolean_true_node, boolean_false_node):
4670 Don't define here. Instead, make then true tree nodes in
4671 trans-types.
4672 * support.c (c_global_trees): Die, C front end, die!!!
4673 (g95_init_c_decl_hacks): Don't touch intmax_type_node,
4674 uintmax_type_node, string_type_node and const_string_type_node.
4675 (decl_constant_value, overflow_warning): Make static functions.
4676 They are in death row too, though.
4677 (default_conversion, c_expand_asm_operands): Remove.
4678 * trans-array.c, trans-expr.c, trans-intrinsic.c, trans-stmt.c,
4679 trans.c: Don't include c-common.h.
4680 * trans-types.c (boolean_type_node, boolean_true_node,
4681 boolean_false_node): Make them real tree nodes.
4682 * trans-types.h (intmax_type_node, string_type_node,
4683 const_string_type_node): Hack to work around C dependencies
4684 in builtin-types.def.
4685
4686 2003-06-04 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4687
4688 * decl.c (decl_types): Add some iterators-like sentinels.
4689 * decl.c (match_attr_spec): Use them.
4690 Use "decl_types" instead of "int".
4691 Add cast in call to g95_match_strings.
4692 * dump-parse-tree.c (g95_show_namespace): Use "g95_intrinsic_op"
4693 instead of "int".
4694 * g95.h (g95_intrinsic_op): Add some iterators-like sentinels.
4695 (g95_interface_info): Use "g95_intrinsic_op".
4696 * dump-parse-tree.c (g95_show_namespace): Use them.
4697 * interface.c (g95_check_interfaces): Use them.
4698 * module.c (read_module, write_module): Use them.
4699 * symbol.c (g95_get_namespace, g95_free_namespace): Use them.
4700 Use "g95_intrinsic_op".
4701 * interface.c (check_operator_interface): Use "g95_intrinsic_op".
4702 Add a default case in switch statement.
4703 * intrinsic.h (g95_generic_isym_id): Moved to...
4704 * g95.h (g95_generic_isym_id): here.
4705 (g95_intrinsic_sym): Use "g95_generic_isym_id".
4706 * intrinsic.c (make_generic): Use "g95_generice_isym_id".
4707 * trans-intrinsic.c (g95_intrinsic_map_t,
4708 g95_conv_intrinsic_lib_funtion): Use "g95_generice_isym_id".
4709 * match.c (g95_match_intrinsic_op): Add cast in call to
4710 g95_match_strings.
4711
4712 2003-06-03 Steven Bosscher <steven@gcc.gnu.org>
4713
4714 * support.c (skip_evaluation, warn_conversion, lvalue_p,
4715 lvalue_or_else, pedantic_lvalue_warning, warn_for_assignment,
4716 constant_fits_type_p, convert_and_check,
4717 unsigned_conversion_warning): Remove these ugly remnants
4718 we inherited from the C front end.
4719 (function_types_compatible): Remove '#if 0'-edcode.
4720 (build_modify_expr): Likewise.
4721 (convert_for_assignment): Don't use the deceased functions.
4722 The parameter fundecl is now unused.
4723 (decl_constant_value): Always just return decl. In fact
4724 this function is not used at present, but it might be in
4725 the future, when we start using the tree inliner.
4726 (overflow_warning, default_conversion, c_expand_asm_operands):
4727 Abort when these are called, they are part of the C type
4728 checking implementation and therefore poison to Fortran.
4729
4730 2003-06-04 Steven Bosscher <steven@gcc.gnu.org>
4731
4732 * Make-lang.in (F95_ADDITIONAL_OBJS): Don't depend on
4733 c-pretty-print.o and c-dump.o. Add a comment on why we
4734 depend on c-semantics.c.
4735 * f95-lang.c (LANG_HOOKS_TREE_DUMP_DUMP_TREE_FN):
4736 Don't use the C front end tree dumper hook to dump the
4737 language specific tree representation -- we don't have
4738 one. So instead, inherit the default langhook.
4739
4740 2003-06-02 Paul Brook <paul@nowt.org>
4741
4742 * trans-expr.c (g95_conv_variable): Remove incorrent assertion.
4743
4744 2003-06-02 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4745
4746 * check.c (g95_check_associated): Use proper types. Remove
4747 extraneous argument in call to g95_error().
4748
4749 2003-06-02 Kejia Zhao <kejia_zh@yahoo.com.cn>
4750
4751 * resolve.c (resolve_operator): Make logical operands convert to the
4752 type with higher kind.
4753
4754 2003-06-02 Kejia Zhao <kejia_zh@yahoo.com.cn>
4755
4756 * check.c (g95_check_associated): Make sure both pointer and target has
4757 the same type and rank. Null pointer or array section with vector
4758 subscript as target are not allowed.
4759 * trans.h: Declare gfor_fndecl_associated.
4760 * trans-decl.c: (g95_build_builtin_function_decls): Initialize
4761 gfor_fndecl_associated.
4762 * trans-intrinsic.c (g95_conv_associated): New function.
4763 (g95_conv_intrinsic_function): Make G95_ISYM_ASSOCIATED work.
4764
4765 2003-06-02 Kejia Zhao <kejia_zh@yahoo.com.cn>
4766
4767 * trans-array.c (g95_conv_expr_descriptor): Set the base of POINTER
4768 according to POINTER itself rather than TARGET.
4769 (g95_conv_expr_descriptor): Make lbound start at 1.
4770 * trans-expr.c (g95_trans_pointer_assign): Fix a bug for Nullify.
4771
4772 2003-06-01 Paul Brook <paul@nowt.org>
4773
4774 * expr.c (g95_type_convert_binary): Make it match the standard.
4775 * g95.texi: Remove dead link.
4776
4777 2003-06-01 Steven Bosscher <steven@gcc.gnu.org>
4778
4779 * g95.texi: Cleanup somewhat in preparation for inclusion
4780 in GCC CVS.
4781
4782 2003-05-23 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4783 Canqun Yang <canqun@yahoo.com.cn>
4784
4785 * resolve.c (compare_bound_int, resolve_where_shape): Proper return
4786 type.
4787 (g95_find_forall_index): Return proper value.
4788 (g95_resolve_assign_in_forall, g95_resolve_forall): Use proper type to
4789 compare the return value from g95_find_forall_index.
4790
4791 2003-05-23 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4792 * g95.h, io.c (g95_st_label): Remove "length".
4793 (g95_symtree): Remove "link".
4794 (g95_case): Remove "code".
4795 * arith.c, arith.h (g95_compare_string, g95_convert_integer,
4796 g95_convert_real): Make an argument pointer to const.
4797 * decl.c (colon_seen): Add a TODO.
4798 * interface.c (g95_compare_types): Fix typo.
4799 * interface.c (compare_interfaces): Preserve value of "p".
4800 * intrinsic.c (sort_actual): Remove "i".
4801 * match.c (g95_match_assign): Proper type in call to g95_match().
4802 * parse.c (next_free): Avoid duplicate call due to macro.
4803 * parse.c (check_statement_label): wrong type in call to g95_error.
4804 * primary.c (match_real_constant): Add a TODO.
4805 * resolve.c (resolve_select): Remove useless conditional.
4806 * simplify.c (g95_simplify_repeat): Proper assignment to
4807 "value.character.string".
4808 * simplify.c (g95_simplify_reshape): Wrong variable in call to
4809 g95_error.
4810
4811 2003-05-20 Canqun Yang <canqun@yahoo.com.cn>
4812
4813 * trans-stmt.c: Remove unnecessary include file defaults.h.
4814
4815 2003-05-19 Lifang Zeng <zlf605@hotmail.com>
4816
4817 * trans-stmt.c (g95_trans_forall_loop): Handle FORALL with negative
4818 stride.
4819 (g95_trans_forall): Allow arbitrary number of FORALL indexes and
4820 actual variables used as FORALL indexes.
4821
4822 2003-05-15 Paul Brook <paul@nowt.org>
4823
4824 * trans-array.c (g95_trans_static_array_pointer): Use
4825 null_pointer_node.
4826 (g95_trans_deferred_array): Initialize static array pointers.
4827 * trans-expr.c (g95_conv_function_call): Use formal arglist to
4828 correctly pass POINTER and absent CHARACTER arguments.
4829
4830 2003-05-14 Lifang Zeng <zlf605@hotmail.com>
4831
4832 * resolve.c (g95_resolve_forall): Resolve FORALL construct/statement.
4833 (g95_resolve_forall_body): Resolve FORALL body.
4834 (g95_resolve_where_code_in_forall): Resolve WHERE inside FORALL.
4835 (g95_resolve_assign_in_forall): Resolve assignment inside FORALL.
4836 (g95_find_forall_index): Check whether the FORALL index appears in
4837 the expression or not.
4838 (resolve_code): Modified.
4839
4840 2003-05-14 Paul Brook <paul@nowt.org>
4841
4842 * iresolve.c (g95_resolve_spread): Convert ncopies to index_type.
4843
4844 2003-05-13 Paul Brook <paul@nowt.org>
4845
4846 * trans-types.c (g95_max_array_element_size): Now a tree node.
4847 (g95_init_types): Work out max size properly.
4848 (g95_get_dtype_cst): Modify to match.
4849
4850 2003-05-11 Paul Brook <paul@nowt.org>
4851
4852 * trans-io.c (add_case): Create a label decl for case labels.
4853
4854 2003-05-11 Paul Brook <paul@nowt.org>
4855
4856 * arith.c (g95_integer_index_kind): New variable.
4857 * f95-lang.c (g95_init): Move frontend initialization here ...
4858 (g95_post_options): ... from here.
4859 * g95.h (g95_index_integer_kind, g95_resolve_index): Declare.
4860 * intrinsic.c (add_functions): Use index kinds.
4861 * iresolve.c: Convert to index_kind where needed.
4862 * resolve.c (g95_resolve_index): Make public, use index_kind.
4863 (resolve_array_ref): Adjust to match.
4864 * trans-array.c: Rename g95_array_index_kind to g95_index_integer_kind.
4865 * trans-stmt.c: Ditto.
4866 * trans-types.c: Ditto.
4867 * trans-types.h (g95_array_index_kind): Remove declaration.
4868 * trans-expr.c (g95_conv_expr_present): Use null_pointer_node.
4869
4870 2003-05-07 Paul Brook <paul@nowt.org>
4871
4872 * trans-const.c (g95_conv_mpz_to_tree): Typecast constant.
4873 * trans-intrinsic.c (g95_conv_intrinsic_bound): Convert type
4874 of bound indices.
4875
4876 2003-05-07 Paul Brook <paul@nowt.org>
4877
4878 * trans-array.c (trans_static_array_pointer,
4879 g95_trans_array_constructor_value, g95_conv_array_initializer,
4880 g95_conv_structure): CONSTRUCTOR nodes only have one operand.
4881 (g95_add_loop_ss_code): Convert subscripts to the correct type.
4882 * trans-stmt.c (g95_trans_character_select): Ditto.
4883 * trans-types.c (g95_init_types): Ditto.
4884
4885 2003-05-07 Steven Bosscher <steven@gcc.gnu.org>
4886
4887 * f95-lang.c (expand_function_body): Use input_line, not lineno.
4888 * trans-decl.c (g95_generate_function_code,
4889 g95_generate_constructors): Likewise.
4890 * trans.c (g95_trans_runtime_check, g95_add_block_to_block,
4891 g95_get_backend_locus, g95_set_backend_locus, g95_trans_code):
4892 Likewise.
4893
4894 2003-05-07 Kejia Zhao <kejia_zh@yahoo.com.cn>
4895 * trans-types.c (g95_get_derived_type): Fix bug for DERIVED type
4896 with components point to the DERIVED type itself, and two DERIVED
4897 type with components point to each other.
4898 * trans-expr.c (g95_conv_componet_ref): Modified
4899
4900 2003-05-07 Kejia Zhao <kejia_zh@yahoo.com.cn>
4901 * trans-expr.c (g95_conv_expr): Translate EXPR_NULL into
4902 null_pointer_node.
4903 (g95_trans_pointer_assign): Implement Nullify.
4904
4905 2003-05-01 Paul Brook <paul@nowt.org>
4906
4907 * trans-array.c (g95_walk_function_expr): Cope with NULL esym.
4908 * trans-decl.c (g95_get_symbol_decl): Don't mangle dummy functions.
4909
4910 2003-05-01 Paul Brook <paul@nowr.org>
4911
4912 * trans-array.c, trans.c, trans-expr.c, trans-intrinsic.c,
4913 trans-stmt.c: Replace empty_stmt_node with build_empty_stmt () and
4914 IS_EMPTY_STMT.
4915
4916 2003-05-01 Canqun Yang <canqun@yahoo.com.cn>
4917
4918 * trans-stmt.c (g95_trans_integer_select): Add a parameter to build
4919 CASE_LABEL_EXPR.
4920
4921 2003-04-28 Paul Brook <paul@nowt.org>
4922
4923 * iresolve.c (g95_resolve_transpose): COMPLEX types are twice as big
4924 as their kind suggests.
4925 (g95_resolve_reshape): Ditto.
4926
4927 2003-04-28 Chun Huang <compiler@sohu.com>
4928
4929 * trans-expr.c (g95_conv_substring_expr): New function.
4930 (g95_conv_expr): Use it.
4931
4932 2003-04-28 Paul Brook <paul@nowt.org>
4933
4934 * iresolve.c (g95_resolve_transpose): Make it match the
4935 implementation.
4936 * trans-intrinsic.c (g95_is_intrinsic_libcall): Add TRANSPOSE.
4937
4938 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
4939
4940 * trans-types.c (g95_add_field_to_struct): New function to
4941 add a field to a UNION_TYPE or RECORD_TYPE.
4942 * trans-types.h (g95_add_field_to_struct): Prototype.
4943 (g95_get_derived_type): Use g95_add_field_to_struct to add
4944 components.
4945 * trans-io.c (g95_add_field): Remove.
4946 (ADD_FIELD): Use new g95_add_field_to_struct function.
4947 (ADD_STRING): Likewise.
4948 * trans-stmt.c (g95_trans_select): Likewise.
4949 (g95_add_field): Remove duplicated function.
4950
4951 2003-04-18 Canqun Yang <canqun@yahoo.com.cn>
4952
4953 Port implementation for CHARACTER SELECT from Andy's tree.
4954 * trans-stmt.c (g95_trans_character_select): Implement character
4955 select. (g95_add_field): New function.
4956 * trans-decl.c: Declare 'gfor_gndecl_select_string'.
4957 (g95_build_builtin_function_decls): Add 'gfor_fndecl_select_string'.
4958 * g95.h (struct g95_case): Add field 'int n'.
4959 * trans.h: Declare 'gfor_fndecl_select_string'.
4960
4961 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
4962
4963 * bbt.c (duplicate_key, g95_insert_bbt_with_overlap): Remove.
4964 (g95_insert_bbd): Die on duplicates.
4965 * g95.h (g95_insert_bbt_with_overlap): Delete prototype.
4966
4967 2003-04-14 Steven Bosscher <steven@gcc.gnu.org>
4968
4969 * g95.texi: Require GMP 4.0 -- like we actually
4970 do. Explain the testsuite and what-goes-where.
4971 Don't use undefined texinfo symbol. Break very
4972 long line. Remove finished item from the list
4973 of open projects.
4974
4975 2003-04-11 Canqun Yang <canqun@yahoo.com.cn>
4976
4977 * trans-stmt.c (g95_evaluate_where_mask): Give mask temporaries
4978 LOGICAL type.
4979
4980 2003-04-10 Canqun Yang <canqun@yahoo.com.cn>
4981
4982 * trans-stmt.c (g95_trans_forall): Implement WHERE inside FORALL.
4983 (g95_trans_forall_body): New function.
4984
4985 2003-04-10 Canqun Yang <canqun@yahoo.com.cn>
4986
4987 * resolve.c (resove_where): New function.
4988 (resolve_where_shape): New function.
4989 (resolve_code): Add call to 'resolve_where'
4990 * trans-stmt.c (g95_trans_where): Modified.
4991 (g95_trans_where_2): New function.
4992 (g95_trans_where_assign): New function.
4993 (g95_evaluate_where_mask): New function.
4994 (g95_add_to_stmt_list): New function.
4995 (g95_get_temp_expr): New function.
4996 * trans.h (where_stmt_list): New structure.
4997
4998 2003-04-10 Paul Brook <paul@nowt.org>
4999
5000 * g95spec.c (DEFAULT_SWITCH_TAKES_ARG): Remove.
5001 (DEFAULT_WORD_SWITCH_TAKES_ARG): Ditto.
5002
5003 2003-04-10 Steven Bosscher <steven@gcc.gnu.org>
5004
5005 Update after mainline -> tree-ssa-branch merge.
5006 * f95-lang.c (g95_mark_addressable): Update put_var_into_stack
5007 call.
5008 (g95_init): Update for new lang_hooks definition.
5009 (g95_post_options): New langhook.
5010 (LANG_HOOK_POST_OPTIONS): Clear, then define to g95_post_options.
5011 * scanner.c (g95_new_file): Comment update.
5012
5013 2003-04-09 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
5014
5015 * g95.h, lang-options.h: Add -Wimplicit-interface.
5016 * options.c (g95_init_options, g95_parse_arg): Set it.
5017 * interface.c (check_intents): Warn about call with implicit
5018 interface.
5019 * resolve.c (resolve_unknown_f, resolve_unknown_s): Call
5020 g95_procedure_use.
5021
5022 2003-04-05 Paul Brook <paul@nowt.org>
5023
5024 * iresolve.c (g95_resolve_spread): Don't resole based on type.
5025 * trans-intrinsic.c (g95_is_intrinsic_libcall): Add G95_ISYM_SPREAD.
5026
5027 2003-03-29 Paul Brook <paul@nowt.org>
5028
5029 * iresolve.c (g95_resolve_pack): Don't bother resolving based on type.
5030 (g95_resolve_unpack): Ditto.
5031 * trans-intrinsic.c (g95_conv_intrinsic_merge): New Function.
5032 (g95_conv_intrinsic_function): Use it. Remove PACK and UNPACK.
5033 (g95_is_intrinsic_libcall): Add PACK and UNPACK.
5034
5035 2003-03-25 Paul Brook <paul@nowt.org>
5036
5037 * arith.c (g95_unary_user, g95_user): Remove dead functions.
5038 * arith.h: Ditto.
5039 * array.c (g95_free_array_ref): Ditto.
5040 * g95.h: Ditto.
5041 * symbol.c (g95_use_derived_tree): Ditto.
5042 * intrinsic.c (add_functions): Use simplification for SCALE.
5043 * primary.c (g95_match_rvalue): Test sym, not symtree.
5044
5045 2003-03-25 Paul Brook <paul@nowt.org>
5046
5047 * trans-decl.c (build_function_decl): Add parameter before it gets
5048 turned into a constant.
5049 * iresolve.c (g95_resolve_eoshift): Resolve to a useful name.
5050 * trans-intrinsic.c (g95_is_intrinsic_libcall): Add G95_ISYM_EOSHIFT.
5051 * trans-decl.c (g95_create_module_variable): Don't pushdecl constants.
5052
5053 2003-03-22 Paul Brook <paul@nowt.org>
5054
5055 * trans-array.c (g95_conv_array_initializer): Allow scalar
5056 expressions.
5057 * trans-decl.c (g95_finish_var_decl): Result variables are not
5058 module variables.
5059 * trans-intrinsic.c (g95_conv_intrinsic_transfer): New function.
5060 (g95_conv_intrinsic_function): Use it.
5061 * trans-types.h (g95_type_spec): Remove dead declaration.
5062
5063 2003-03-21 Paul Brook <paul@nowt.org>
5064
5065 * trans-decl.c (g95_build_function_decl): Mark string parameters.
5066
5067 2003-03-20 Paul Brook <paul@nowt.org>
5068
5069 * trans-decl.c (g95_build_function_decl): Put character length
5070 parameters at the end of the function declaration.
5071 * trans-expr.c (g95_conv_function_call): Ditto.
5072 * trans-types.c (g95_get_function_type): Ditto.
5073
5074 2003-03-20 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
5075
5076 * resolve.c (resolve_formal_arglist): Don't impose intent for
5077 procedure arguments of pure functions.
5078 (resolve_select): Remove redundant assignment.
5079
5080 2003-03-19 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
5081
5082 * arith.c (validate_logical), g95.h, options.c (g95_init_options):
5083 Remove option l1.
5084 * g95.h, intrinsic.c(g95_get_intrinsic_sub_symbol): Add const.
5085 * iresolve.c(g95_resolve_cpu_time, g95_resolve_random_number): Add
5086 const.
5087 * lang-options.h: Remove -finline-repack-arrays. Add -fg77-calls.
5088 Order list.
5089 * symbol.c (g95_add_type): Fix typo in comment.
5090
5091
5092 2003-03-16 Paul Brook <paul@nowt.org>
5093
5094 * dump-parse-tree.c (g95_show_code_node): Print resolved sym name.
5095 * expr.c (g95_build_call): Remove.
5096 * f95-lang.c (puchdecl_top_level): New function.
5097 * g95.h (g95_code): Store resolved symbol, not just the name.
5098 * intrinsic.c (g95_intrinsic_namespace): New global namespace.
5099 (g95_intirinsic_init_1, g95_intrinsic_done_1): Use it.
5100 (g95_get_intrinsic_sub_symbol): New function.
5101 * iresolve.c (g95_resolve_cpu_time): Use it.
5102 (g95_resolve_random_number): Ditto.
5103 * resolve.c: Set code->resolved_sym instead of code->sub_name.
5104 * trans-decl.c (g95_get_extern_function_decl): Give external decls
5105 the correct DECL_CONTEXT. Add global symbold to the global scope.
5106 * trans-stmt.c (g95_trans_code): Remove hacks now the fronted is
5107 fixed.
5108
5109 2003-03-16 Paul Brook <paul@nowt.org>
5110
5111 * g95.h (g95_option_t): Add g77_calls. Remove inline_repack_arrays.
5112 * options.c (g95_parse_arg): Ditto.
5113 * module.c (mio_symbol_attribute): Handle the always_explicit bit.
5114 * resolve.c (resolve_formal_arglist): The always_explicit sould be set
5115 for the procedure, not the parameter.
5116 * trans-array.c (g95_trans_g77_array): New function.
5117 (g95_trans_assumed_size): Use it.
5118 (g95_trans_dummy_array_bias): Ditto.
5119 (g95_conv_array_parameter): Handle g77 arrays. Move existing body ...
5120 (g95_conv_expr_descriptor): ... to here. Update callers.
5121 * trans-decl.c (g95_build_dummy_array_decl): Handle g77 arrays.
5122 (g95_get_symbol_decl): Avoid processing g77 arrays multiple times.
5123 * trans-expr.c (g95_conv_function_call): Handle g77 arrays.
5124 * trans-intrinsic.c (g95_get_symbol_for_expr): Never use g77 arrays.
5125 * trans-types.c (g95_is_nodesc_array): Handle g77 arrays.
5126 (g95_sym_type): Ditto.
5127
5128 2003-03-15 Paul Brook <paul@nowt.org>
5129
5130 * trans-array.c (g95_walk_elemental_function_args): Don't amputate the
5131 first chain.
5132 * trans-expr.c (g95_conv_function_call): Use the resolved symbol.
5133
5134 2003-03-14 Paul Brook <paul@nowt.org>
5135
5136 * trans-array.c (g95_array_is_packed): Remove.
5137 (g95_conv_array_base): Correctly handle all descriptorless cases.
5138 (g95_conv_array_stride): Use descriptorless strides.
5139 (g95_trans_dummy_array_bias): Don't always repack the array.
5140 (g95_build_dummy_array_decl): Automatic dummy arrays are only partial
5141 packed.
5142 * trans-types.c (g95_get_nodesc_array_type): Differentiate between
5143 dummy and non-dummy arrays...
5144 (g95_sym_type, g95_get_derived_type): ... like these.
5145 (g95_get_array_type_bounds): Allow discontiguous arrays.
5146
5147 2003-03-12 Paul Brook <paul@nowt.org>
5148
5149 * array.c (g95_resolve_array_spec): Fix comment.
5150 * g95.h (symbol_attributes): New flag always_explicit.
5151 * resolve.c (resolve_formal_arglist): Set it always_explicit.
5152 * iresolve.c (g95_resolve_lbound, g95_resolve_ubound): Simplify.
5153 * trans-array.c (g95_conv_descriptor_dimension): Remove dead assert.
5154 (g95_trans_array_bounds): Allow assumed shape arrays.
5155 (g95_trans_repack_array): Remove.
5156 (g95_trans_dummy_array_bias): Rewite to use descriptorless arrays.
5157 * trans-decl.c (g95_build_qualified_array): Only ignore absent
5158 bounds for assumed size arrays.
5159 (g95_build_dummy_array_decl): Use descriptorless arrays.
5160 * trans-expr.c (g95_conv_expr_present): Allow descriptorless arrays.
5161 (g95_trans_pointer_assign): Fix typo.
5162 * trans-intrinsic.c (g95_conv_intrinsic_function_args): Remove dead
5163 code.
5164 (g95_conv_intrinsic_bound): Rewrite to handle descriptorless arrays.
5165 * trans-types.c (g95_get_nodesc_array_type): Allow non-packed arrays.
5166 Also modify callers.
5167 * trans-types.h (g95_get_nodesc_array_type): Modify prototype.
5168
5169 2003-03-08 Paul Brook <paul@nowt.org>
5170
5171 * trans-array.c (g95_walk_elemental_functions): Don't reverse the SS.
5172 (g95_conv_array_ubound): Provide dummy value for assumed size arrays.
5173 * resolve.c (compare_spec_to_ref): Allow full array sections.
5174
5175 2003-03-08 Paul Brook <paul@nowt.org>
5176
5177 * expr.c (g95_simplify_expr): Also simplify array index and
5178 substring expressions.
5179 * resolve.c (compare_spec_to_ref): Check for assumed size bounds.
5180 * trans-array.c (g95_trans_array_bounds): New function.
5181 (g95_trans_auto_array_allocation): Use it.
5182 (g95_trans_assumed_size): Rewrite.
5183 * trans-decl.c (gfor_fndecl_in_pack, gfor_fndecl_in_unpack): Declare.
5184 (gfor_fndecl_repack): Remove.
5185 (g95_build_qualified_array): Handle absent upper bounds.
5186 (g95_build_dummy_array_decl): Assumed shape arrays are descriptorless.
5187 (g95_get_symbol_decl): Update.
5188 (g95_build_intrinsic_function_decls): Initialize new decls.
5189 * trans.h (gfor_fndecl_in_pack, gfor_fndecl_in_unpack): Declare.
5190 (gfor_fndecl_repack): Remove.
5191 * trans-io.c (g95_build_io_library_fndecls): Correct prototypes.
5192 * trans-types.c: (g95_build_array_type): Merge duplicated code..
5193 (g95_get_nodesc_array_type): Handle absent bounds.
5194 * trans-types.h (g95_get_nodesc_array_type): Declare.
5195
5196 2003-03-04 Paul Brook <paul@nowt.org>
5197
5198 * f95-lang.c (DEF_FUNCTION_TYPE_VAR_3): Define before including
5199 builtin-types.def.
5200
5201 2003-03-02 Paul Brook <paul@nowt.org>
5202
5203 * options.c (g95_init_options): Drfault to 1.
5204 (g95_pasrse_arg): Add -frepack-arrays, use strcmp.
5205 * trans-array.c (g95_conv_array_data, g95_conv_array_base,
5206 g95_conv_array_stride,g95_conv_array_lbound, g95_conv_array_ubound):
5207 Handle non-constant size automatic arrays.
5208 (g95_conv_section_upper_bound, g95_conv_section_startstride): Use
5209 generic bound functions.
5210 (g95_trans_auto_array_allocation): Don't create a descriptor.
5211 (g95_trans_assumed_size): New function (broken).
5212 (g95_trans_dummy_array_bias): Remove unused var.
5213 * trans-array.h (g95_trans_assumed_size): Declare.
5214 * trans-decl.c (create_index_var): New fuction.
5215 (g95_build_qualified_array): New function.
5216 (g95_get_symbol_decl): Use it.
5217 (g95_trans_deferred_vars): Handle assumed shape seperately.
5218 * trans-types.c (get_element_type): Handle heap allocated arrays.
5219 (g95_is_nodesc_array): Include non-const size arrays.
5220 (g95_get_nodesc_array_type): Ditto.
5221
5222 2003-02-23 Paul Brook <paul@nowt.org>
5223
5224 * trans-array.c (g95_array_init_size): Should use stride, not size of
5225 last dimension.
5226
5227 2003-02-18 Paul Brook <paul@nowt.org>
5228
5229 * trans-expr.c (g95_trans_arrayfunc_assign): Nove elemental check
5230 after intrinsic function check.
5231
5232 2003-02-18 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
5233
5234 * io.c (match_io): Fix missing return value and remove useless
5235 assignment.
5236 * match.c (g95_match): Remove useless assignment.
5237 * module.c (parse_string): Remove useless post increment.
5238 * simplify.c (g95_simplify_verify): Remove useless assignment.
5239
5240 2003-02-15 Paul Brook <paul@nowt.org>
5241
5242 * expr.c (restricted_intrinsic): Handle bad values gracefully.
5243 * g95.h (symbol_attribute): Add referenced member.
5244 (g95_symbol): Add dummy_order member.
5245 (g95_set_sym_referenced): Declare.
5246 * match.c (g95_match_assignment, g95_match_call): Use it
5247 * primary.c (match_actual_arg, g95_match_rvalue,
5248 g95_match_variable): Ditto.
5249 * symbol.c (next_dummy_order): New variable.
5250 (g95_set_sym_referenced): New function.
5251 (check_done): New function.
5252 (g95_add_*): Use it.
5253 * trans-decl.c: Make formatting conform to GCC standards.
5254 (g95_defer_symbol_init): Add dummy variables in the right order.
5255 (g95_get_symbol_decl): Only accept referenced variables.
5256 (g95_create_module_variable): Module variables are always required.
5257 (generatr_local_decls): New function.
5258 (generate_local_vars): New function.
5259 (g95_generate_function_code): Use it.
5260
5261 2003-02-13 Paul Brook <paul@nowt.org>
5262
5263 * trans-decl.c (g95_conv_struct_cons): Remove.
5264 (g95_get_symbol_decl): Use g95_conv_expr for structure initializers.
5265 * trans-expr.c (g95_conv_structure): New function.
5266 (g95_conv_expr): Use it.
5267
5268 2003-02-09 Paul Brook <paul@nowt.org>
5269
5270 * trans-array.c (g95_array_init_size): Don't evaluate the linit
5271 expressions multiple times.
5272 (g95_trans_auto_arry_allocation): Use pointer not tmp.
5273
5274 2003-02-08 Paul Brook <paul@nowt.org>
5275
5276 * module.c (mio_symtree_ref): Declare as static.
5277 (mio_expr): Remove dead code.
5278 (read_module): Set the symtree link for fixups.
5279 * trans-intrinsic.c (g95_conv_intrinsic_round): Rename...
5280 (build_round_expr): ... to this.
5281 (g95_conv_intrinsic_aint): New function.
5282 (g95_conv_intrinsic_function): Use it.
5283
5284 2003-02-08 Paul Brook <paul@nowt.org>
5285
5286 * trans-array.c (g95_trans_array_constructor_value): Use the acutal
5287 offset after modificaton, not the increment expression.
5288 * dependency.c: Kill excess whitespace.
5289
5290 2003-02-07 Sanjiv Gupta <sanjivg@noida.hcltech.com>
5291
5292 * dependency.h: Remove some function declarations.
5293 * dependency.c (get_no_of_elements): Change this function not to
5294 return int.
5295 * other: Add comments for all modified functions.
5296
5297 2003-02-06 Paul Brook <paul@nowt.org>
5298
5299 * g95spec.c (lang_specific_functions): Fix initializer warning.
5300 * dump-parse-tree.c (g95_show_expr): Use typespec instead of symtree
5301 for structure type names.
5302 * trans-decl.c (g95_cons_structure_cons): New function.
5303 (g95_get_symbol_decl): Use it.
5304 * trans-expr.c (g95_conv_component_ref): Remove duplicate pointer
5305 referencing code.
5306
5307 2003-02-06 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
5308
5309 * resolve.c (compare_cases): Add const to casts.
5310
5311 2003-01-30 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
5312
5313 * g95.h (g95_check_f): Change a1 to f1m.
5314 * intrinsic.c (add_sym_1m, check_specific,
5315 g95_intrinsic_func_interface): Use it.
5316
5317 * module.c (init_pi_tree): Remove useless cast.
5318 (fp2): Fix argument type.
5319
5320 * parse.c (parse_select_block): Add comment.
5321
5322 2003-02-05 Toon Moene <toon@moene.indiv.nluug.nl>
5323
5324 * lang-options.h: Fix warning involving C90 concatenated
5325 strings.
5326
5327 2003-02-06 Steven Bosscher <s.bosscher@student.tudelft.nl>
5328 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
5329
5330 * io.c (format_asterisk): Complete initializer to kill warning.
5331 * arith.c (DEF_G95_INTEGER_KIND, DEF_G95_LOGICAL_KIND,
5332 DEF_G95_REAL_KIND, MPZ_NULL, MPF_NULL): New #defines.
5333 (g95_integer_kinds, g95_logical_kinds, g95_real_kinds): Use the
5334 new defines to complete initializers. Kills all warnings.
5335
5336 * Make-lang.in: Comment cleanup.
5337
5338 2003-02-05 Paul Brook <paul@nowt.org>
5339
5340 * array.c (g95_free_constructor): Handle NULL expressions.
5341 * resolve.c (resolve_structure_cons): Ditto.
5342 * decl.c (g95_match_null): New Function.
5343 (variable_decl): Use it.
5344 * module.c (mio_expr): Don't bother saving symtree for EXPR_STRUCTURE.
5345 * primary.c (g95_match_runtime): Don't use symtree for EXPR_STRUCTURE.
5346 * trans-types.c (g95_set_decl_attributes): Remove empty function.
5347
5348 2003-02-05 Paul Brook <paul@nowt.org>
5349
5350 * trans.h (build1_v): New macro.
5351 (build_v): Remove pointless and incorrect prototype.
5352 * various: Use build1_v for GOTO_EXPR and LABEL_EXPRs.
5353 * f95-lang.c (g95_init_builtin_decls): DEF_BUILTIN takes 10 args.
5354
5355 2003-02-01 Steven Bosscher <s.bosscher@student.tudelft.nl>
5356
5357 * Make-lang.in (F95_OBJS): Remove one more dead file.
5358
5359 2003-02-01 Paul Brook <paul@nowt.org>
5360
5361 * lang-specs.h: Don't pass -ffixed-form to the linker.
5362 * trans-decl.c (g95_generate_function_code): Clear saved decl chain.
5363
5364 2003-02-01 Paul Brook <paul@nowt.org>
5365
5366 * Make-lang.in (F95_OBJS): Remove dead files.
5367 * trans-array.c (g95_array_init_size): Do the right thing when
5368 ubound=NULL.
5369 * trans-decl.c (g95_generate_function_code): Initialize deffered
5370 symbol list before translating contained subroutines.
5371 * trans-expr.c (g95_conv_expr, g95_conv_expr_reference): Substitute
5372 scalar invariant values here...
5373 (g95_conv_variable, g95_conv_function_call): ... instead of here ...
5374 * trans-intrinsic.c (g95_conv_intrinsic_function_args): .. and here.
5375
5376 2003-01-29 Paul Brook <paul@nowt.org>
5377
5378 * trans-array.c (g95_add_loop_code): Put pre code in the right block.
5379 (g95_walk_elemental_function_args): Reverse chains before adding.
5380 (g95_reverse_ss): Move about a bit.
5381 * trans-expr.c (g95_conv_function_call): Handle scalar intrinsic
5382 function arguments.
5383
5384 2003-01-28 Paul Brook <paul@nowt.org>
5385
5386 * intrinsic.c (resolve_intrinsic): Use correct union member.
5387 * trans-array.c (g95_trans_dummy_array_bias): Don't touch absent
5388 parameters.
5389 * trans-decl.c (g95_get_symbol_decl): Don't translate initializers for
5390 use associated variables.
5391 * trans-intrinsic.c (g95_conv_intrinsic_present): Move body ...
5392 * trans-expr.c (g95_conv_expr_present): ... to here.
5393 * trans.h: Declare it.
5394 * trans-types.c (g95_sym_type): Assume subroutine if not specified.
5395
5396 2003-01-28 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
5397
5398 * array.c (expand_iterator): Suppress useless assignment.
5399 * decl.c (match_char_spec): Ditto.
5400 * io.c (match_io_iterator): Ditto.
5401 * primary.c (match_real_constant): Ditto.
5402 * interface.c (fold_unary, g95_free_interface, g95_extend_expr):
5403 Ditto. Also, use g95_intrinsic_op not int for intrinsic operators.
5404 * matchexp.c (match_add_operand, match_level_5): Likewise.
5405 * module.c (parse_atom, find_enum): Likewise.
5406 * resolve.c: move #include <string.h>
5407 (resolve_select): Fix serious typo.
5408
5409 2003-01-28 Steven Bosscher <s.bosscher@student.tudelft.n>
5410
5411 * Make-lang.in: Don't build with broken tree-ssa-pre.
5412
5413 2003-01-28 Steven Bosscher <s.bosscher@student.tudelft.nl>
5414
5415 * resolve.c (resolve_index): Add a TODO.
5416 * symbol.c: Remove useless "#include <ctype.h>".
5417
5418 2003-01-27 Paul Brook <paul@nowt.org>
5419
5420 * check.c (check_rest): Allow different type kinds as an extension.
5421 * g95.h (g95_resolve_f): Add f1m.
5422 * intrinsic.c (add_sym_1m, resolve_intrinsic): Use it.
5423 * intrinsic.h: Chenge prototypes for MIN and MAX.
5424 * iresolve.c (g95_resolve_minmax): New function.
5425 (g95_resolve_min, g95_resolve_max): Use it.
5426 * trans-intrinsic.c (g95_trans_intrinsic_minmax): Only evaluate
5427 arguments once.
5428 (g95_conv_intrinsic_present): Fix logic.
5429
5430 2003-01-27 Steven Bossche <s.bosscher@student.tudelft.nl>
5431
5432 * g95.h (g95_case): Don't be a tree, be a double linked list.
5433 * match.c (match_case_selector): Remove redundant semantics check.
5434 Clean up a few goto's to make it a tiny little bit faster.
5435 * resolve.c (case_tree): Die.
5436 (compare_cases): Accept and compare unbounded cases too.
5437 (check_case_overlap): Don't build a tree. Instead, merge-sort the
5438 whole list of g95_cases passed from resolve_select.
5439 (sane_logical_select): Die.
5440 (check_case_expr): Return FAILURE if a CASE label is of the wrong
5441 type kind.
5442 (resolve_select): Fixup case expression for computed GOTOs, put it
5443 in expr, not expr2, for easier handing in the parse tree dumper and
5444 the code generator. Rewrite the rest of the function: Kill
5445 unreachable case labels and unreachable case blocks.
5446 * dump-parse-tree.c (g95_show_code_node): Always dump expr for
5447 an EXEC_SELECT, not case2 anymore.
5448 * trans-const.c (g95_conv_constant_to_tree): New function.
5449 (g95_conv_constant): Use it.
5450 * trans-const.h: Declare prototype for the new function.
5451 * trans-stmt.c (g95_trans_integer_select, g95_trans_logical_select,
5452 g95_trans_character_select): New static functions.
5453 (g95_trans_select): Rewrite.
5454
5455 2003-01-26 Paul Brook <paul@nowt.org>
5456
5457 * intrinsic.c (add_fnctions): Properly add dreal.
5458 * trans-intrinsic.c (g95_conv_intrinsic_present): New function.
5459 (g95_conv_intrinsic_function): Use it.
5460 * trans-io.c (build_dt): Abort on internal files (unimplemented).
5461
5462 2003-01-26 Paul Brook <paul@nowt.org>
5463
5464 Widespread changes to the handling of symbols in expressions. These
5465 are now linked via g95_symtree nodes.
5466 * parse.c (g95_fixup_sibling symbols): New function.
5467 (parse_contained): Use it.
5468 * g95.h (symbol_attribute): Add contained. Indicates a symbol is a
5469 contained procedure that has bee correctly fixed up.
5470 (g95_code, g95_expr): Point to a g95_symtree, not a g95_symbol.
5471
5472 2003-01-24 Paul Brook <paul@nowt.org>
5473
5474 * trans-array.c (g95_walk_expr): Function result attributes are in
5475 sym->result.
5476 * trans-expr.c (g95_conv_function_call,
5477 g95_trans_arrayfunc_assign): Ditto.
5478 * trans-decl.c (g95_get_symbol_for_expr): Set sym->result.
5479
5480 2003-01-23 Steven Bosscher <s.bosscher@student.tudelft.nl>
5481
5482 * expr.c (check_restricted): Fix error message.
5483 * symbol.c (free_st_labels): Plug memleak.
5484
5485 2003-01-22 Steven Bosscher <s.bosscher@student.tudelft.nl>
5486
5487 * arith.c (reduce_unary, reduce_binary_ac, reduce_binary_ca,
5488 reduce_binary_aa, reduce_binary, eval_intrinsic,
5489 eval_intrinsic_f2): Use typesafe prototypes for eval functions.
5490 * g95.h (g95_check_f, g95_simplify_f, g95_resolve_f): New unions
5491 for typesafe intrinsics helper functions.
5492 (g95_intrinsic_sym): Use them.
5493 * intrinsic.c (do_check, add_sym, add_sym_0, add_sym_1,
5494 add_sym_1s, add_sym_1m, add_sym_2, add_sym_3, add_sym_4,
5495 add_sym_5, add_conv, resolve_intrinsic, do_simplify,
5496 check_specific, g95_intrinsic_func_interface,
5497 g95_intrinsic_sub_interface): Adjust all calls to intrinsics
5498 helper functions.
5499 * trans-decl.c (g95_get_extern_function_decl): Likewise.
5500 * Make-lang.in: Don't disable warnings for strict prototypes
5501 any longer, everything is typesafe now.
5502
5503 2003-01-22 Steven Bosscher <s.bosscher@student.tudelft.nl>
5504
5505 * bbt.c (duplicate_node): Make static.
5506 * module.c (module_name): Make static.
5507 * scanner.c (include_dirs): Make static.
5508
5509 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
5510
5511 Hard coded _gfor_'s should not show up anymore.
5512 * g95.h (PREFIX): New macro.
5513 * iresolve.c (g95_resolve_cpu_time): Use PREFIX, not
5514 hard-coded "_gfor".
5515 (g95_resolve_random_number): Likewise.
5516 * trans-decl.c (g95_build_intrinsic_function_decls): Likewise.
5517 * trans-io.c: Remove 'prefix' macro. Replace all uses with
5518 the new PREFIX macro from g95.h.
5519
5520 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
5521
5522 The troubles of forking... Andy implemented this just now too.
5523 Let's stick to that and keep the trees close.
5524 * g95.h (g95_st_label): 'format' member is now a g95_expr.
5525 * io.c: Revert previous changes.
5526 (g95_match_format): Match the format string as a character
5527 literal expression.
5528 * match.h (g95_statement_label): Declare external.
5529 * parse.c: Revert previous changes.
5530 * symbol.c (g95_free_st_label): Free a g95_expr instead
5531 if a 'char *'.
5532 * trans-io.c: Revert previous changes.
5533 (build_dt): Use set_string to set the format string.
5534
5535 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
5536
5537 * io.c (format_string): Make non-static.
5538 (g95_match_format): Remember the format string.
5539 (terminate_io): Add I/O termination for empty I/O lists.
5540 * match.h: Declare external format_string.
5541 * parse.c (check_statement_label): Attack the format string
5542 to a format label for FORMAT statements.
5543 * trans-io.c (g95_add_field): Define prefix macro. Replace
5544 all uses of PREFIX define with a use of this macro.
5545 (build_dt): Implement formatted I/O for format labels.
5546
5547 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
5548
5549 * lang-options.h: Kill "-std=F".
5550 * options.c: Remove unimplemented "-std=F". Modify
5551 web address.
5552 * misc.c (g95_terminal_width): New function.
5553 * error.c (g95_error_init_1): Use g95_terminal_width.
5554 * g95.h: Add prototype for g95_terminal_width, remove
5555 fmode flag.
5556
5557 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
5558
5559 * Make-lang.in: Fix typo.
5560
5561 2003-01-18 Steven Bosscher <s.bosscher@student.tudelft.nl>
5562
5563 * g95.h (struct g95_case): Remove unused cruft, new member
5564 'where' to keep track of the locus of the default case.
5565 * match.c (g95_match_case): Add locus to the current case.
5566 (match_case_selector): Likewise.
5567 * parse.c (parse_select_block): Move semantics check for
5568 multiple DEFAULT cases out of here to...
5569 * resolve.c (check_case_overlap): ...here. Return sooner
5570 when possible.
5571 (check_case_expr): Take two g95_cases now, use to sure the
5572 expression kinds are the same.
5573 (resolve_select): Cleanup.
5574
5575 2003-01-18 Paul Brook <paul@nowt.org>
5576
5577 * trans-io.c: Fix typos in ported IO work (set_fla[tg]).
5578 * trans-decl.c (g95_set_symbol_decl): Handle non-array result
5579 variables.
5580 (g95_get_extern_function_decl): Put decls in the correct context.
5581
5582 2003-01-18 Steven Bosscher <s.bosscher@student.tudelft.nl>
5583
5584 * trans-io.c: Port changes from Andy to set ERR flag.
5585
5586 2003-01-17 Paul Brook <paul@nowt.org>
5587
5588 * trans-array.c: Add various comments.
5589 (g95_ss_terminator): Declare as const.
5590 (g95_walk_expr): Remove first parameter and update all callers.
5591 (g95_walk_op_expr): Initialize scalar SS properly.
5592 * trans-array.h (g95_walk_expr): Update prototype.
5593 * trans-expr.c: Update for new g95_walk_expr.
5594 * trans-intrinsic.c: Ditto.
5595 * trans-io.c: Ditto.
5596 * trans.h: Various comments for SS chains.
5597
5598 2003-01-17 Paul Brook <paul@nowt.org>
5599
5600 * intrinsic.h (g95_generic_isym_id): Add G95_ISYM_S?_KIND, SPACING
5601 and RRSPACING.
5602 * intrinsic.c (add_functions): Use them.
5603 * trans-intrinsic.c (g95_conv_intrinsic_function): Ditto.
5604 * trans-expr.c (g95_conv_expr_lhs): Abort on impossible error.
5605
5606 2003-01-17 Steven Bosscher <s.bosscher@student.tudelft.nl>
5607
5608 Fallout of a small merge conflict:
5609 * intrinsic.c: Un-revert lost patch (G95_ISYM_SCALE).
5610
5611 2003-01-17 Steven Bosscher <s.bosscher@student.tudelft.nl>
5612
5613 * initrinsic.c: New add_sym_* functions for strong typing.
5614 (add_conv): Make prototype strict.
5615 * dump-parse-tree.c, dependency.c: Include config.h
5616 * resolve.c, trans-io.c: Fix typos.
5617
5618 2003-01-17 Steven Bosscher <s.bosscher@student.tudelft.nl>
5619
5620 * dump-parse-tree.c (g95_show_code_node): Show the
5621 condition for a computed GOTO that was transformed
5622 to a SELECT CASE construct.
5623 * resolve.c (check_case_overlap): Revert previous switch
5624 to treaps, it was too slow and didn't catch all trouble.
5625 (resolve_symbol): Be more flexible about module procedures.
5626 * symbol.c (check_conflict): Point to relevant section in
5627 the standard for dubious conflict. Allow procedure
5628 dummy arguments to be optional again.
5629 * trans-io (add_field): Rename to g95_add_field. Change
5630 all callers.
5631 * trans-stmt (trans_select): Handle unbounded cases for
5632 integer SELECT CASE constructs. Fix/add more comment.
5633
5634 2003-01-17 Steven Bosscher <s.bosscher@student.tudelft.nl>
5635
5636 * g95.h: Uses GCC's function attribute macros.
5637 * error.c, module.c, parse.c, g95.h: More function attributes.
5638
5639 2003-01-16 Steven Bosscher <s.bosscher@student.tudelft.nl>
5640 Forgot a file...
5641 * trans-decl.c (get_label_decl): Use TREE_LINENO instead
5642 of DECL_SOURCE_LINE, and TREE_FILENAME instead of
5643 DECL_SOURCE_FILE.
5644
5645 2003-01-16 Steven Bosscher <s.bosscher@student.tudelft.nl>
5646
5647 * f95-lang.c (pushdecl): Use TREE_LINENO instead of
5648 DECL_SOURCE_LINE.
5649 * trans.c (g95_trans_code): Use annotate_all_with_file_line
5650 instead of nowdead wrap_all_with_wfl.
5651
5652 2003-01-14 Steven Bosscher <s.bosscher@student.tudelft.nl>
5653
5654 * parse.c (g95_parse_file): In verbose mode, dump the parse tree
5655 before generating code, so we can still see it even if the code
5656 generation phase dies.
5657
5658 2003-01-14 Steven Bosscher <s.bosscher@student.tudelft.nl>
5659
5660 * decl.c (build_sym): Split out initialization expression parts...
5661 (add_init_expr_to_sym): ...to here.
5662 (variable_decl): Add the symbol following an attribute list to the
5663 symbol tree before parsing the optional initialization expression
5664 if the symbol is not of a derived type.
5665 * primary.c (g95_match_rvalue): Don't assume a symbol always has
5666 a value if it is a PARAMETER.
5667
5668 2003-01-14 Steven Bosscher <s.bosscher@student.tudelft.nl>
5669
5670 * misc.c: Don't #include <mcheck.h>
5671 * module.c: Ditto. Kill uses of mtrace, muntrace. If there
5672 ever was a glibc bug, then either this was never reported to
5673 glibc people, or it has been fixed for so long that there's
5674 no information you can find about it, anywhere.
5675
5676 2003-01-14 Steven Bosscher <s.bosscher@student.tudelft.nl>
5677
5678 Fix warnings:
5679 * module.c (attr_bits, bt_types, array_spec_types):
5680 Switch 'const' and 'static'.
5681 * iresolve.c (g95_resolve_reshape): Make __resolve0 non-'const'.
5682
5683 GNU'ify source code:
5684 * trans-io.c: Numerous fixes, one fixed warning and a few
5685 TODO markers so that we don't forget about them.
5686
5687 2003-01-13 Paul Brook <paul@nowt.org>
5688
5689 * intrinsic.c (add_functions): Add G95_ISYM_SCALE.
5690 * intrinsic.h (g95_generic_isym_id): Remove bogus G95_ISYM_ANINIT.
5691 Add G95_ISYM_SCALE.
5692 * trans-intrinsic.c (g95_conv_intrinsic_function): Ditto
5693 * match.c (g95_match_stop): Fix dumb == -> != error.
5694
5695 2003-01-13 Steven Bosscher <s.bosscher@student.tudelft.nl>
5696
5697 * dump-parse-tree.c (show_indent): Add line breaks. This
5698 whole dumping process needs cleanups.
5699 * f95-lang.c (g95_mark_addressable): Fix prototype to match
5700 the langhook. Fix 'return's accordingly.
5701 * g95-support.h: Adjust prototype.
5702 * g95.h: Add 'no_backend' member to 'g95_option_t' struct.
5703 * lang-options.h: Add '-fsyntax-only'.
5704 * options.c (g95_init_options): Init 'no_backend'.
5705 (g95_parse_arg): Deal with '-fsyntax-only'.
5706 * parse.c (g95_parse_file): Do not generate code if 'no_backend'
5707 is set.
5708
5709 2003-01-13 Steven Bosscher <s.bosscher@student.tudelft.nl>
5710 Patch from Arnaud
5711 * resolve.c (resolve_symbol): Assumed shape arrays must be dummy
5712 arguments. Also make sure that if a symbol is marked INTRINSIC,
5713 an intrinsic with the symbol's name actually exists.
5714 (check_conflict): Make EXTERNAL and DIMENSION attributes conflict.
5715 Do not allow PROCEDURES to have the SAVE, POINTER, TARGET,
5716 ALLOCATABLE, RESULT, IN_NAMESPACE, OPTIONAL or FUNCTION attribute.
5717
5718 2003-01-13 Steven Bosscher <s.bosscher@student.tudelft.nl>
5719
5720 * resolve.c (resolve_contained_functions): Fix condition, don't
5721 throw internal_error if a child namespace has no name. Apparently
5722 this can be the case?
5723
5724 2003-01-11 Paul Brook <paul@nowt.org>
5725
5726 Port changes from Andy's tree:
5727 * g95.h (g95_code): Add stop_code.
5728 * match.c (g95_match_stop): Detter syntax checking.
5729 * resolve.c (resolve_generic_f0): Return match type.
5730 (resolve_generic_f): Remove dead/duplicated code.
5731 (resolve_specific_f): Ditto.
5732 * dump-parse-tree.c (g95_show_code_node): Handle new STOP format.
5733 * trans-decl.c (gfor_fndel_stop_*): New fndecl nodes.
5734 * trans-stmt.c (g95_trans_stop): Handle new STOP format.
5735
5736 2003-01-11 Paul Brook <paul@nowt.org>
5737
5738 * trans-array.c: Various documentation/comment changes.
5739 * trans-stmt.c: Ditto.
5740
5741
5742 2003-01-10 Paul Brook <paul@nowt.org>
5743
5744 * options.c/h: Add -fdump-parse-tree as alias of -v.
5745
5746 2003-01-10 Steven Bosscher <s.bosscher@student.tudelft.nl>
5747
5748 * dump-parse-tree.c (g95_show_namespace): Fixed another
5749 typo. Sorry, it's Friday...
5750
5751 2003-01-10 Steven Bosscher <s.bosscher@student.tudelft.nl>
5752
5753 Spotted by Tobi:
5754 * trans-array.c, trans-array.h, trans.c, trans-const.c,
5755 trans-const.h, trans-decl.c, trans-expr.c, trans.h
5756 trans-intrinsic.c, trans-io.c, trans-stmt.c, trans-stmt.h
5757 trans-types.c: Fix bogus copyright years, add 2003.
5758 * trans-types.h: Give copyright header.
5759
5760 2003-01-10 Steven Bosscher <s.bosscher@student.tudelft.nl>
5761
5762 * dump-parse-tree.c (g95_show_namespace): Fixed typo.
5763 * expr.c, options.c, scanner.c: Add some more 'const' markers.
5764 * intrinsic.c: Some constant strings moved to read-only memory.
5765 * io.c (format_asterisk): Move to...
5766 * g95.h: ...here.
5767
5768 2003-01-10 Steven Bosscher <s.bosscher@student.tudelft.nl>
5769
5770 * dump-parse-tree.c (g95_show_namespace): Dump implicit
5771 types for ranges instead of per-letter. Indent the
5772 'CONTAINS' just like everything else.
5773 * resolve.c (resolve_contained_functions): Clarify comment.
5774 Explain non-obvious conditional expression. Improve
5775 diagnostics if tyoe cannot be resolved.
5776 Port semi-fix from Andy's tree:
5777 (was_declared): Move up before first use.
5778 (generic_sym, specific_sym): New functions. Code moved
5779 out if procedure_kind.
5780 (procedure_kind): Simplify using new functions.
5781 (resolve_generic_f): Make sure the functions we find in
5782 a parent namespace is generic.
5783 (resolve_specific_f): Ditto for specific functions.
5784
5785 2003-01-10 Steven Bosscher <s.bosscher@student.tudelft.nl>
5786
5787 * trans-stmt.c, trans.c: Fix some code style issues. Add
5788 some more comment (but still not enough!).
5789
5790 2003-01-10 Steven Bosscher <s.bosscher@student.tudelft.nl>
5791
5792 * symbol.c (flavors, procedures, intents, acces_types,
5793 access_types, ifsrc_types): Make const.
5794 * misc.c (g95_string2code): Make 'm' param 'const'.
5795 * module.c (find_enum, write_atom, mio_name): Make
5796 'm' param 'const'.
5797 (attr_bits, bt_types, array_spec_types, array_ref_types,
5798 ref_types, expr_types): Make const.
5799 * g95.h: Adjust external decls.
5800
5801 2003-01-09 Paul Brook <paul@nowt.org>
5802
5803 * Testsuite: Add a load of new cases.
5804
5805 2003-01-08 Steven Bosscher <s.bosscher@student.tudelft.nl>
5806
5807 * Make-file.in: Add dependency on back end header files;
5808 a parallel build should work now.
5809 * f95-lang-c (lang_identifier): Remove bogus comment.
5810 (g95_be_parse_file): Fix prototype.
5811 (g95_init): Make static.
5812 (g95_finish): Make static.
5813 * error.c (g95_syntax_error): Kill. Make define in...
5814 * g95.h (g95_syntax_error): Define.
5815 (g95.options): Make 'source' member 'const'.
5816 * interface.c (g95_match_interface): Explain
5817 hard-to-read condition.
5818 (g95_match_end_interface): Ditto.
5819 * trans_const.c (g95_build_string_const): Make 's' parameter
5820 'const'.
5821 * trans_const.h: Adjust protoype accordingly.
5822 * trans-decl.c: Include tree-dump.h
5823 (g95_generate_function_code): Build fixes for recent changes
5824 in the tree-ssa branch.
5825
5826 2003-01-08 Steven Bosscher <s.bosscher@student.tudelft.nl>
5827
5828 * format.c: Kill, move code from here...
5829 * io.c: ...to here.
5830 * Make-lang.in: Adjust.
5831 * MANIFEST: Ditto.
5832 * match.h: Ditto.
5833 * BUGS: Mention where to submit bugs. Move old content...
5834 * TODO: ...to here. New file.
5835
5836 2003-01-08 Steven Bosscher <s.bosscher@student.tudelft.nl>
5837 Fix most warnings, and suppress the ones we can't fix for now.
5838 * Make-lang.in: Suppress warnings about bad proto's in g95.h,
5839 these warnings just clutter the screen and there's not much
5840 we can do about them for now anyway.
5841 * check.c, iresolve.c: Mark unused function parameters.
5842 * dump-parse-tree.c (g95_show_array_spec): Punt on AS_UNKNOWN,
5843 they should be resolved before they get here.
5844 * error.c: Remove unused FILE *status_out.
5845 * f95-lang.c (g95_init): Remove bogus cast.
5846 * Many files: Make things 'const' where required.
5847 * g95.h: Fix prototypes for all modified functions above.
5848 (g95_options): Remove 'object' member.
5849
5850 2003-01-07 Steven Bosscher <s.bosscher@student.tudelft.nl>
5851
5852 * Make-file.in: Cleanup bogus targets. Add more comment.
5853 * lang-options.h: New option '-w'.
5854 * g95.h: add no_options field to struct g95_options.
5855 * options.c (g95_init_options): Default no_warnings to off.
5856 (g95_parse_arg): Recognise the '-w' switch and its alias,
5857 '-fno-warnings'.
5858 * error.c (g95_warning, g95_warning_now): Don't emit warning if
5859 no_warning option is set.
5860 * iresolve.c (g95_resolve_shape): Fix warning.
5861
5862 2003-01-07 Steven Bosscher <s.bosscher@student.tudelft.nl>
5863
5864 * primary.c (g95_next_string_char): Rename next_string_char, and
5865 make static. Adjust callers accordingly.
5866 * resolve.c (resolve_generic_f0): Return try, not match. Adjust
5867 callers accordingly.
5868 * g95.h: Split out all g95_match* functions to...
5869 * match.h: ...here. New file.
5870 * array.c, decl.c, expr.c, format.c, interface.c, io.c, match.c,
5871 matchexp.c, module.c, parse.c, primary.c: Inlcude match.h
5872
5873 2003-01-07 Steven Bosscher <s.bosscher@student.tudelft.nl>
5874
5875 * symbol.c (g95_clear_new_implicit, g95_add_new_implicit_range,
5876 g95_merge_new_implicit): New functions.
5877 (g95_match_implicit_none, g95_match_implicit): Move from here...
5878 * match.c (g95_match_implicit_none, g95_match_implicit): ... to here.
5879 Modify to use the new functions in symbol.c.
5880 * g95.h: Add and move prototypes.
5881
5882 2003-01-06 Steven Bosscher <s.bosscher@student.tudelft.nl>
5883
5884 * bbt.c (insert): Use a typedef'ed compare_fn prototype for the
5885 node compare function.
5886 (g95_insert_bbt): Likewise.
5887 (g95_insert_bbt_with_overlap): Likewise.
5888 (g95_delete_bbt): Likewise.
5889 (delete_treap): Likewise. Also fix a potential bug when calling it.
5890 * module.c (compare_pointers): Change proto to compare_fn.
5891 (compare_integers): Likewise.
5892 (compare_true_names): Likewise.
5893 (find_true_name): Adjust call to compare_true_names to match proto.
5894 (require_atom, write_atom, mio_name): Fix 'const' warnings.
5895 (init_pi_tree): Make compare a compare_fn instead of (int *).
5896 * resolve.c (compare_cases): Change proto to compare_fn.
5897 * symbol.c (g95_compare_symtree): Change proto to compare_fn, make
5898 it static, and rename to compare_symtree.
5899 (delete_symtree, g95_undo_symbols, g95_new_symtree): Use renamed
5900 function.
5901 * g95.h: Kill g95_compare_symtree prototype. Adjust prototypes
5902 of g95_insert_bbt, g95_insert_bbt_with_overlap, and g95_delete_bbt.
5903
5904 2003-01-06 Steven Bosscher <s.bosscher@student.tudelft.nl>
5905 * Make-lang.in: Fix spaces/tabs issues from previous patch.
5906 * patch.options: Blow away Paul's checkin mistake :-)
5907 * io.c (terminate_io): Fix memory leak (Arnaud).
5908
5909 2003-01-06 Steven Bosscher <s.bosscher@student.tudelft.nl>
5910
5911 * Make-lang.in: Teach about building DVI, info manual.
5912 * g95.texi: New file.
5913
5914 2003-01-02 Paul Brook <paul@nowt.org>
5915
5916 * trans-array.c (g95_reverse_ss): Make static and don't use.
5917 (g95_conv_ss_descriptor): Don't use g95_loopinfo
5918 (g95_conv_array_parameters): Modify for pointer assignments.
5919 (g95_walk_subexpr): New function.
5920 (g95_walk_expr*): Use it.
5921 * trans-array.h (g95_reverse_ss): Remove prototype.
5922 * trans-expr.c (g95_trans_pointer_assign): Implement.
5923 (Many): Set se.want_pointer before calling g95_conv_array_parameter.
5924 * trans-intrinsic.c: Sync with scalarizer changes.
5925 * trans-io.c: Ditto.
5926
5927 2002-12-29 Paul Brook <paul@nowt.org>
5928
5929 * trans-array.c: Document calling convention for arrays.
5930
5931 2002-12-19 Paul Brook <paul@nowt.org>
5932
5933 * trans-intrinsic.c (g95_conv_intrsinsic_function): Remove incorrect
5934 assertion. Remove intrinsic subroutine G95_ISYM_* cases. Always pass
5935 optional parameters for some intrinsics.
5936 (g95_is_intrinsic_libcall): Add G95_ISYM_RESHAPE.
5937 * trans-expr.c (g95_conv_function_call): Pass NULL for absent
5938 optional parameters.
5939 * trans.h (g95_se): Add ignore_optional flag.
5940
5941 2002-12-15 Paul Brook <paul@nowt.org>
5942
5943 * trans-array.c (g95_conv_array_parameter): Fix partial rank sections.
5944 * trans-decl.c (g95_generate_function_code): Use TDI_original.
5945
5946 2002-12-14 Paul Brook <paul@nowt.org>
5947
5948 * trans-stmt.c (g95_trans_call): Use resolved symbol name.
5949
5950 2002-12-12 Paul Brook <paul@nowt.org>
5951
5952 * trans-array.c (g95_trans_array_constructor_subarray): Fully
5953 initialize the scalarizer.
5954 (various): Update to new format of g95_expr->value.constructor.
5955
5956 2002-12-08 Paul Brook <paul@nowt.org>
5957
5958 * trans-array.c (g95_put_offset_into_var): New function.
5959 (g95_trans_array_constructor_subarray): New function.
5960 (g95_trans_array_constructor_value): Use it.
5961 (g95_array_cons_size): Don't abort() on array components.
5962
5963 2002-12-08 Paul Brook <paul@nowt.org>
5964
5965 * Make-lang.in (F95_ADDITIONAL_OBJS): Remove tree-dchain.o.
5966 * support.c: Update #includes.
5967 (statement_code_p, c_size_in_bytes, s_size_type_node): Remove.
5968 * trans-array.c: Update #includes.
5969 * trans.c: Ditto.
5970 * trans-const.c: Ditto.
5971 * trans-io.c: Ditto.
5972 * trans-types.c: Ditto.
5973 (g95_init_types): Set size_type_node.
5974 * trans-decl.c: Update #includes.
5975 (gfor_fndecl_adjust{l,r}): Declare and initialize.
5976 * trans-stmt.c: Update #includes.
5977 (g95_trans_do_while): Generate LABEL_EXPR, not GOTO_EXPR.
5978 (g95_trans_select): Fix check for unbounded ranges.
5979 * trans-expr.c: Update #includes.
5980 (g95_conv_string_tmp): New function.
5981 (g95_conv_concat_op): Use it.
5982 * trans.h (g95_conv_string_tmp, gfor_fndecl_adjust{l,r}): Declare.
5983 * Trans-intrisic.c: Update #includes.
5984 (g95_conv_intrinsic_strcmp): New function.
5985 (g95_conv_intrinsic_adjust): Ditto.
5986 (g95_conv_intrinsic_function: Use them.
5987
5988 2002-11-30 Paul Brook <paul@nowt.org>
5989
5990 * trans-array.c (g95_walk_function_expr): Handle non-array return by
5991 reference.
5992 * trans-dec.c (g95_build_function_decl): Handle character return
5993 parammeters.
5994 (g95_get_fake_result_decl): Ditto.
5995 (g95_trans_deferred_vars): Ditto.
5996 * trans-expr.c (g95_conv_function_call): Ditto.
5997 (g95_trans_arrayfunc_assign) Limit to array valued functions.
5998 * trans-intrinsic.c (g95_conv_intrinsic_char): New function.
5999 (g95_conv_intrinsic_function): Use it.
6000 * trans-types.c (g95_sym_type): Handle functions returning strings.
6001 (g95_return_by_reference): Ditto.
6002 (g95_get_function_type): Ditto.
6003
6004 2002-11-18 Paul Brook <paul@nowt.org>
6005
6006 * trans-stmt.c (g95_trans_if): Fix IF statements when the condition
6007 requires a temporary.
6008 (g95_trans_select): Handle computed gotos.
6009 * trans-types.c (g95_build_array_type): Warn about non-functional
6010 assumed shape arrays.
6011 * trans-expr.c (g95_trans_scalar_assign): Correctly handle post
6012 blocks.
6013 * trans-intrinsic.c (g95_conv_intrinsic_round): New function.
6014 (g95_conv_intrinsic_int): New function.
6015 (g95_conv_intrinsic_mod): New function.
6016 (g95_conv_intrinsic_ichar): New function.
6017 (g95_conv_intrinsic_function): Use them.
6018 (g95_conv_intrinsic_dim): Use g95_evaluate_now.
6019
6020 2002-11-17 Toon Moene <toon@moene.indiv.nluug.nl>
6021
6022 * trans-types.c (g95_build_array_type): Assumed
6023 sized arrays can have rank > 1.
6024 * trans.c (g95_trans_code): Remove erroneous
6025 warning about CONTINUE.
6026 * trans-expr.c (g95_conv_variable): Remove
6027 erroneous assert.
6028
6029 2002-11-15 Paul Brook <paul@nowt.org>
6030
6031 * trans-array.c (g95_conv_array_parameter): Check for NULL stride.
6032
6033 2002-10-31 Paul Brook <paul@nowt.org>
6034
6035 * f95-tree.c: Remove tree copying stuff that's now in gimple.c
6036 * trans-expr.c (g95_conv_component_ref): Handle character string
6037 components.
6038 (g95_conv_string_parameter): Ditto.
6039 * trans-types.c (g95_get_derived_type): Add length decl to caracter
6040 string components.
6041
6042 2002-10-10 Paul Brook <paul@nowt.org>
6043
6044 * trans-decl.c (gfor_fndecl_size?): Declare and initialize.
6045 * trans-expr.c (g95_conv_function_call): Remove unreliable return value
6046 check.
6047 * trans-intrinsic.c (g95_conv_intrinsic_size): New function.
6048 (g95_conv_intrinsic_function): Handle size and shape intrinsics.
6049 (g95_is_intrinsic_libcall): Add G95_ISYM_SHAPE.
6050 * trans-types.c (pvoid_type_node): Declare and initialize.
6051 * trans-array.c: Fix typo COMPONENT_REF->REF_COMPONENT
6052 (g95_array_allocate): Fix when base==data.
6053 (g95_conv_array_parameter): Correctly handle reduced rank sections.
6054 * trans-io.c (g95_trans_write): Correctly handle string modifiers.
6055
6056 2002-10-09 Paul Brook <paul@nowt.org>
6057
6058 * (g95_conv_expr_reference): Handle character strings correctly.
6059
6060 2002-10-07 Paul Brook <paul@nowt.org>
6061
6062 (g95_expand_decl): Rename from f95_expand_decl_stmt and use as
6063 langhook.
6064 * trans-array.c (g95_build_array_initializer): Remove.
6065 (g95_conv_array_initializer): New Function.
6066 (g95_trans_auto_arry_allocation): Cleanup.
6067 (g95_trans_init_character_array): Remove.
6068 * g95spec.c: Link in libgforbegin.
6069 * trans.c (g95_generate_code): Rename main function to MAIN__.
6070 (g95_create_var): New function.
6071 (g95_create_var_np): New function.
6072 (g95_evaluate_now): New function.
6073 (g95_start_block): New function.
6074 (g95_finish_block): New function.
6075 (g95_add_expr_to_block): New function.
6076 (g95_add_block_to_block): New function.
6077 * trans-expr.c (g95_conv_componen_ref): New function.
6078 * Make-lang.in (F95_ADDITIONAL_OBJS): Add gimplify.o.
6079 (F95_OBJS): Add dependency.o.
6080 * f95-lang.c (g95_is_simple_stmt): Remove.
6081 * f95-tree.c (mark_not_simple): New function.
6082 (unshare_all_trees): New function.
6083 (create_tmp_var, create_tmp_alias_var): Remove.
6084 * support.c (declare_tmp_vars, tree_last_decl): Remove.
6085 * trans*: Convert to new IR using GENERIC trees. Don't bother about
6086 SIMPLE/GIMPLE rules, this is now done by Lang-independant code.
6087
6088 2002-10-01 Paul Brook <paul@nowt.org>
6089
6090 * trans-array.c: Add support for descriptorless arrays.
6091 (g95_conv_array_data): New function.
6092 (g95_conv_array_base): New function.
6093 * trans-array.h: Declare these here.
6094 * trans-decl.c(g95_create_mopdule_variable): Perform variable
6095 initialization and creation here.
6096 (g95_create_module_vars): Instead of here.
6097 * trans.h (G95_TYPE_ARRAY_*: Rename from G95_TYPE_DESCRIPTOR_*.
6098 * trans-intrinsic.c: Ditto.
6099 * trans-types.c (g95_is_nodesc_array): New function.
6100 (g95_get_nodesc_array_type): New function.
6101 (g95_sym_type, g95_get_derived_type): Use them.
6102 * trans-const.c (g95_conv_mpf_to_tree): Remove workaround.
6103
6104 2002-09-28 Paul Brook <paul@nowt.org>
6105
6106 * trans-const.c (g95_conv_mpf_to_tree): Work around backend bug.
6107 * trans-intrinsic.c (g95_conv_intrinsic_abs): Correctly detect complex
6108 parameters.
6109
6110 2002-09-24 Paul Brook <paul@nowt.org>
6111
6112 * f95-lang.c (listify): Remove declaration.
6113 (expand_function_body): Use optimize >=1 instead of flag_tree_saa.
6114 (listify)
6115 * f95-tree.c (get_name): New function.
6116 * trans.c (module_namespace): Remove.
6117 * trans-decl.c: Use g95_chainon_list rather than chainon(listify()).
6118 * trans-types.c: Ditto.
6119
6120 2002-09-19 Paul Brook <paul@nowt.org>
6121
6122 * trans-array.c (g95_get_array_cons_size): New Function.
6123 (g95_con_ss_startstride): Handle Array constructors.
6124 (g95_conv_loop_setup): Ditto.
6125 (g95_conv_array_parameter): Ditto.
6126 * tras-decl.c (g95_finish_var_decl): Make initializes variables
6127 static.
6128
6129 2002-09-19 Paul Brook <paul@nowt.org>
6130
6131 * trans.c (g95_simple_fold_tmp): Detect variables inside
6132 NON_LVALUE_EXPR.
6133 * trans-stmt.c (g95_trans_arithmetic_if): Implement this.
6134
6135 2002-09-18 Steven Bosscher <s.bosscher@student.tudelft.nl>
6136
6137 * Make-lang.in (F95_ADDITIONAL_OBJS): Add tree-ssa-dce.o
6138
6139 2002-09-14 Paul Brook <paul@nowt.org>
6140
6141 * trans.c (g95_create_module_variable): Move to trans-decl.c.
6142 * trans-const.c (g95_conv_string_init): New Function.
6143 * trans-const.h: Declare it.
6144 * trans-decl.c (g95_get_symbol_decl): Handle initializers for static
6145 variables. Don't bail on intrinsic symbols.
6146 (get_extern_function_decl): Handle specific intrinsic functions.
6147 * trans-types.c (g95_sym_type): Dummy functions don't return
6148 reference types.
6149 * trans-array.c (g95_build_array_initializer): New Function.
6150 (g95_trans_auto_array_allocation): Build initializer for static decls.
6151 Don't use mpz_addmul, it's GMP4 only.
6152
6153 2002-09-12 Paul Brook <paul@nowt.org>
6154
6155 * trans-decl.c (g95_generate_code): Fix thinko with return variable.
6156 (g95_get_extern_function_decl, g95_build_function_decl): Mangle
6157 assembler names for module procedures.
6158
6159 2002-09-11 Tobias Schlueter <Tobias.Schlueter@physik.uni-muenchen.de>
6160
6161 * trans-array.c,h trans-expr.c, trans-stmt.c: Correct spelling of
6162 dependency/
6163
6164 2002-09-10 Paul Brook <paul@nowt.org>
6165
6166 * trans-array.c: Change format of G95_SS_TEMP strictures.
6167 (g95_check_fncall_dependancy): New function.
6168 (trans_dummy_array_bias): stride[n], not stride[n-1]. for calculating
6169 offsets.
6170 * trans-decl.c (g95_get_symbol_decl): move assertion after handling of
6171 result variables.
6172 (g95_build_function_decl): Don't assume result arrays are packed.
6173 (g95_trans-deferred-vars): Handle array result variables.
6174 (g95_generate_fuction_code): Clear saved_function_decls.
6175 * trans-expr.c (g95_conv_fnction_call): Handle direct array return by
6176 reference.
6177 (g95_trans_arrayfunc_assign): New function.
6178 (g95_trans_assignment): Use it.
6179 * trans.h (g95_ss): Add temp struct for G95_SS_TEMP.
6180 (g95_se): Add direct_byref.
6181 * trans-types.c: Use sym->result rather than sym where appropriate.
6182 * trans-intrinsic.c (g95_conv_intrinsic_funcall): New function.
6183 Update other functions to use this.
6184 (g95_is_intrinsic_libcall): New function.
6185 (g95_conv_intrinsic_function): Add MATMUL and PRODUCT intrinsics.
6186 (g95_walk_intrinsic_function): Ditto.
6187
6188 2002-09-08 Paul Brook <paul@nowt.org>
6189
6190 * trans-types.c: Change rank field to dtype field in array descriptor.
6191 * trans-array.c: Implement filling of dtype array descriptor field.
6192 * trans-intrinsic.c: Fix broken LEN intrinsic.
6193
6194 2002-09-07 Paul Brook <paul@nowt.org>
6195
6196 * trans-intrinsic.c: Remove outdated todo intrinsic list.
6197 (g95_get_symbol_for_expr): Remove hack for fortran based intrinsics.
6198 (g95_walk_intrinsic_function): Add MINLOC and MAXLOC.
6199
6200 2002-09-06 Paul Brook <paul@nowt.org>
6201
6202 * Make-lang.in (F95_ADDITIONAL_OBJS): Add tree_alias_comon.o.
6203 (gt-f95-trans-types.h): Add dependancy information.
6204 * config-lang.in (gtfiles): Add trans-types.c
6205 * f95-lang.c (g95_be_parse_file): Pass error and warning counts
6206 back to top-level code.
6207 * trans-array.c, trans-types.c: Change format of array descriptor.
6208 (g95_conv_descriptor_dimension): New function.
6209 * trans-types.h (g95_conv_descriptor_rank): define.
6210 * trans-intrinsic.c: Implement PRODUCT, COUNT. MINLOC and MAXLOC
6211 intrinsics.
6212
6213 2002-09-02 Steven Bosscher <s.bosscher@student.tudelft.nl>
6214
6215 * trans-array.c, trans-types.c: Add rank information to descriptor.
6216
6217 2002-09-06 Tobias Schlueter <Tobias.Schlueter@physik.uni-muenchen.de>
6218
6219 * trans-stmt.c (g95_trans_allocate): Fix when ref==NULL.
6220
6221 2002-09-04 Paul Brook <paul@nowt.org>
6222
6223 * f95-lang.c (g95_create_decls): New function.
6224 (g95_init): Move initialization of external decls to above, and call
6225 from g95_be_parse_file.
6226 * trans.c (g95_finish_stmt): Don't amputate the decl chain.
6227 * trans-types.c (g95_init_types): Always name integer and char types.
6228 (g95_get_array_type_bounds): TYPE_NAME may be a TYPE_DECL.
6229
6230 2002-09-02 Steven Bosscher <s.bosscher@student.tudelft.nl>
6231
6232 * Make-lang.in: Add options.c to F95_PARSER_OBJS
6233
6234 2002-09-02 Paul Brook <paul@nowt.org>
6235
6236 * g95_generate_code: Clear the attr for __fortran_main.
6237 * trans-types.c (g95_finish_type): New function.
6238 * g95_init_io_state_type: Use g95_finish_type.
6239 * g95_conv_intrinsic_anyall: Fix thinko in result initialization.
6240
6241 2002-09-01 Paul Brook <paul@nowt.org>
6242
6243 * README.backend: Warn about the dangers of extra config.h files.
6244 Remove obsolete libgfor stuff.
6245 * config-lang.in: Add target-libgfor dependancy.
6246 * g95_conv_mpf_to_tree: Use & free allocated buffer p rather than buff.
6247
6248 2002-09-01 Toon Moene <toon@moene.indiv.nluug.nl>
6249
6250 * g95_conv_mpz_to_tree: Free storage pointed to by q,
6251 not by buff.
6252
6253 2002-08-30 Paul Brook <paul@nowt.org>
6254
6255 * trans-intrinsic.c (g95_conv_intrinsic_function,
6256 g95_walk_intrinsic_function): Added ANY and ALL.
6257 (g95_conv_intrinsic_anyall): New function.
6258 * iresolve.c (g95_resolve_any, g95_resolve_all): Include rank in
6259 mangled name
This page took 0.282124 seconds and 6 git commands to generate.