Mercurial > dropbear

comparison libtommath/gen.pl @ 293:9d110777f345 contrib-blacklist

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
propagate from branch 'au.asn.ucc.matt.dropbear' (head 7ad1775ed65e75dbece27fe6b65bf1a234db386a) to branch 'au.asn.ucc.matt.dropbear.contrib.blacklist' (head 1d86a4f0a401cc68c2670d821a2f6366c37af143)
author Matt Johnston <matt@ucc.asn.au>
date Fri, 10 Mar 2006 06:31:29 +0000
parents eed26cff980b
children 60fc6476e044
comparison
equal deleted inserted replaced
247:c07de41b53d7 293:9d110777f345
1 #!/usr/bin/perl -w
2 #
3 # Generates a "single file" you can use to quickly
4 # add the whole source without any makefile troubles
5 #
6 use strict;
7
8 open( OUT, ">mpi.c" ) or die "Couldn't open mpi.c for writing: $!";
9 foreach my $filename (glob "bn*.c") {
10 open( SRC, "<$filename" ) or die "Couldn't open $filename for reading: $!";
11 print OUT "/* Start: $filename */\n";
12 print OUT while <SRC>;
13 print OUT "\n/* End: $filename */\n\n";
14 close SRC or die "Error closing $filename after reading: $!";
15 }
16 print OUT "\n/* EOF */\n";
17 close OUT or die "Error closing mpi.c after writing: $!";