Mercurial > dropbear

comparison booker.pl @ 386:97db060d0ef5 libtommath-orig libtommath-0.40

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Update to LibTomMath 0.40
author Matt Johnston <matt@ucc.asn.au>
date Thu, 11 Jan 2007 03:11:15 +0000
parents 91fbc376f010
children
comparison
equal deleted inserted replaced
282:91fbc376f010 386:97db060d0ef5
80 80
81 if ($skipheader == 1) { 81 if ($skipheader == 1) {
82 # scan till next end of comment, e.g. skip license 82 # scan till next end of comment, e.g. skip license
83 while (<SRC>) { 83 while (<SRC>) {
84 $text[$line++] = $_; 84 $text[$line++] = $_;
85 last if ($_ =~ /math\.libtomcrypt\.org/); 85 last if ($_ =~ /math\.libtomcrypt\.com/);
86 } 86 }
87 <SRC>; 87 <SRC>;
88 } 88 }
89 89
90 $inline = 0; 90 $inline = 0;
91 while (<SRC>) { 91 while (<SRC>) {
92 next if ($_ =~ /\$Source/);
93 next if ($_ =~ /\$Revision/);
94 next if ($_ =~ /\$Date/);
92 $text[$line++] = $_; 95 $text[$line++] = $_;
93 ++$inline; 96 ++$inline;
94 chomp($_); 97 chomp($_);
95 $_ =~ s/\t/" "/ge; 98 $_ =~ s/\t/" "/ge;
96 $_ =~ s/{/"^{"/ge; 99 $_ =~ s/{/"^{"/ge;
216 $str = "chapter seven"; 219 $str = "chapter seven";
217 } elsif ($a == 8) { 220 } elsif ($a == 8) {
218 $str = "chapter eight"; 221 $str = "chapter eight";
219 } elsif ($a == 9) { 222 } elsif ($a == 9) {
220 $str = "chapter nine"; 223 $str = "chapter nine";
221 } elsif ($a == 2) { 224 } elsif ($a == 10) {
222 $str = "chapter ten"; 225 $str = "chapter ten";
223 } 226 }
224 } else { 227 } else {
225 $str = "chapter " . $str; 228 $str = "chapter " . $str;
226 } 229 }