Mercurial > dropbear
comparison parsenames.pl @ 191:1c15b283127b libtomcrypt-orig
Import of libtomcrypt 1.02 with manual path rename rearrangement etc
author | Matt Johnston <matt@ucc.asn.au> |
---|---|
date | Fri, 06 May 2005 13:23:02 +0000 |
parents | |
children | 39d5d58461d6 |
comparison
equal
deleted
inserted
replaced
143:5d99163f7e32 | 191:1c15b283127b |
---|---|
1 #!/usr/bin/perl | |
2 # | |
3 # Splits the list of files and outputs for makefile type files | |
4 # wrapped at 80 chars | |
5 # | |
6 # Tom St Denis | |
7 @a = split(" ", $ARGV[1]); | |
8 $b = "$ARGV[0]="; | |
9 $len = length($b); | |
10 print $b; | |
11 foreach my $obj (@a) { | |
12 $len = $len + length($obj); | |
13 $obj =~ s/\*/\$/; | |
14 if ($len > 100) { | |
15 printf "\\\n"; | |
16 $len = length($obj); | |
17 } | |
18 print "$obj "; | |
19 } | |
20 if ($ARGV[0] eq "HEADERS") { print "testprof/tomcrypt_test.h"; } | |
21 | |
22 print "\n\n"; |