Mercurial > hg > xemacs-beta

comparison src/doprnt.c @ 440:8de8e3f6228a r21-2-28

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-28
author cvs
date Mon, 13 Aug 2007 11:33:38 +0200
parents 3ecd8885ac67
children abe6d1db359e
comparison
equal deleted inserted replaced
439:357dd071b03c 440:8de8e3f6228a
536 string_len = strlen ((char *) string); 536 string_len = strlen ((char *) string);
537 } 537 }
538 else 538 else
539 { 539 {
540 Lisp_Object obj = largs[spec->argnum - 1]; 540 Lisp_Object obj = largs[spec->argnum - 1];
541 struct Lisp_String *ls; 541 Lisp_String *ls;
542 542
543 if (ch == 'S') 543 if (ch == 'S')
544 { 544 {
545 /* For `S', prin1 the argument and then treat like 545 /* For `S', prin1 the argument and then treat like
546 a string. */ 546 a string. */