Edit

kc3-lang/libtommath/parsenames.pl

Branch :

  • Show log

    Commit

  • Author : Steffen Jaeckel
    Date : 2014-10-13 15:49:02
    Hash : 4f2db5fa
    Message : add "updatemakes" from libtomcrypt

  • parsenames.pl
  • #!/usr/bin/perl
    #
    # Splits the list of files and outputs for makefile type files
    # wrapped at 80 chars
    #
    # Tom St Denis
    @a = split(" ", $ARGV[1]);
    $b = "$ARGV[0]=";
    $len = length($b);
    print $b;
    foreach my $obj (@a) {
       $len = $len + length($obj);
       $obj =~ s/\*/\$/;
       if ($len > 100) {
          printf "\\\n";
          $len = length($obj);
       }
       print "$obj ";
    }
    
    print "\n\n";
    
    # $Source$
    # $Revision$
    # $Date$