Mercurial > repo

view letersort @ 6223:fb412a31386c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
<tswett> echo \'words ${1---eng-1M --esolangs 20} | sed -re \'\\\'\'s/( |$)/lang\\1/g\'\\\' > bin/langs
author HackBot
date Thu, 19 Nov 2015 01:51:15 +0000
parents a5ef8d072826
children
line wrap: on
line source

#include <stdio.h>
int compare(char *s,char *c){return*c-*s;}int main(){char w[40];int c,i=0;while(
1){c=getchar();if(c<=32||c==EOF){qsort(w,i,1,compare);w[i]=0;printf("%s",w);if(c
==EOF)break;putchar(c);i=0;}else{w[i++]=c;}}}