iris/panic.ccp

#pypp 0
#include "kernel.hh"

void panic (unsigned n, char const *message):
	while (1):
		for unsigned bit = 0x80000000; bit; bit >>= 1:
			for int i = 0; i < 600000; ++i:
				led (n & bit, i > 200000 && i < 400000, false)
		for int i = 0; i < 1000000; ++i:
			led (false, false, true)