sys/src/cmd/htmlroff/t14.c

   1 #include "a.h"
   2
   3 /*
   4  * 14. Three-part titles.
   5  */
   6 void
   7 r_lt(int argc, Rune **argv)
   8 {
   9         Rune *p;
  10
  11         if(argc < 2)
  12                 nr(L(".lt"), evalscale(L("6.5i"), 'm'));
  13         else{
  14                 if(argc > 2)
  15                         warn("too many arguments for .lt");
  16                 p = argv[1];
  17                 if(p[0] == '-')
  18                         nr(L(".lt"), getnr(L(".lt"))-evalscale(p+1, 'm'));
  19                 else if(p[0] == '+')
  20                         nr(L(".lt"), getnr(L(".lt"))+evalscale(p+1, 'm'));
  21                 else
  22                         nr(L(".lt"), evalscale(p, 'm'));
  23         }
  24 }
  25
  26 void
  27 t14init(void)
  28 {
  29         addreq(L("tl"), r_warn, -1);
  30         addreq(L("pc"), r_nop, -1);     /* page number char */
  31         addreq(L("lt"), r_lt, -1);
  32 }
  33