ttf.c - plan9port - [fork] Plan 9 from user space
  HTML git clone git://src.adamsgaard.dk/plan9port
   DIR Log
   DIR Files
   DIR Refs
   DIR README
   DIR LICENSE
       ---
       ttf.c (1281B)
       ---
            1 /* tf.c: save and restore fill mode around table */
            2 # include "t.h"
            3 
            4 void
            5 savefill(void)
            6 {
            7                         /* remembers various things: fill mode, vs, ps in mac 35 (SF) */
            8         Bprint(&tabout, ".de %d\n", SF);
            9         Bprint(&tabout, ".ps \\n(.s\n");
           10         Bprint(&tabout, ".vs \\n(.vu\n");
           11         Bprint(&tabout, ".in \\n(.iu\n");
           12         Bprint(&tabout, ".if \\n(.u .fi\n");
           13         Bprint(&tabout, ".if \\n(.j .ad\n");
           14         Bprint(&tabout, ".if \\n(.j=0 .na\n");
           15         Bprint(&tabout, "..\n");
           16         Bprint(&tabout, ".nf\n");
           17         /* set obx offset if useful */
           18         Bprint(&tabout, ".nr #~ 0\n");
           19         Bprint(&tabout, ".if \\n(.T .if n .nr #~ 0.6n\n");
           20 }
           21 
           22 
           23 void
           24 rstofill(void)
           25 {
           26         Bprint(&tabout, ".%d\n", SF);
           27 }
           28 
           29 
           30 void
           31 endoff(void)
           32 {
           33         int        i;
           34 
           35         for (i = 0; i < MAXHEAD; i++)
           36                 if (linestop[i])
           37                         Bprint(&tabout, ".nr #%c 0\n", linestop[i] + 'a' - 1);
           38         for (i = 0; i < texct; i++)
           39                 Bprint(&tabout, ".rm %c+\n", texstr[i]);
           40         Bprint(&tabout, "%s\n", last);
           41 }
           42 
           43 
           44 void
           45 ifdivert(void)
           46 {
           47         Bprint(&tabout, ".ds #d .d\n");
           48         Bprint(&tabout, ".if \\(ts\\n(.z\\(ts\\(ts .ds #d nl\n");
           49 }
           50 
           51 
           52 void
           53 saveline(void)
           54 {
           55         Bprint(&tabout, ".if \\n+(b.=1 .nr d. \\n(.c-\\n(c.-1\n");
           56         linstart = iline;
           57 }
           58 
           59 
           60 void
           61 restline(void)
           62 {
           63         Bprint(&tabout, ".if \\n-(b.=0 .nr c. \\n(.c-\\n(d.-%d\n", iline - linstart);
           64         linstart = 0;
           65 }
           66 
           67 
           68 void
           69 cleanfc(void)
           70 {
           71         Bprint(&tabout, ".fc\n");
           72 }