From fbb9c034ebfa95eb09d5734b8b4902dbecaaceb1 Mon Sep 17 00:00:00 2001
From: Spenser Truex <spensertruexonline@gmail.com>
Date: Sat, 1 Dec 2018 22:56:28 -0800
Subject: [PATCH] Added support for other lisp implementations based on
 research.

---
 examples/dump_db.sh | 19 ++++++++++++++-----
 1 file changed, 14 insertions(+), 5 deletions(-)

diff --git a/examples/dump_db.sh b/examples/dump_db.sh
index d0bd651..08a2d24 100755
--- a/examples/dump_db.sh
+++ b/examples/dump_db.sh
@@ -2,8 +2,17 @@
 
 LISP=sbcl
 
-## Disclaimer:
-## I have not tested that all lisps take the "--load" flag.
-## This code might spontaneously combust your whole everything.
-
-$LISP --load "dump-db.lisp"
+### DON'T EDIT BELOW THIS LINE UNLESS YOU KNOW WHAT YOU ARE DOING. ###
+DUMP="dump-db.lisp"
+if [ "$LISP"="cmucl" ] || [ "$LISP"="lispworks" ] || [ "$LISP"="gcl" ] || [ "$LISP"="abcl" ];
+then $LISP -load $DUMP
+else
+    if [ "$LISP"="clisp" ];
+    then $LISP -i $DUMP
+    else
+	if [ "$LISP"="allegro" ];
+	then $LISP -l $DUMP
+	else $LISP --load $DUMP #SBCL CCL ECL
+	fi
+    fi
+fi