X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=listing.c;h=bbe24054af5b85904a82177e4b902a754f6a6c90;hp=68d6c6f42141ad952bb4d841e94c8eb2693d3b52;hb=5f23454f7155f0c77ea1bede3f9e60b39da99fa8;hpb=052be802baa4836564801c780b1d432cfe17c576 diff --git a/listing.c b/listing.c index 68d6c6f..bbe2405 100644 --- a/listing.c +++ b/listing.c @@ -14,11 +14,11 @@ // nnnnn =vvvvvvvv #include "listing.h" -#include "version.h" -#include "token.h" +#include "error.h" #include "procln.h" #include "sect.h" -#include "error.h" +#include "token.h" +#include "version.h" char * list_fname; // Listing filename uint8_t subttl[TITLESIZ]; // Current subtitle @@ -217,26 +217,29 @@ void ship_ln(const char * ln) if (listing <= 0) return; - // Notice bottom of page - if (nlines >= pagelen - BOT_MAR) - eject(); - - // Print title, boilerplate, and subtitle at top of page - if (nlines == 0) + if (list_pag) { - pageno++; - println(""); - date_string(datestr, dos_date()); - time_string(timestr, dos_time()); - sprintf(buf, - "%-40s%-20s Page %-4d %s %s RMAC %01i.%01i.%02i (%s)", - title, curfname, pageno, timestr, datestr, MAJOR, MINOR, PATCH, - PLATFORM); - println(buf); - sprintf(buf, "%s", subttl); - println(buf); - println(""); - nlines = 4; + // Notice bottom of page + if (nlines >= pagelen - BOT_MAR) + eject(); + + // Print title, boilerplate, and subtitle at top of page + if (nlines == 0) + { + pageno++; + println(""); + date_string(datestr, dos_date()); + time_string(timestr, dos_time()); + sprintf(buf, + "%-40s%-20s Page %-4d %s %s RMAC %01i.%01i.%02i (%s)", + title, curfname, pageno, timestr, datestr, MAJOR, MINOR, PATCH, + PLATFORM); + println(buf); + sprintf(buf, "%s", subttl); + println(buf); + println(""); + nlines = 4; + } } println(ln); @@ -249,8 +252,6 @@ void ship_ln(const char * ln) // void InitListing(void) { - extern VALUE dos_date(), dos_time(); - subflag = 0; pageno = 0; nlines = 0;