comparison src/lread.c @ 78:c7528f8e288d r20-0b34

Import from CVS: tag r20-0b34
author cvs
date Mon, 13 Aug 2007 09:05:42 +0200
parents 54cc21c15cbb
children 1ce6082ce73f
comparison
equal deleted inserted replaced
77:6cb4f478e7bc 78:c7528f8e288d
2734 { 2734 {
2735 if (purify_flag) 2735 if (purify_flag)
2736 { 2736 {
2737 if (NILP (Vdoc_file_name)) 2737 if (NILP (Vdoc_file_name))
2738 /* We have not yet called Snarf-documentation, so 2738 /* We have not yet called Snarf-documentation, so
2739 assume this file is described in the DOC-MM.NN 2739 assume this file is described in the DOC
2740 file and Snarf-documentation will fill in the 2740 file and Snarf-documentation will fill in the
2741 right value later. For now, replace the whole 2741 right value later. For now, replace the whole
2742 list with 0. */ 2742 list with 0. */
2743 XCAR (holding_cons) = Qzero; 2743 XCAR (holding_cons) = Qzero;
2744 else 2744 else