Index: /trunk/source/lisp-kernel/arm-exceptions.c
===================================================================
--- /trunk/source/lisp-kernel/arm-exceptions.c	(revision 14365)
+++ /trunk/source/lisp-kernel/arm-exceptions.c	(revision 14366)
@@ -187,5 +187,5 @@
     }
     if (IS_SET_ALLOCPTR_HEADER_RD(instr)) {
-      header_of(cur_allocptr) == xpGPR(xp,RD_field(instr));
+      header_of(cur_allocptr) = xpGPR(xp,RD_field(instr));
     } else if (IS_SET_ALLOCPTR_RESULT_RD(instr)) {
       xpGPR(xp,RD_field(instr)) = cur_allocptr;
Index: /trunk/source/lisp-kernel/arm-gc.c
===================================================================
--- /trunk/source/lisp-kernel/arm-gc.c	(revision 14365)
+++ /trunk/source/lisp-kernel/arm-gc.c	(revision 14366)
@@ -1008,6 +1008,6 @@
 
   int r;
-  /* registers >= fn should be tagged and marked as roots.
-     the PC, and LR should be treated as "pc_locatives".
+  /* registers between arg_z and Rfn should be tagged and marked as
+     roots.  the PC, and LR should be treated as "pc_locatives".
 
      In general, marking a locative is more expensive than marking
@@ -1296,5 +1296,5 @@
   int r;
 
-  /* registers >= fn should be tagged and forwarded as roots.
+  /* registers between arg_z and Rfn should be tagged and forwarded as roots.
      the PC and LR should be treated as "locatives".
      */
