Skip to content

Embed URL

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Clozure CL launcher script
#!/bin/sh
#
# Change the definition of CCL_DEFAULT_DIRECTORY below to refer to
# your Clozure CL installation directory. The lisp will use this
# environment variable to set up translations for the CCL: logical
# host.
# Any definition of CCL_DEFAULT_DIRECTORY already present in the
# environment takes precedence over definition made below.
if [ -z "$CCL_DEFAULT_DIRECTORY" ]; then
CCL_DEFAULT_DIRECTORY=/usr/local/src/ccl
echo "CCL_DEFAULT_DIRECTORY not set, defaulting to $CCL_DEFAULT_DIRECTORY"
fi
OS="$(uname -s)"
MARCH="$(uname -m)"
if [ "$MARCH" = x86_64 ]; then
postfix="64"
else
postfix=""
fi
# If you don't want to guess the name of the OpenMCL kernel on
# every invocation (or if you want to use a kernel with a
# non-default name), you might want to uncomment and change
# the following line:
#OPENMCL_KERNEL=some_name
if [ -z "$OPENMCL_KERNEL" ]; then
case $OS in
Darwin)
case `arch` in
ppc*)
OPENMCL_KERNEL="dppccl${postfix}"
;;
i386|x86_64)
OPENMCL_KERNEL="dx86cl${postfix}"
;;
esac
;;
Linux)
case $MARCH in
ppc64)
OPENMCL_KERNEL="ppccl${postfix}"
;;
x86_64)
OPENMCL_KERNEL="lx86cl${postfix}"
;;
*)
echo "Can't determine machine architecture. Fix this."
exit 1
;;
esac
;;
FreeBSD)
case $MARCH in
amd64)
OPENMCL_KERNEL="fx86cl${postfix}"
;;
*)
echo "unsupported architecture"
exit 1
;;
esac
;;
SunOS)
case $MARCH in
i86pc)
OPENMCL_KERNEL="sx86cl${postfix}"
;;
*)
echo "unsupported architecture"
exit 1
;;
esac
;;
CYGWIN*)
OPENMCL_KERNEL="wx86cl${postfix}.exe"
CCL_DEFAULT_DIRECTORY="C:/cygwin$CCL_DEFAULT_DIRECTORY"
;;
*)
echo "Can't determine host OS. Fix this."
exit 1
;;
esac
fi
export CCL_DEFAULT_DIRECTORY
exec ${CCL_DEFAULT_DIRECTORY}/${OPENMCL_KERNEL} "$@"
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Something went wrong with that request. Please try again.