compiler: Change a couple of usages of rebinding variables with the same name. It's legal but confusing.

basis/compiler/cfg/gc-checks/gc-checks.factor

@@ -39,9 +39,9 @@ M: insn gc-check-offsets* 2drop ;
     ! Divide a basic block into sections, where every section
     ! other than the first requires a GC check.
     [
-        insns 0 seq [| insns from to |
-            from to insns subseq ,
-            insns to
+        insns 0 seq [| insns' from to |
+            from to insns' subseq ,
+            insns' to
         ] each
         tail ,
     ] { } make ;

basis/compiler/cfg/parallel-copy/parallel-copy.factor

@@ -32,9 +32,9 @@ SYMBOLS: locs preds to-do ready ;
 
 :: process-to-do ( b temp: ( src -- dst ) quot: ( dst src -- ) -- )
     b locs get at b = [
-        b temp call :> temp
-        temp b quot call
-        temp b locs get set-at
+        b temp call :> temp'
+        temp' b quot call
+        temp' b locs get set-at
         b ready get push-front
     ] when ; inline