Name: Anonymous 2011-02-12 6:10
Fibonacci in Perl6.
Can your toy language do this?
my @fib := (0, 1, *+* ... *);Can your toy language do this?
my @fib := (0, 1, *+* ... *);#include <stdio.h>
int main(void) {
struct num{ unsigned int a:3, b:3, c:2; } n = {0};
unsigned char *c = &n;
do do printf("%hhu\n", *c);
while(!(n.a-- && !++n.b));
while(++n.c);
return 0;
}