comparison src/doc.c @ 153:25f70ba0133c r20-3b3

Import from CVS: tag r20-3b3
author cvs
date Mon, 13 Aug 2007 09:38:25 +0200
parents cf808b4c4290
children 85ec50267440
comparison
equal deleted inserted replaced
152:4c132ee2d62b 153:25f70ba0133c
346 && ! NILP (XCDR (tem1))) 346 && ! NILP (XCDR (tem1)))
347 doc = get_doc_string (tem); 347 doc = get_doc_string (tem);
348 else 348 else
349 return Qnil; 349 return Qnil;
350 } 350 }
351 #ifdef MOCKLISP_SUPPORT
352 else if (EQ (funcar, Qmocklisp))
353 return Qnil;
354 #endif
355 else if (EQ (funcar, Qmacro)) 351 else if (EQ (funcar, Qmacro))
356 return Fdocumentation (Fcdr (fun), raw); 352 return Fdocumentation (Fcdr (fun), raw);
357 else 353 else
358 goto oops; 354 goto oops;
359 } 355 }