Return to tmac.p CVS log

Up to [CSRG BSD Unix] / 43BSDReno / share / doc / ps1 / 04.pascal

Annotation of 43BSDReno/share/doc/ps1/04.pascal/tmac.p, revision 1.1.1.1

1.1       root        1: 'so /usr/lib/tmac/tmac.s
                      2: .if t .tr \(rh-
                      3: .if t .tr *\(**=\(eq/\(sl+\(pl
                      4: .bd S B 3
                      5: .de SM
                      6: .if "\\$1"" .ps -2
                      7: .if !"\\$1"" \s-2\\$1\s0\\$2
                      8: ..
                      9: .de LG
                     10: .if "\\$1"" .ps +2
                     11: .if !"\\$1"" \s+2\\$a\s0\\$2
                     12: ..
                     13: .de HP
                     14: .nr pd \\n(PD
                     15: .nr PD 0
                     16: .if \\n(.$=0 .IP
                     17: .if \\n(.$=1 .IP "\\$1"
                     18: .if \\n(.$>=2 .IP "\\$1" "\\$2"
                     19: .nr PD \\n(pd
                     20: .rm pd
                     21: ..
                     22: .de LS         \"LS - Literal display, ASCII, constant spaced DS
                     23: .XD
                     24: .ID
                     25: .nf
                     26: .if t .tr '\'`\`^\(ua-\(mi
                     27: .if t .tr _\(ul
                     28: ..
                     29: .de LE         \"LE - End literal display
                     30: .DE
                     31: .tr ''``__--^^
                     32: ..
                     33: .de UP
                     34: Berkeley Pascal\\$1
                     35: ..
                     36: .de PD
                     37: \s-2PDP\s0
                     38: .if \\n(.$=0 11/70
                     39: .if \\n(.$>0 11/\\$1
                     40: ..
                     41: .de DK
                     42: Digital Equipment Corporation\\$1
                     43: ..
                     44: .de IN
                     45: .I
                     46: .if \\n(.$<2 \\$1 1.0 Implementation Notes
                     47: .if \\n(.$>=2 \\$1 1.0 Implementation Notes\\c
                     48: .R
                     49: .if \\n(.$>=2 \\$2
                     50: ..
                     51: .de UM
                     52: .I
                     53: User's Manual
                     54: .R
                     55: ..
                     56: .de PC
                     57: .I pc \\$1
                     58: ..
                     59: .de PI
                     60: .I pi \\$1
                     61: ..
                     62: .de XP
                     63: .I pxp \\$1
                     64: ..
                     65: .de IX
                     66: .I pix \\$1
                     67: ..
                     68: .de X
                     69: .I px \\$1
                     70: ..
                     71: .if n .ds dg +
                     72: .if t .ds dg \(dg
                     73: .if n .ds dd *
                     74: .if t .ds dd \(dd
                     75: .if n .nr FM 1.12i
                     76: .if t .ds b \\fB
                     77: .if n .ds b \\fI
                     78: .ds i \\fI
                     79: .nr xx 1

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.