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);