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

##</code><code>##

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