Spelling fixes

2 files changed, 4 insertions, 4 deletions

diff --git a/src/ftcrfont.c b/src/ftcrfont.c
index 0cbfd804109..df3aa596f6b 100644
--- a/src/ftcrfont.c
+++ b/src/ftcrfont.c
@@ -34,8 +34,8 @@ along with GNU Emacs.  If not, see <http://www.gnu.org/licenses/>.  */
 
 /* FTCR font driver.  */
 
-/* The actual structure for ftcr font that can be casted to struct
-   font.  */
+/* The actual structure for FTCR font.  A pointer to this structure
+   can be cast to struct font *.  */
 
 struct ftcrfont_info
 {
diff --git a/src/xdisp.c b/src/xdisp.c
index f0e30900043..7c153302803 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -24618,7 +24618,7 @@ normal_char_ascent_descent (struct font *font, int c, int *ascent, int *descent)
 
 /* A subroutine that computes a reasonable "normal character height"
    for fonts that claim preposterously large vertical dimensions, but
-   whose glyphs are actually reasonably sized.  C is the charcater
+   whose glyphs are actually reasonably sized.  C is the character
    whose metrics to use for those fonts, or -1 for default
    character.  */
 static int
@@ -26761,7 +26761,7 @@ x_produce_glyphs (struct it *it)
              don't let the row ascent and descent values (and the row
              height computed from them) be smaller than the "normal"
              character metrics.  This avoids unpleasant effects
-             whereby lines on display would change their heigh
+             whereby lines on display would change their height
              depending on which characters are shown.  */
           normal_char_ascent_descent (font, -1, &font_ascent, &font_descent);
           it->max_ascent = max (it->max_ascent, font_ascent);