Select Code to Download

#!/usr/bin/perl -w

...
void hello_inline( ) {
        printf( "Hello World. Best Regards from Inline\n" );
}

#!/usr/bin/perl

...
  serv_destroy(serv_list);
  return 1;
}

#!/usr/bin/perl -w

...
  serv_destroy(serv_list);
  Inline_Stack_Done;
}

#!/usr/bin/perl -w

...
  serv_destroy(serv_list);
  Inline_Stack_Done;
}

Benchmark: timing 500 iterations of inline, pure...
    inline:  3 wallclock secs ( 2.67 usr +  0.38 sys =  3.05 CPU) @ 16
+3.93/s (n=500)
...
Benchmark: timing 500 iterations of inline, pure...
    inline:  3 wallclock secs ( 2.63 usr +  0.41 sys =  3.04 CPU) @ 16
+4.47/s (n=500)
      pure:  8 wallclock secs ( 8.62 usr +  0.15 sys =  8.77 CPU) @ 57
+.01/s (n=500)