e5c1a12011-04-07Arne Goedeke #pike __REAL_VERSION__ inherit Tools.Shoot.Test; constant name="call_out handling";
75c9d12013-08-16Per Hedbor constant m = 5000; /* the target size of the mapping */
e5c1a12011-04-07Arne Goedeke 
dbc45c2018-02-15Henrik Grubbström (Grubba) array(function) funs = ({ write, werror, file_stat, Stdio.cp, Array.uniq, master()->compile_error, Stdio.stdin->read, Stdio.stdout->write });
e5c1a12011-04-07Arne Goedeke 
75c9d12013-08-16Per Hedbor int perform()
e5c1a12011-04-07Arne Goedeke { for (int i=0; i<m; i++) { call_out(funs[i & 7], m+(i*((i&1)*2 - 1))); } for (int i = 0; i<m; i++) { find_call_out(funs[i&7]); } for (int i = 0; i<m; i++) { remove_call_out(funs[i&7]); }
75c9d12013-08-16Per Hedbor  return m*3;
e5c1a12011-04-07Arne Goedeke }