// no output: the point of this test is not to crash or mishandle memory ftab = mktab(); @define fn(val) { if(ftab[val] == nil) ftab[0] = 1; else error("re-finalized %a\n", val); }; for(i = 0; i < 100000; i++){ finalize(i, fn); }