example.sh

#!/usr/bin/env bash

EXAMPLE=$(cat <<EOF
(macrolet ((execute-lambda-at-compile-time-a (l) \`(quote ,(funcall l)))
           (execute-lambda-at-compile-time-b (l) \`(quote ,(funcall (eval l))))
           (run-example (symbol)
             \`(handler-case (,symbol (lambda () 'hello))
                (error (e) (format nil "~a" e)))))
  (print (list
   (run-example funcall)
   (run-example execute-lambda-at-compile-time-b)
   (run-example execute-lambda-at-compile-time-a)
)))
EOF
)

TEMP_DIR=$(mktemp -d)

SCRIPT="${TEMP_DIR}/example.lisp"

echo "${EXAMPLE}" >> "${SCRIPT}"

echo "CLISP:"
echo
docker \
    run -it --rm \
    --name example-clisp \
    -v "${TEMP_DIR}":"/workdir" \
    -w "/workdir" \
    daewok/clisp clisp ./example.lisp

echo
echo
echo "SBCL:"
docker \
    run -it --rm \
    --name example-clisp \
    -v "${TEMP_DIR}":"/workdir" \
    -w "/workdir" \
    daewok/sbcl \
    sbcl --script ./example.lisp | grep -v "^;"