Subversion Repositories wimsdev

Rev

Rev 8850 | Rev 8882 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 8850 Rev 8859
Line 122... Line 122...
122
          }
122
          }
123
/* if */
123
/* if */
124
          if(strncmp(p+1,"if",strlen("if"))==0 && *find_word_start(p+strlen("if")+1)=='{') {
124
          if(strncmp(p+1,"if",strlen("if"))==0 && *find_word_start(p+strlen("if")+1)=='{') {
125
            char *pt;
125
            char *pt;
126
            *p=0; fprintf(outf,"%s",ps); p++; ps=p;
126
            *p=0; fprintf(outf,"%s",ps); p++; ps=p;
127
            pt=exec_if(p+2); if(pt>p+2) {p=pt-1;ps=pt;}
127
            pt=exec_if(p+2); if(pt>p+strlen("if")) {p=pt-1;ps=pt;}
128
            continue;
128
            continue;
129
          }
129
          }
130
/* ifval */
130
/* ifval */
131
          if(strncmp(p+1,"ifval",strlen("ifval"))==0 && *find_word_start(p+strlen("ifval")+1)=='{') {
131
          if(strncmp(p+1,"ifval",strlen("ifval"))==0 && *find_word_start(p+strlen("ifval")+1)=='{') {
132
            char *pt;
132
            char *pt;
Line 143... Line 143...
143
            if(pp2) pe2=find_matching(pp2+1,'}'); else continue;
143
            if(pp2) pe2=find_matching(pp2+1,'}'); else continue;
144
            if(pe2 && *pp2=='{' && *pe2=='}') {
144
            if(pe2 && *pp2=='{' && *pe2=='}') {
145
                pp++; pp2++; *p=*pe=*pe2=0;
145
                pp++; pp2++; *p=*pe=*pe2=0;
146
                fprintf(outf,"%s \n\
146
                fprintf(outf,"%s \n\
147
!read oef/canvasdraw.phtml %s \\\n%s \n$()", ps,pp,pp2);
147
!read oef/canvasdraw.phtml %s \\\n%s \n$()", ps,pp,pp2);
148
                ps=p=pe2; ps++;
148
                ps=p=pe2; ps++; continue;
149
            }
149
            }
150
          }
150
          }
151
 
151
 
152
/* draw */
152
/* draw */
153
          if(strncmp(p+1,"draw",strlen("draw"))==0 && *find_word_start(p+strlen("draw")+1)=='{') {
153
          if(strncmp(p+1,"draw",strlen("draw"))==0 && *find_word_start(p+strlen("draw")+1)=='{') {
Line 215... Line 215...
215
!read oef/embed.phtml %s \n$()", ps,pp);
215
!read oef/embed.phtml %s \n$()", ps,pp);
216
                ps=p=pe; ps++; embedcnt++; continue;
216
                ps=p=pe; ps++; embedcnt++; continue;
217
            }
217
            }
218
          }
218
          }
219
/* special */
219
/* special */
220
          if(strncmp(p+1,"special",strlen("special"))==0 && *find_word_start(p+strlen("special"))=='{') {
220
          if(strncmp(p+1,"special",strlen("special"))==0 && *find_word_start(p+strlen("special")+1)=='{') {
221
            pe=pp2=pe2="";
221
            pe=pp2=pe2="";
222
            pp=find_word_start(p+strlen("special")+1);
222
            pp=find_word_start(p+strlen("special")+1);
223
            if(*pp) pe=find_matching(pp+1,'}');
223
            if(*pp) pe=find_matching(pp+1,'}');
224
            if(pe && *pp=='{' && *pe=='}') {
224
            if(pe && *pp=='{' && *pe=='}') {
225
                pp++; *p=*pe=0;
225
                pp++; *p=*pe=0;