-/* $Id: out.c,v 1.25 2010/08/24 12:18:49 kristaps Exp $ */
+/* $Id: out.c,v 1.28 2010/08/24 13:56:51 kristaps Exp $ */
/*
* Copyright (c) 2009, 2010 Kristaps Dzonsons <kristaps@bsd.lv>
*
break;
}
break;
+ case ('k'):
+ /* FALLTHROUGH */
case ('M'):
/* FALLTHROUGH */
case ('m'):
i++;
}
+ /* Handle embedded numerical subexp or escape. */
+
+ if ('(' == wp[i]) {
+ while (wp[i] && ')' != wp[i])
+ if ('\\' == wp[i++]) {
+ /* Handle embedded escape. */
+ *word = &wp[i];
+ i += a2roffdeco(&dd, word, sz);
+ }
+
+ if (')' == wp[i++])
+ break;
+
+ *d = DECO_NONE;
+ return(i - 1);
+ } else if ('\\' == wp[i]) {
+ *word = &wp[++i];
+ i += a2roffdeco(&dd, word, sz);
+ }
+
break;
case ('['):
*d = DECO_SPECIAL;
} else
lim = 1;
break;
+ case ('w'):
+ if ('\'' == wp[i++]) {
+ term = '\'';
+ break;
+ }
+ /* FALLTHROUGH */
default:
*d = DECO_SSPECIAL;
i--;