Return to MKcaptab.awk CVS log

Up to [MW Coherent from dump] / coherent / g / usr / lib / ncurses

Annotation of coherent/g/usr/lib/ncurses/MKcaptab.awk, revision 1.1

1.1     ! root        1: #*********************************************************************
        !             2: #                         COPYRIGHT NOTICE                           *
        !             3: #*********************************************************************
        !             4: #        This software is copyright (C) 1982 by Pavel Curtis         *
        !             5: #                                                                    *
        !             6: #        Permission is granted to reproduce and distribute           *
        !             7: #        this file by any means so long as no fee is charged         *
        !             8: #        above a nominal handling fee and so long as this            *
        !             9: #        notice is always included in the copies.                    *
        !            10: #                                                                    *
        !            11: #        Other rights are reserved except as explicitly granted      *
        !            12: #        by written permission of the author.                        *
        !            13: #                Pavel Curtis                                        *
        !            14: #                Computer Science Dept.                              *
        !            15: #                405 Upson Hall                                      *
        !            16: #                Cornell University                                  *
        !            17: #                Ithaca, NY 14853                                    *
        !            18: #                                                                    *
        !            19: #                Ph- (607) 256-4934                                  *
        !            20: #                                                                    *
        !            21: #                Pavel.Cornell@Udel-Relay   (ARPAnet)                *
        !            22: #                decvax!cornell!pavel       (UUCPnet)                *
        !            23: #********************************************************************/
        !            24: 
        !            25: #
        !            26: #  $Header: /src386/usr/lib/ncurses/RCS/MKcaptab.awk,v 1.1 92/03/26 11:44:26 bin Exp Locker: bin $
        !            27: #
        !            28: 
        !            29: 
        !            30: BEGIN  {
        !            31:            print  "/*"
        !            32:            print  " *  comp_captab.c -- The names of the capabilities in a form ready for"
        !            33:            print  " *                   the making of a hash table for the compiler."
        !            34:            print  " *"
        !            35:            print  " */"
        !            36:            print  ""
        !            37:            print  ""
        !            38:            print  "#include \"compiler.h\""
        !            39:            print  "#include \"term.h\""
        !            40:            print  ""
        !            41:            print  ""
        !            42:            print  "struct name_table_entry     cap_table[] ="
        !            43:            print  "{"
        !            44:        }
        !            45: 
        !            46: 
        !            47: $4 == "bool"   {
        !            48:                    printf "\t0,%15s,\tBOOLEAN,\t%3d,\n", $2, BoolCount++
        !            49:                }
        !            50: 
        !            51: 
        !            52: $4 == "number" {
        !            53:                    printf "\t0,%15s,\tNUMBER,\t\t%3d,\n", $2, NumCount++
        !            54:                }
        !            55: 
        !            56: 
        !            57: $4 == "str"    {
        !            58:                    printf "\t0,%15s,\tSTRING,\t\t%3d,\n", $2, StrCount++
        !            59:                }
        !            60: 
        !            61: 
        !            62: END    {
        !            63:            print  "};"
        !            64:            print  ""
        !            65:            printf "struct name_table_entry *cap_hash_table[%d];\n",(BoolCount + NumCount + StrCount) * 2
        !            66:            print  ""
        !            67:            printf "int Hashtabsize = %d;\n",(BoolCount + NumCount + StrCount) * 2
        !            68:            printf "int Captabsize = %d;\n", BoolCount + NumCount + StrCount
        !            69:            print  ""
        !            70:            print  ""
        !            71:            printf "#if (BOOLCOUNT!=%d)||(NUMCOUNT!=%d)||(STRCOUNT!=%d)\n",BoolCount, NumCount, StrCount
        !            72:            print  "    --> term.h and comp_captab.c disagree about the <--"
        !            73:            print  "    --> numbers of booleans, numbers and/or strings <--"
        !            74:            print  "#endif"
        !            75:        }

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