DataMuseum.dk

Presents historical artifacts from the history of:

RC9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download
Index: @ T r

⟦30cc4e7ff⟧ TextFile

    Length: 2293 (0x8f5)
    Types: TextFile
    Notes: @(#)rmlang 13.3 (RC International) 3/7/91
    Names: »rmlang2.11«

Derivation

└─⟦50656ff4a⟧ Bits:30010538 TX 3.1 Coldstart
    └─⟦bbf173f5c⟧ »0004« 
        └─⟦this⟧ »./usr/lib/cmplrs/cc2.11/rmlang2.11« 

TextFile

#!/bin/sh
#	@(#)rmlang	13.3 (RC International) 3/7/91
# -------------------------------------------------------------
# |         RESTRICTED RIGHTS LEGEND                          |
# | Use, duplication, or disclosure by the Government is      |
# | subject to restrictions as set forth in subparagraph      |
# | (c)(1)(ii) of the Rights in Technical Data and Computer   |
# | Software Clause at DFARS 252.227-7013.                    |
# |         MIPS Computer Systems, Inc.                       |
# |         928 Arques Avenue                                 |
# |         Sunnyvale, CA 94086                               |
# -------------------------------------------------------------

#set -a

listdir=${dir=$COMP_HOST_ROOT/usr/lib/cmplrs/cc2.11}
mode=""
Sc="\c"

. $listdir/ask

if [ $# -eq 0 -o $# -gt 2 ]
  then
    echo "usage: rmlang [-n] version"
    echo "       where: -n is no execute mode"
    echo "              version is either 1.30 or 1.31"
    exit 1
  fi

if [ $1 = "-n" ]
  then
    mode="n"
    shift
  fi

case $1 in
  1.30) if [ ! -f $listdir/cmplrs1.30 ]
	then
		echo "$0: \"$listdir/cmplrs1.30\" not found."
		exit 1
	else
		listfile="$listdir/cmplrs1.30"
		list=`cat $listdir/cmplrs1.30`
		MESG="
MIPS-PL/I and MIPS-COBOL $1 compilers must be deleted at
the same time as the MIPS-C $1 compiler since they depend on
the MIPS-C back-end components."
	fi ;;
  1.31) if [ ! -f $listdir/cmplrs1.31 ]
	then
		echo "$0: \"$listdir/cmplrs1.31\" not found."
		exit 1
	else
		listfile="$listdir/cmplrs1.31"
		list=`cat $listdir/cmplrs1.31`
		MESG="
MIPS-Pascal and MIPS-FORTRAN $1 compilers must be deleted at
the same time as the MIPS-C $1 compiler since they depend on
the MIPS-C back-end components."
	fi ;;
     *) echo "usage: rmlang [-n] version"
    	echo "       where: -n is no execute mode"
	echo "             version is either 1.30 or 1.31"
	exit 1 ;;
esac

rootdir=${rootdir=$COMP_HOST_ROOT/}
if [ ! -d $rootdir ]
  then
    echo "$0: directory \"$rootdir\" not found"
    exit 1
  else
    cd $rootdir
  fi

if [ "$mode" = "n" ]
  then
    echo "Files to be deleted:"
    more $listfile
    exit 0
  fi

ask "$MESG

Deleting $1 compilers" n y n
if [ $Ans = "n" ]
  then
    exit 1
  fi

for file in $list
  do
    rm -rf ${rootdir}/${file}
  done

exit 0