Annotation of researchv10dc/630/bin/dmdmemory, revision 1.1

1.1     ! root        1: #       Copyright (c) 1987 AT&T   
        !             2: #       All Rights Reserved       
        !             3: 
        !             4: #       THIS IS UNPUBLISHED PROPRIETARY SOURCE CODE OF AT&T   
        !             5: #       The copyright notice above does not evidence any     
        !             6: #       actual or intended publication of such source code.  
        !             7: 
        !             8: # @(#)dmdmemory.sh     1.1.1.3 (6/2/87)
        !             9: 
        !            10: USAGE="Usage: dmdmemory [-c]\n"
        !            11: cval=""
        !            12: 
        !            13: #
        !            14: # Layers environment
        !            15: #
        !            16: if ismpx -
        !            17: then
        !            18: 
        !            19: #
        !            20: # SVR2: use getopt(1)
        !            21: # SVR3: use getopts(1)
        !            22: #
        !            23: 
        !            24: #   if [ # getopts exists ]
        !            25: #   then
        !            26: #      while getopts c c
        !            27: #      do
        !            28: #              case $c in
        !            29: #              c) cval="-c";;
        !            30: #              \?) echo $USAGE; exit 2;;
        !            31: #              esac
        !            32: #      done
        !            33: #               
        !            34: #   else
        !            35: 
        !            36:        set -- `getopt c $*`
        !            37:        if [ $? != 0 ]
        !            38:        then
        !            39:                echo $USAGE
        !            40:                exit 2
        !            41:        fi
        !            42:    
        !            43:        while [ true ]
        !            44:        do
        !            45:                case "$1" in
        !            46:                -c) cval=$1; shift;;
        !            47:                --) shift; break;;
        !            48:                esac
        !            49:        done
        !            50: 
        !            51: #   fi
        !            52: 
        !            53:     dmdld $DMD/lib/dmdmemory.m ${cval}
        !            54: 
        !            55: #
        !            56: # Non-layers environment: not supported
        !            57: #
        !            58: 
        !            59: else
        !            60:    echo "dmdmemory only runs under layers"
        !            61:    exit 1
        !            62: fi

unix.superglobalmegacorp.com

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