# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 738108477 0
# Node ID e936d56c235454e583a8891a438413da2a512e6f
# Parent  5314fdcd87bca4c77b6fbd8854f55afc0d1f03b8
(scan_lisp_file): Recognize defalias like fset.

diff -r 5314fdcd87bc -r e936d56c2354 lib-src/make-docfile.c
--- a/lib-src/make-docfile.c	Sat May 22 22:06:48 1993 +0000
+++ b/lib-src/make-docfile.c	Sat May 22 22:07:57 1993 +0000
@@ -403,6 +403,7 @@
   (defconst NAME VALUE DOCSTRING)
   (fset (quote NAME) (make-byte-code ... DOCSTRING ...))
   (fset (quote NAME) #[... DOCSTRING ...])
+  (defalias (quote NAME) #[... DOCSTRING ...])
  starting in column zero.
  (quote NAME) may appear as 'NAME as well.
  For defun, defmacro, and autoload, we know how to skip over the arglist.
@@ -563,7 +564,7 @@
 	    }
 	}
 
-      else if (! strcmp (buffer, "fset"))
+      else if (! strcmp (buffer, "fset") || ! strcmp (buffer, "defalias"))
 	{
 	  char c1 = 0, c2 = 0;
 	  type = 'F';