d6
/
modal
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Print program left-over

This commit is contained in:
Devine Lu Linvega 2024-04-26 10:42:21 -07:00
parent 13359a79cd
commit 3167698795
1 changed files with 4 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/modal.c
View File

@ -117,19 +117,16 @@ apply_rule(Rule *r, char *s)
while((c = *a++)) {
if(c == '?') {
char *pcap = walk(s);
id = *a - '0';
id = *a++ - '0';
if((reg = regs[id])) { /* reg cmp */
char *rcap = walk(reg), *pp = s;
while(reg < rcap || pp < pcap)
if(*reg++ != *pp++) return 0;
} else /* reg set */
regs[id] = s;
c = *a++, s = pcap;
if(!spacer(c))
while((c = *a) && !spacer(c)) a++;
continue;
c = *a, s = pcap;
}
if(c != *s++) return 0;
else if(c != *s++) return 0;
}
c = *s;
if(!spacer(c)) return 0;
@ -266,5 +263,6 @@ main(int argc, char **argv)
if(!cycles--) return !fprintf(stdout, "Modal rewrites exceeded.\n");
while(rules_-- > rules && !quiet)
if(!rules_->refs) printf("-- Unused rule: %d <> (%s) (%s)\n", rules_->refs, rules_->a, rules_->b);
if(!quiet) printf(".. %s\n", src_);
return 0;
}