Mercurial > hg > xemacs-beta

comparison src/alloc.c @ 16:0293115a14e9 r19-15b91

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b91
author cvs
date Mon, 13 Aug 2007 08:49:20 +0200
parents 9ee227acff29
children 859a2309aef8
comparison
equal deleted inserted replaced
15:ad457d5f7d04 16:0293115a14e9
2540 { 2540 {
2541 case Lisp_Cons: 2541 case Lisp_Cons:
2542 return pure_cons (XCAR (obj), XCDR (obj)); 2542 return pure_cons (XCAR (obj), XCDR (obj));
2543 2543
2544 case Lisp_String: 2544 case Lisp_String:
2545 return make_pure_string (string_data (XSTRING (obj)), 2545 return make_pure_string (XSTRING_DATA (obj),
2546 string_length (XSTRING (obj)), 2546 XSTRING_LENGTH (obj),
2547 XSTRING (obj)->plist, 2547 XSTRING (obj)->plist,
2548 0); 2548 0);
2549 2549
2550 case Lisp_Vector: 2550 case Lisp_Vector:
2551 { 2551 {