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

Do not walk twice for explode

This commit is contained in:
Devine Lu Linvega 2024-04-13 16:22:37 -07:00
parent 70e96e9644
commit 42fd486a41
1 changed files with 2 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
src/modal.c
View File

@ -47,16 +47,14 @@ put_reg(char r)
{ {
char c, *s = regs[(int)r]; char c, *s = regs[(int)r];
if(r == '~') { if(r == '~') {
char buf;
/* special stdin */ /* special stdin */
while(fread(&buf, 1, 1, stdin) && buf >= ' ') while(fread(&c, 1, 1, stdin) && c >= ' ')
*outp_++ = buf; *outp_++ = c;
} else if(s) { } else if(s) {
char *ss = walk(s); char *ss = walk(s);
if(r == '*') { if(r == '*') {
/* special implode */ /* special implode */
if(*s == '(') { if(*s == '(') {
ss = walk(s);
while(s < ss && (c = *s++)) while(s < ss && (c = *s++))
if(!spacer(c)) *outp_++ = c; if(!spacer(c)) *outp_++ = c;
} }