File: ecl.sh

package info (click to toggle)
ecl 0.9i-2
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k
  • size: 22,424 kB
  • ctags: 28,771
  • sloc: ansic: 115,594; lisp: 63,241; asm: 45,930; sh: 15,564; cpp: 9,729; perl: 2,886; makefile: 2,751; yacc: 226; lex: 94; fortran: 24
file content (33 lines) | stat: -rw-r--r-- 644 bytes parent folder | download | duplicates (7) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
 
#!/bin/sh

if [ ! -f /usr/share/common-lisp/source/common-lisp-controller/common-lisp-controller.lisp ] ; then
  cat <<EOF
$0: cannot find the common-lisp-controller source.
EOF
  exit 0
fi

build_error()
{
    echo "Build failure $1"
    exit 1
}

case $1 in
    install-clc)
	    echo $0 loading and dumping clc.
	    ( cd /tmp
	      /usr/lib/ecl/ecl-original -load /usr/lib/ecl/install-clc.lisp )
	    ;;
    remove-clc)
	    echo $0 removing clc-enabled image
	    cp /usr/lib/ecl/ecl-original /usr/bin/ecl
	    ;;
    *)
	    echo $0 unkown command $1
	    echo known commands: install-clc and remove-clc
	    exit 1
	    ;;
esac

exit 0