Mercurial > hg > xemacs-beta
comparison src/syntax.c @ 5120:d1247f3cc363 ben-lisp-object
latest work on lisp-object workspace;
more changes eliminating LCRECORD in place of LISP_OBJECT;
now compiles and runs.
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Mon, 28 Dec 2009 01:15:52 -0600 |
parents | e0db3c197671 |
children | b5df3737028a |
comparison
equal
deleted
inserted
replaced
5119:d877c14318b3 | 5120:d1247f3cc363 |
---|---|
523 void | 523 void |
524 init_buffer_syntax_cache (struct buffer *buf) | 524 init_buffer_syntax_cache (struct buffer *buf) |
525 { | 525 { |
526 struct syntax_cache *cache; | 526 struct syntax_cache *cache; |
527 #ifdef NEW_GC | 527 #ifdef NEW_GC |
528 buf->syntax_cache = alloc_lrecord_type (struct syntax_cache, | 528 buf->syntax_cache = XSYNTAX_CACHE (ALLOC_LISP_OBJECT (syntax_cache)); |
529 &lrecord_syntax_cache); | |
530 #else /* not NEW_GC */ | 529 #else /* not NEW_GC */ |
531 buf->syntax_cache = xnew_and_zero (struct syntax_cache); | 530 buf->syntax_cache = xnew_and_zero (struct syntax_cache); |
532 #endif /* not NEW_GC */ | 531 #endif /* not NEW_GC */ |
533 cache = buf->syntax_cache; | 532 cache = buf->syntax_cache; |
534 cache->object = wrap_buffer (buf); | 533 cache->object = wrap_buffer (buf); |