Return to dmdmemory CVS log

Up to [Research Unix] / researchv10dc / 630 / bin

Annotation of researchv10dc/630/bin/dmdmemory, revision 1.1.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

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