comparison src/lisp.h @ 165:5a88923fcbfe r20-3b9

Import from CVS: tag r20-3b9
author cvs
date Mon, 13 Aug 2007 09:44:42 +0200
parents 6b37e6ddd302
children 8eaf7971accc
comparison
equal deleted inserted replaced
164:4e0740e5aab2 165:5a88923fcbfe
672 #else 672 #else
673 # define EMACS_INT int 673 # define EMACS_INT int
674 # define EMACS_UINT unsigned int 674 # define EMACS_UINT unsigned int
675 #endif 675 #endif
676 676
677 /* Cast pointers to this type to compare them. Some machines want int. */
678 #ifndef PNTR_COMPARISON_TYPE
679 # define PNTR_COMPARISON_TYPE unsigned int
680 #endif
681
682 /* Overridden by m/next.h */ 677 /* Overridden by m/next.h */
683 #ifndef ASSERT_VALID_POINTER 678 #ifndef ASSERT_VALID_POINTER
684 # define ASSERT_VALID_POINTER(pnt) (assert ((((EMACS_UINT) pnt) & 3) == 0)) 679 # define ASSERT_VALID_POINTER(pnt) (assert ((((EMACS_UINT) pnt) & 3) == 0))
685 #endif 680 #endif
686 681
1853 #endif 1848 #endif
1854 #ifndef IS_ANY_SEP 1849 #ifndef IS_ANY_SEP
1855 #define IS_ANY_SEP(_c_) (IS_DIRECTORY_SEP (_c_)) 1850 #define IS_ANY_SEP(_c_) (IS_DIRECTORY_SEP (_c_))
1856 #endif 1851 #endif
1857 1852
1853 #ifdef HAVE_INTTYPES_H
1854 #include <inttypes.h>
1855 #elif SIZEOF_VOID_P == SIZEOF_INT
1856 typedef int intptr_t;
1857 typedef unsigned int uintptr_t;
1858 #elif SIZEOF_VOID_P == SIZEOF_LONG
1859 typedef long intptr_t;
1860 typedef unsigned long uintptr_t;
1861 #elif defined(SIZEOF_LONG_LONG) && SIZEOF_VOID_P == SIZEOF_LONG_LONG
1862 typedef long long intptr_t;
1863 typedef unsigned long long uintptr_t;
1864 #else
1865 /* Just pray. May break, may not. */
1866 typedef char *intptr_t;
1867 typedef char *uintptr_t;
1868 #endif
1869
1858 #include "emacsfns.h" 1870 #include "emacsfns.h"
1859 1871
1860 #endif /* _XEMACS_LISP_H_ */ 1872 #endif /* _XEMACS_LISP_H_ */