The only think i can say, if you are speaking about odometer, is that the example in High Order perl does contains only plain Perl (if you want to translate it to C).

sub increment_odometer {
   my @odometer = @_;
   my $wheel = $#odometer; # start at rightmost wheel
   until ($odometer[$wheel] < 9 || $wheel < 0) {
      $odometer[$wheel] = 0;
      $wheel--; # next wheel to the left
   }
   if ($wheel < 0) {
   return; # fell off the left end; no more sequences
   } 
   else {
         $odometer[$wheel]++; # this wheel now turns one notch
         return @odometer;
   }
}
[download]

.. just in case you missed this.
L*