summaryrefslogtreecommitdiff
path: root/src/doc.c
diff options
context:
space:
mode:
authorJim Blandy <jimb@redhat.com>1992-09-13 12:20:40 +0000
committerJim Blandy <jimb@redhat.com>1992-09-13 12:20:40 +0000
commit2bda628c55a5db8f3c9c64e6fdfd05e45daaf979 (patch)
treed2e1479d91ca9edb1b88fa8fc110abab2e118b40 /src/doc.c
parentafa4c0f3cd2d584a0997c319decde8fafaa80430 (diff)
downloademacs-2bda628c55a5db8f3c9c64e6fdfd05e45daaf979.tar.gz
* doc.c (Fsnarf_documentation): Signal an error if this is
called in a dumped Emacs.
Diffstat (limited to 'src/doc.c')
-rw-r--r--src/doc.c5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/doc.c b/src/doc.c
index 6dceb587fcb..fbe4f834a32 100644
--- a/src/doc.c
+++ b/src/doc.c
@@ -215,6 +215,11 @@ when doc strings are referred to later in the dumped Emacs.")
char *name;
extern char *index ();
+#ifndef CANNOT_DUMP
+ if (NILP (Vpurify_flag))
+ error ("Snarf-documentation can only be called in an undumped Emacs");
+#endif
+
CHECK_STRING (filename, 0);
#ifndef CANNOT_DUMP