Mercurial > hg > xemacs-beta
comparison src/syntax.h @ 5133:444a448b2f53
Merge branch ben-lisp-object into default branch
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Sun, 07 Mar 2010 06:47:37 -0600 |
parents | a9c41067dd88 |
children | 308d34e9f07d |
comparison
equal
deleted
inserted
replaced
5113:b2dcf6a6d8ab | 5133:444a448b2f53 |
---|---|
294 need to recalculate, we can update the info from the previous info | 294 need to recalculate, we can update the info from the previous info |
295 faster than if we did the whole calculation from scratch. */ | 295 faster than if we did the whole calculation from scratch. */ |
296 struct syntax_cache | 296 struct syntax_cache |
297 { | 297 { |
298 #ifdef NEW_GC | 298 #ifdef NEW_GC |
299 struct lrecord_header header; | 299 NORMAL_LISP_OBJECT_HEADER header; |
300 #endif /* NEW_GC */ | 300 #endif /* NEW_GC */ |
301 int use_code; /* Whether to use syntax_code or | 301 int use_code; /* Whether to use syntax_code or |
302 syntax_table. This is set | 302 syntax_table. This is set |
303 depending on whether the | 303 depending on whether the |
304 syntax-table property is a | 304 syntax-table property is a |
337 }; | 337 }; |
338 | 338 |
339 #ifdef NEW_GC | 339 #ifdef NEW_GC |
340 typedef struct syntax_cache Lisp_Syntax_Cache; | 340 typedef struct syntax_cache Lisp_Syntax_Cache; |
341 | 341 |
342 DECLARE_LRECORD (syntax_cache, Lisp_Syntax_Cache); | 342 DECLARE_LISP_OBJECT (syntax_cache, Lisp_Syntax_Cache); |
343 | 343 |
344 #define XSYNTAX_CACHE(x) \ | 344 #define XSYNTAX_CACHE(x) \ |
345 XRECORD (x, syntax_cache, Lisp_Syntax_Cache) | 345 XRECORD (x, syntax_cache, Lisp_Syntax_Cache) |
346 #define wrap_syntax_cache(p) wrap_record (p, syntax_cache) | 346 #define wrap_syntax_cache(p) wrap_record (p, syntax_cache) |
347 #define SYNTAX_CACHE_P(x) RECORDP (x, syntax_cache) | 347 #define SYNTAX_CACHE_P(x) RECORDP (x, syntax_cache) |