I tried to factorize somewhat the previous expression (Cf http://debbugs.gnu.org/cgi/bugreport.cgi?bug=13088)
and hit a bug in compiler: first it runs for a very long time then throw:

;;; ERROR: In procedure instruction-length: Wrong type argument in position 1 (expecting INSTRUCTION_P): ((long-local-set 1 0))

Attached is the program that triggers this behavior.