Mercurial > hg > xemacs-beta
comparison src/lisp.h @ 980:2ec85ed291da
[xemacs-hg @ 2002-08-30 08:05:30 by youngs]
2002-08-29 Jerry James <james@xemacs.org>
* lisp.h: structrures -> structures.
author | youngs |
---|---|
date | Fri, 30 Aug 2002 08:05:32 +0000 |
parents | 0dc7756a58c4 |
children | 25e260cb7994 |
comparison
equal
deleted
inserted
replaced
979:d9b4b0f21bdb | 980:2ec85ed291da |
---|---|
2505 do { if (lisp_readonly (obj)) lisp_write_error (obj); } while (0) | 2505 do { if (lisp_readonly (obj)) lisp_write_error (obj); } while (0) |
2506 | 2506 |
2507 #define C_READONLY(obj) (C_READONLY_RECORD_HEADER_P(XRECORD_LHEADER (obj))) | 2507 #define C_READONLY(obj) (C_READONLY_RECORD_HEADER_P(XRECORD_LHEADER (obj))) |
2508 #define LISP_READONLY(obj) (LISP_READONLY_RECORD_HEADER_P(XRECORD_LHEADER (obj))) | 2508 #define LISP_READONLY(obj) (LISP_READONLY_RECORD_HEADER_P(XRECORD_LHEADER (obj))) |
2509 | 2509 |
2510 /*----------------------------- structrures ----------------------------*/ | 2510 /*----------------------------- structures ----------------------------*/ |
2511 | 2511 |
2512 typedef struct structure_keyword_entry structure_keyword_entry; | 2512 typedef struct structure_keyword_entry structure_keyword_entry; |
2513 struct structure_keyword_entry | 2513 struct structure_keyword_entry |
2514 { | 2514 { |
2515 Lisp_Object keyword; | 2515 Lisp_Object keyword; |