Credit Vivek Dasmohapatra for suggesting the last change.

[gnu-emacs] / src / nsfont.m

diff --git a/src/nsfont.m b/src/nsfont.m
index 9802b17f32de835487204e471aee8da30d0865ca..d5107f376dd678a78d2c8241c357348107d670ec 100644 (file)
--- a/src/nsfont.m
+++ b/src/nsfont.m
@@ -1,6 +1,6 @@
 /* Font back-end driver for the NeXT/Open/GNUstep and MacOSX window system.
    See font.h
-   Copyright (C) 2006, 2007, 2008, 2009 Free Software Foundation, Inc.
+   Copyright (C) 2006, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
 
 This file is part of GNU Emacs.
 
@@ -23,6 +23,7 @@ Author: Adrian Robert (arobert@cogsci.ucsd.edu)
 /* This should be the first include, as it may set up #defines affecting
    interpretation of even the system includes. */
 #include "config.h"
+#include <setjmp.h>
 
 #include "lisp.h"
 #include "dispextern.h"
@@ -548,7 +549,7 @@ ns_findfonts (Lisp_Object font_spec, BOOL isMatch)
 
     if (NSFONT_TRACE)
        fprintf (stderr, "    Returning %ld entities.\n",
-                 (long)XINT (Flength (list)));
+                 (long) XINT (Flength (list)));
 
     return list;
 }
@@ -655,7 +656,7 @@ nsfont_list_family (Lisp_Object frame)
 
   if (NSFONT_TRACE)
     fprintf (stderr, "nsfont: list families returning %ld entries\n",
-            (long)XINT (Flength (list)));
+            (long) XINT (Flength (list)));
 
   return list;
 }