diff --git a/src/scan-gram.l b/src/scan-gram.l
index 2b2a7f2a..2fb05253 100644
--- a/src/scan-gram.l
+++ b/src/scan-gram.l
@@ -707,7 +707,7 @@ eqopt    ([[:space:]]*=)?
   "{"|"<"{splice}"%"  STRING_GROW; nesting++;
   "%"{splice}">"      STRING_GROW; nesting--;
 
-  /* Tokenize '<<%' correctly (as '<<' '%') rather than incorrrectly
+  /* Tokenize '<<%' correctly (as '<<' '%') rather than incorrectly
      (as '<' '<%').  */
   "<"{splice}"<"  STRING_GROW;