/[emacs]/emacs/src/lisp.h
ViewVC logotype

Diff of /emacs/src/lisp.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.410 by monnier, Mon Mar 4 23:40:59 2002 UTC revision 1.411 by gerd, Fri Mar 8 10:26:32 2002 UTC
# Line 1  Line 1 
1  /* Fundamental definitions for GNU Emacs Lisp interpreter.  /* Fundamental definitions for GNU Emacs Lisp interpreter.
2     Copyright (C) 1985,86,87,93,94,95,97,98,1999,2000, 2001     Copyright (C) 1985,86,87,93,94,95,97,98,1999,2000, 2001, 2002
3       Free Software Foundation, Inc.       Free Software Foundation, Inc.
4    
5  This file is part of GNU Emacs.  This file is part of GNU Emacs.
# Line 535  extern Lisp_Object make_number (); Line 535  extern Lisp_Object make_number ();
535  #define ASET(ARRAY, IDX, VAL)   (AREF ((ARRAY), (IDX)) = (VAL))  #define ASET(ARRAY, IDX, VAL)   (AREF ((ARRAY), (IDX)) = (VAL))
536  #define ASIZE(ARRAY)            XVECTOR ((ARRAY))->size  #define ASIZE(ARRAY)            XVECTOR ((ARRAY))->size
537    
538    /* Convenience macros for dealing with Lisp strings.  */
539    
540    #define SREF(string, index)     XSTRING (string)->data[index]
541    #define SDATA(string)           XSTRING (string)->data
542    #define SCHARS(string)          XSTRING (string)->size
543    #define SBYTES(string)          XSTRING (string)->size_bytes
544    #define SMBP(string)            STRING_MULTIBYTE (string)
545    
546    
547  /* Basic data type for use of intervals.  See the macros in intervals.h.  */  /* Basic data type for use of intervals.  See the macros in intervals.h.  */
548    

Legend:
Removed from v.1.410  
changed lines
  Added in v.1.411

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26