|
|
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.