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

1.1     ! root        1: case $# in
        !             2: 0)     echo 'nmakefont 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: # read width file to get char number and width
        !            17: FILENAME != "proto" && $1 ~ /^C[0-9][0-9][0-9]/ {
        !            18:        if ($2 > 100)
        !            19:                $2 = substr($2,1,2)
        !            20:        w[0+substr($1,2)] = $2
        !            21: }
        !            22: 
        !            23: # read proto file to get char name, number
        !            24: FILENAME == "proto" && $2 ~ /^[0123]$/ && NF == 3 {
        !            25:        print $1, w[$3], $2, $3
        !            26:        if ($1 == "hy")
        !            27:                print "-        \"      =hy"
        !            28: } ' $arch proto >>$1

unix.superglobalmegacorp.com

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