diff options
| author | Kazu Hirata <kazu@cs.umass.edu> | 2005-01-23 14:36:26 +0000 |
|---|---|---|
| committer | Kazu Hirata <kazu@gcc.gnu.org> | 2005-01-23 14:36:26 +0000 |
| commit | e7dc5b4f224051483b5df3bb38bd0c2f1b1147f1 (patch) | |
| tree | 26302ea8d257615a5e90cc5c33f29c1651caa55b /gcc/fortran/trans-intrinsic.c | |
| parent | dae245345ddb0d20837dab43c9b2bac848c86aa7 (diff) | |
| download | gcc-e7dc5b4f224051483b5df3bb38bd0c2f1b1147f1.tar.gz | |
data.c, [...]: Fix comment typos.
* data.c, dependency.c, f95-lang.c, io.c, trans-array.c,
trans-decl.c, trans-expr.c, trans-intrinsic.c, trans-io.c,
trans-stmt.c, trans-types.c, trans.h: Fix comment typos.
Follow spelling conventions.
From-SVN: r94111
Diffstat (limited to 'gcc/fortran/trans-intrinsic.c')
| -rw-r--r-- | gcc/fortran/trans-intrinsic.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/fortran/trans-intrinsic.c b/gcc/fortran/trans-intrinsic.c index cdc1fd8b11c..dcabd4112fe 100644 --- a/gcc/fortran/trans-intrinsic.c +++ b/gcc/fortran/trans-intrinsic.c @@ -2368,7 +2368,7 @@ prepare_arg_info (gfc_se * se, gfc_expr * expr, gfc_add_modify_expr(&se->pre, arg, tmp); rcs->arg = arg; - /* Caculate the numbers of bits of exponent, fraction and word */ + /* Calculate the numbers of bits of exponent, fraction and word */ n = gfc_validate_kind (a1->ts.type, a1->ts.kind, false); tmp = build_int_cst (NULL_TREE, gfc_real_kinds[n].digits - 1); rcs->fdigits = convert (masktype, tmp); @@ -2796,7 +2796,7 @@ gfc_conv_intrinsic_function (gfc_se * se, gfc_expr * expr) gfc_conv_intrinsic_conversion (se, expr); break; - /* Integer conversions are handled seperately to make sure we get the + /* Integer conversions are handled separately to make sure we get the correct rounding mode. */ case GFC_ISYM_INT: gfc_conv_intrinsic_int (se, expr, FIX_TRUNC_EXPR); |