Revision as of 02:28, 26 November 2010 (view source) 79.36.200.116 (talk) (→‎{{header\|D}}) ← Older edit		Revision as of 08:09, 6 December 2010 (view source) 95.245.215.33 (talk) (→‎{{header\|D}}) Newer edit →
Line 202: string ctbf(string code) { string r ~~= "enum char empty = '\\0'~~; char[30_000] m = empty;▼ size_t i = 0;\n";▼ foreach (c; code) switch (c) { case '>': r ~= "i++; assert(i < m.length);\n"; break; case '<': r ~= "i--; assert(i >= 0);\n"; break; case '+': r ~= "m[i]++;\n"; break; case '-': r ~= "m[i]--;\n"; break; case '[': r ~= "while (m[i]) {\n"; break; case ']': r ~= "}\n"; break; case '.': r ~= "putchar(m[i]);\n"; break; case ',': ~~r ~= "int d = getc(stdin);~~ r ~= "int ~~if (~~d =~~= EOF)~~ ~~exit~~getc(1stdin); if (d == EOF) ~~tape[cell] = cast~~exit(~~char~~1)~~d;\n"~~; ▲ ~~size_t~~ i tape[cell] = 0cast(char)d;\n"; break; default: break; Line 226 ⟶ 225: void main() { enum char empty = '\0'; mixin(ctbf("++++++++++[>+++++++>++++++++++>+++>+<<<<-]▼ ▲ char[30_000] m = empty; >++.>+.+++++++..+++.>++.<<+++++++++++++++.>.+++.------.--------.>+.>."));▼ size_t i; ▲ mixin(ctbf("++++++++++[>+++++++>++++++++++>+++>+<<<<-] ▲ >++.>+.+++++++..+++.>++.<<+++++++++++++++.>.+++.------.--------.>+.>.")); }</lang>

Execute Brain**** (view source)