diff --git a/doc/lisp_reference/all-functions-present.sh b/doc/lisp_reference/all-functions-present.sh
new file mode 100755
index 0000000..b2623ab
--- /dev/null
+++ b/doc/lisp_reference/all-functions-present.sh
@@ -0,0 +1,13 @@
+#!/bin/sh
+
+# Prints a list of the functions that are not yet documented.
+
+../../src/lisp/lisp all-functions.lisp | while read -r fun
+do
+	if grep "$fun" lisp_reference.tex > /dev/null; then
+		# nothing
+		true
+	else
+		echo "$fun"
+	fi
+done