formatter support display syntax (~a)

This commit is contained in:
Yuichi Nishiwaki 2014-03-04 00:32:55 +09:00
parent 4bf2262605
commit 6fbfd15011
1 changed files with 4 additions and 1 deletions

View File

@ -188,8 +188,11 @@ pic_vfformat(pic_state *pic, xFILE *file, const char *fmt, va_list ap)
case '%':
xfputc('\n', file);
break;
case 'a':
irrs = pic_cons(pic, pic_fdisplay(pic, va_arg(ap, pic_value), file), irrs);
break;
case 's':
irrs = pic_cons(pic, pic_fdebug(pic, va_arg(ap, pic_value), file), irrs);
irrs = pic_cons(pic, pic_fwrite(pic, va_arg(ap, pic_value), file), irrs);
break;
}
break;