Ejection simplified by bk1e

char s[99],*t,*u;main(l){for(;gets(s);puts(s))if(l=strlen(s),strpbrk(s," R")){for(t=s+1,u=s+l;(t-s+1)<l;++t)if(*t!=32)*u++=*t,*t=32;*u=0;}}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page