Rev 17221 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 17221 | Rev 17864 | ||
---|---|---|---|
Line 154... | Line 154... | ||
154 | p++; fputs("\n<br>\n",outf); |
154 | p++; fputs("\n<br>\n",outf); |
155 | while(*(p+1)=='\n') p++; |
155 | while(*(p+1)=='\n') p++; |
156 | if(*(p+1)=='>') goto pre; |
156 | if(*(p+1)=='>') goto pre; |
157 | break; |
157 | break; |
158 | } |
158 | } |
159 | - | ||
160 | case '<': { |
159 | case '<': { |
161 | char *p2; |
160 | char *p2; |
162 | if(tend>p || (!isalpha(*(p+1)) && *(p+1)!='!')) { |
161 | if(tend>p || (!isalpha(*(p+1)) && *(p+1)!='!')) { |
163 | fputc(*p,outf); break; |
162 | fputc(*p,outf); break; |
164 | } |
163 | } |
Line 167... | Line 166... | ||
167 | tend=p2; |
166 | tend=p2; |
168 | fputc(*p, outf); break; |
167 | fputc(*p, outf); break; |
169 | } |
168 | } |
170 | /* interpretation of variables */ |
169 | /* interpretation of variables */ |
171 | case '\\': { |
170 | case '\\': { |
172 | char *pe; |
171 | char *pe; |
173 | p++; |
172 | p++; |
174 | if(isalpha(*p)) { |
173 | if(isalpha(*p)) { |
175 |
|
174 | if(primcnt>0) { |
176 |
|
175 | pe=doccheck(p); |
177 |
|
176 | if(pe>p) {p=pe-1; break;} |
178 |
|
177 | } |
179 |
|
178 | for(pe=p;isalnum(*pe) || *pe=='_';pe++); |
180 |
|
179 | if(*pe=='[') { |
181 |
|
180 | char *pv=find_matching(pe+1,']'); |
182 |
|
181 | if(pv!=NULL) { |
183 |
|
182 | char c=*p; |
184 |
|
183 | memmove(p,p+1,pv-p); *pv=')'; |
185 |
|
184 | fprintf(outf,"$(m_%c",c); p--; break; |
186 |
|
185 | } |
187 |
|
186 | } |
188 |
|
187 | fprintf(outf,"$m_%c",*p); break; |
189 | } |
188 | } |
190 | switch(*p) { |
189 | switch(*p) { |
191 | case '\\': fputc(*p,outf); break; |
190 | case '\\': fputc(*p,outf); break; |
192 | case '{': |
191 | case '{': |
193 | case '(': { |
192 | case '(': { |