diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 23c3cdeb1728..b6bde8d679f7 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2013-07-05  Thomas Quinot  <quinot@adacore.com>
+
+	* tree-complex.c (expand_complex_operations_1): Fix typo.
+
 2013-07-04  Tejas Belagod  <tejas.belagod@arm.com>
 
 	* config/aarch64/aarch64-protos.h (cpu_vector_cost): New.
diff --git a/gcc/tree-complex.c b/gcc/tree-complex.c
index d43172be3bf2..5caba01cde41 100644
--- a/gcc/tree-complex.c
+++ b/gcc/tree-complex.c
@@ -1472,7 +1472,7 @@ expand_complex_operations_1 (gimple_stmt_iterator *gsi)
     case EQ_EXPR:
     case NE_EXPR:
       /* Note, both GIMPLE_ASSIGN and GIMPLE_COND may have an EQ_EXPR
-	 subocde, so we need to access the operands using gimple_op.  */
+	 subcode, so we need to access the operands using gimple_op.  */
       inner_type = TREE_TYPE (gimple_op (stmt, 1));
       if (TREE_CODE (inner_type) != COMPLEX_TYPE)
 	return;