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

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.