Select Code to Download

sub rev ($) {
    $_ = shift;
...
#    print "in swap: $_\n";
    return $_;
}

sub rev ($) {
    $_ = shift;
...
#    print "in rev: $_\n";
    return $_;
}