| #include "a.h" |
| |
| /* |
| * 14. Three-part titles. |
| */ |
| void |
| r_lt(int argc, Rune **argv) |
| { |
| Rune *p; |
| |
| if(argc < 2) |
| nr(L(".lt"), evalscale(L("6.5i"), 'm')); |
| else{ |
| if(argc > 2) |
| warn("too many arguments for .lt"); |
| p = argv[1]; |
| if(p[0] == '-') |
| nr(L(".lt"), getnr(L(".lt"))-evalscale(p+1, 'm')); |
| else if(p[0] == '+') |
| nr(L(".lt"), getnr(L(".lt"))+evalscale(p+1, 'm')); |
| else |
| nr(L(".lt"), evalscale(p, 'm')); |
| } |
| } |
| |
| void |
| t14init(void) |
| { |
| addreq(L("tl"), r_warn, -1); |
| addreq(L("pc"), r_nop, -1); /* page number char */ |
| addreq(L("lt"), r_lt, -1); |
| } |
| |
