diff options
author | Joost VandeVondele <vondele@gcc.gnu.org> | 2014-09-20 11:48:00 +0000 |
---|---|---|
committer | Joost VandeVondele <vondele@gcc.gnu.org> | 2014-09-20 11:48:00 +0000 |
commit | 1cc0e19328554e88fd56ce2b0c181737a2d50ccf (patch) | |
tree | 4fa9d844b23edb1799e726fa4d4fd7d46114c263 /gcc/fortran/check.c | |
parent | 516e2f1cf0036d02d2af6109ce2aa0a5d3f601dd (diff) | |
download | gcc-1cc0e19328554e88fd56ce2b0c181737a2d50ccf.zip gcc-1cc0e19328554e88fd56ce2b0c181737a2d50ccf.tar.gz gcc-1cc0e19328554e88fd56ce2b0c181737a2d50ccf.tar.bz2 |
trans-expr.c (gfc_reset_vptr): Fix comment whitespace.
2014-09-20 Joost VandeVondele <vondele@gcc.gnu.org>
* trans-expr.c (gfc_reset_vptr): Fix comment whitespace.
(gfc_conv_class_to_class): Likewise.
(gfc_conv_procedure_call): Likewise.
(arrayfunc_assign_needs_temporary): Likewise.
(realloc_lhs_loop_for_fcn_call): Likewise.
(gfc_trans_assignment_1): Likewise.
* trans-array.c (gfc_conv_array_ref): Likewise.
(gfc_array_allocate): Likewise.
(gfc_alloc_allocatable_for_assignment): Likewise.
* symbol.c (generate_isocbinding_symbol): Likewise.
* class.c (finalization_scalarizer): Likewise.
(finalizer_insert_packed_call): Likewise.
(generate_finalization_wrapper): Likewise.
(find_intrinsic_vtab): Likewise.
* decl.c (gfc_match_import): Likewise.
(match_procedure_decl): Likewise.
(gfc_match_subroutine): Likewise.
(gfc_match_bind_c): Likewise.
(gfc_match_volatile): Likewise.
* trans-common.c (create_common): Likewise.
* error.c (gfc_diagnostic_starter): Likewise.
* trans-stmt.c (gfc_trans_sync): Likewise.
(gfc_trans_critical): Likewise.
(gfc_trans_simple_do): Likewise.
(gfc_trans_do): Likewise.
(gfc_trans_where_assign): Likewise.
* expr.c (gfc_is_simply_contiguous): Likewise.
* module.c (unquote_string): Likewise.
* trans.c (gfc_add_finalizer_call): Likewise.
* trans-types.c (gfc_init_kinds): Likewise.
* scanner.c (preprocessor_line): Likewise.
* gfortranspec.c (lang_specific_driver): Likewise.
* frontend-passes.c (create_var): Likewise.
(cfe_expr_0): Likewise.
* resolve.c (check_host_association): Likewise.
(gfc_resolve_code): Likewise.
(resolve_fl_derived0): Likewise.
(resolve_symbol): Likewise.
* f95-lang.c (poplevel): Likewise.
* trans-decl.c (create_main_function): Likewise.
* trans-io.c (transfer_expr): Likewise.
* arith.c (gfc_arith_divide): Likewise.
* parse.c (resolve_all_program_units): Likewise.
* check.c (gfc_check_rank): Likewise.
(gfc_check_sizeof): Likewise.
(is_c_interoperable): Likewise.
* dependency.c (gfc_dep_difference): Likewise.
* primary.c (gfc_match_rvalue): Likewise.
* trans-intrinsic.c (conv_intrinsic_system_clock): Likewise.
(conv_isocbinding_subroutine): Likewise.
* options.c (gfc_post_options): Likewise.
(gfc_handle_fpe_option): Likewise.
(gfc_get_option_string): Likewise.
* simplify.c (simplify_transformation_to_scalar): Likewise.
(gfc_simplify_spread): Likewise.
From-SVN: r215420
Diffstat (limited to 'gcc/fortran/check.c')
-rw-r--r-- | gcc/fortran/check.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/fortran/check.c b/gcc/fortran/check.c index 95d2869..531fe86 100644 --- a/gcc/fortran/check.c +++ b/gcc/fortran/check.c @@ -3357,7 +3357,7 @@ gfc_check_rank (gfc_expr *a ATTRIBUTE_UNUSED) bool is_variable = true; - /* Functions returning pointers are regarded as variable, cf. F2008, R602. */ + /* Functions returning pointers are regarded as variable, cf. F2008, R602. */ if (a->expr_type == EXPR_FUNCTION) is_variable = a->value.function.esym ? a->value.function.esym->result->attr.pointer @@ -3936,7 +3936,7 @@ gfc_check_sizeof (gfc_expr *arg) If c_loc is true, character with len > 1 are allowed (cf. Fortran 2003corr5); additionally, assumed-shape/assumed-rank/deferred-shape arrays are permitted. And if c_f_ptr is true, deferred-shape arrays - are permitted. */ + are permitted. */ static bool is_c_interoperable (gfc_expr *expr, const char **msg, bool c_loc, bool c_f_ptr) @@ -3983,7 +3983,7 @@ is_c_interoperable (gfc_expr *expr, const char **msg, bool c_loc, bool c_f_ptr) if (expr->ts.deferred) { /* TS 29113 allows deferred-length strings as dummy arguments, - but it is not an interoperable type. */ + but it is not an interoperable type. */ *msg = "Expression shall not be a deferred-length string"; return false; } |