Select Code to Download

/* macros to define bit-fields in structs. */
#ifndef PERL_BITFIELD8
...
#ifndef PERL_BITFIELD32
#  define PERL_BITFIELD32 unsigned
#endif

timethese (30, {
'list' => '$list = sum_as_list(@x);',
'ref'  => '$ref  = sum_as_ref(\@x);',
});