From a768850525ad1c54904d6b702abb13e0cb727376 Mon Sep 17 00:00:00 2001
From: Steffen Jaeckel <s@jaeckel.eu>
Date: Mon, 18 Dec 2017 23:37:01 +0100
Subject: [PATCH] improve generated output

---
 bn_mp_clear_multi.c |  1 +
 bn_mp_init_multi.c  |  1 +
 bn_prime_tab.c      |  1 +
 bn_s_mp_exptmod.c   |  1 +
 doc/booker.pl       | 21 ++++++++++++++++++---
 5 files changed, 22 insertions(+), 3 deletions(-)

diff --git a/bn_mp_clear_multi.c b/bn_mp_clear_multi.c
index 284fab8..ac3949a 100644
--- a/bn_mp_clear_multi.c
+++ b/bn_mp_clear_multi.c
@@ -14,6 +14,7 @@
  *
  * Tom St Denis, tstdenis82@gmail.com, http://libtom.org
  */
+
 #include <stdarg.h>
 
 void mp_clear_multi(mp_int *mp, ...)
diff --git a/bn_mp_init_multi.c b/bn_mp_init_multi.c
index 0da7803..9ed777c 100644
--- a/bn_mp_init_multi.c
+++ b/bn_mp_init_multi.c
@@ -14,6 +14,7 @@
  *
  * Tom St Denis, tstdenis82@gmail.com, http://libtom.org
  */
+
 #include <stdarg.h>
 
 int mp_init_multi(mp_int *mp, ...)
diff --git a/bn_prime_tab.c b/bn_prime_tab.c
index c8fadcd..bcd23ed 100644
--- a/bn_prime_tab.c
+++ b/bn_prime_tab.c
@@ -14,6 +14,7 @@
  *
  * Tom St Denis, tstdenis82@gmail.com, http://libtom.org
  */
+
 const mp_digit ltm_prime_tab[] = {
    0x0002, 0x0003, 0x0005, 0x0007, 0x000B, 0x000D, 0x0011, 0x0013,
    0x0017, 0x001D, 0x001F, 0x0025, 0x0029, 0x002B, 0x002F, 0x0035,
diff --git a/bn_s_mp_exptmod.c b/bn_s_mp_exptmod.c
index 46e50df..a954757 100644
--- a/bn_s_mp_exptmod.c
+++ b/bn_s_mp_exptmod.c
@@ -14,6 +14,7 @@
  *
  * Tom St Denis, tstdenis82@gmail.com, http://libtom.org
  */
+
 #ifdef MP_LOW_MEM
 #   define TAB_SIZE 32
 #else
diff --git a/doc/booker.pl b/doc/booker.pl
index c2aa43f..2b295f9 100644
--- a/doc/booker.pl
+++ b/doc/booker.pl
@@ -92,17 +92,32 @@ while (<$in>) {
       if ($skipheader == 1) {
          # scan till next end of comment, e.g. skip license
          while (<$src>) {
+            if ($_ =~ /#ifdef BN/) {
+               printf {$out} ("%03d   ", $line);
+               for ($x = 0; $x < length($_); $x++) {
+                   print {$out} chr(vec($_, $x, 8));
+                   if ($x == 75) {
+                       print {$out} "\n      ";
+                       ++$wroteline;
+                   }
+               }
+               print {$out} "...\n";
+               ++$wroteline;
+            }
             $text[$line++] = $_;
             last if ($_ =~ /libtom\.org/);
          }
          <$src>;
+         $text[$line++] = $_;
+         <$src>;
+         $text[$line++] = $_;
       }
 
       my $inline = 0;
       while (<$src>) {
-      next if ($_ =~ /\$Source/);
-      next if ($_ =~ /\$Revision/);
-      next if ($_ =~ /\$Date/);
+      next if ($_ =~ /ref/);
+      next if ($_ =~ /git commit/);
+      next if ($_ =~ /commit time/);
          $text[$line++] = $_;
          ++$inline;
          chomp($_);