diff --git a/gdb/ChangeLog b/gdb/ChangeLog
index bf1c7575c14..f36f1728198 100644
--- a/gdb/ChangeLog
+++ b/gdb/ChangeLog
@@ -1,3 +1,8 @@
+Mon Sep  1 11:21:03 1997  Andrew Cagney  <cagney@b1.cygnus.com>
+
+	* top.c (init_main): Add ``set processor'' as an alias for ``set
+ 	architecture''.
+
 Sat Aug 30 13:44:48 1997  Bob Manson  <manson@charmed.cygnus.com>
 
 	* config/sparc/sparclite.mt: Removed simulator references (erc32
diff --git a/gdb/top.c b/gdb/top.c
index 0d951d9019d..80a2293c022 100644
--- a/gdb/top.c
+++ b/gdb/top.c
@@ -3573,6 +3573,7 @@ init_main ()
 
   add_cmd ("architecture", class_support, set_architecture,
 	   "Set architecture of target.", &setlist);
+  add_alias_cmd ("processor", "architecture", class_support, 1, &setlist);
   add_cmd ("architecture", class_support, show_architecture,
 	   "Show architecture of target.", &showlist);
   add_cmd ("architecture", class_support, info_architecture,