Return to specmakefont CVS log

Up to [Research Unix] / researchv10no / cmd / troff / dev202

Annotation of researchv10no/cmd/troff/dev202/specmakefont, revision 1.1

1.1     ! root        1: case $# in
        !             2: 0)     echo 'specmakefont widthfile Name internal# ...'; exit ;;
        !             3: esac
        !             4: 
        !             5: arch=$1
        !             6: shift
        !             7: 
        !             8: echo "# $*
        !             9: name $1
        !            10: internalname $2" >$1
        !            11: awk '
        !            12: BEGIN {
        !            13:        OFS = " "
        !            14:        print "charset"
        !            15: }
        !            16: 
        !            17: # read width file to get char number and width
        !            18: # output is 
        !            19: #      --- width 0 number
        !            20: 
        !            21: $1 ~ /^C[0-9][0-9][0-9]/ {
        !            22:        if ($2 > 100)
        !            23:                $2 = substr($2,1,2)
        !            24:        n = substr($1,2) + 0
        !            25:        print "---", $2, 0, n
        !            26: } ' $arch >>$1

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