Add a debug message to function "record_arch_list_add".
diff --git a/gdb/record.c b/gdb/record.c
index 5277d2d..9cae48b 100644
--- a/gdb/record.c
+++ b/gdb/record.c
@@ -173,6 +173,13 @@
 static void
 record_arch_list_add (record_t * rec)
 {
+  if (record_debug > 1)
+    {
+      fprintf_unfiltered (gdb_stdlog,
+			  "Process record: record_arch_list_add 0x%s.\n",
+			  paddr_nz ((CORE_ADDR)rec));
+    }
+
   if (record_arch_list_tail)
     {
       record_arch_list_tail->next = rec;