![[BACK]](/icons/back.gif){kind=icon}
Return to eval.c CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [local] / src / usr.bin / m4|
Return to eval.c CVS log | Up to [local] / src / usr.bin / m4 |
| version 1.35, 2001/09/18 14:55:52 | version 1.36, 2001/09/19 13:14:18 | ||
|---|---|---|---|
|
|
||
| p--; /* last character of defn */ | p--; /* last character of defn */ | ||
| while (p > t) { | while (p > t) { | ||
| if (*(p - 1) != ARGFLAG) | if (*(p - 1) != ARGFLAG) | ||
| putback(*p); | PUTBACK(*p); | ||
| else { | else { | ||
| switch (*p) { | switch (*p) { | ||
|
|
||
| pbstr(lquote); | pbstr(lquote); | ||
| break; | break; | ||
| default: | default: | ||
| putback(*p); | PUTBACK(*p); | ||
| putback('$'); | PUTBACK('$'); | ||
| break; | break; | ||
| } | } | ||
| p--; | p--; | ||
|
|
||
| p--; | p--; | ||
| } | } | ||
| if (p == t) /* do last character */ | if (p == t) /* do last character */ | ||
| putback(*p); | PUTBACK(*p); | ||
| } | } | ||
| /* | /* |