Pārlūkot izejas kodu

added rcsid
Some constants had survived in the text. They were parametrized.

sater 40 gadi atpakaļ
vecāks
revīzija
2d4de6d34e
1 mainītis faili ar 5 papildinājumiem un 2 dzēšanām
  1. 5 2
      mach/pdp/cg/table

+ 5 - 2
mach/pdp/cg/table

@@ -1,3 +1,4 @@
+"$Header$"
 /********************************************************
  * Back end tables for pdp 11                           *
  * Authors : Ceriel J.H. Jacobs,Hans van Staveren       *
@@ -223,7 +224,8 @@ lxl $1==3	| |	allocate(REG={LOCAL2, SL, 2})
 			move({regind2,%[a], SSL},%[a])
 				| {regind2,%[a], SSL}                   | |
 lxl $1>3        | |     allocate(REG={LOCAL2, SL, 2}, REG={CONST2,$1-1})
-			"1:\tmov 4(%[a]),%[a]" /* SL */
+			"1:"
+			move({regind2,%[a], SSL},%[a])
 			"sob %[b],1b"
 			setcc(%[a]) erase(%[a]) erase(%[b])
 				| %[a]                                  | |
@@ -238,7 +240,8 @@ lxa $1==3       | |     allocate(REG={LOCAL2, SL, 2 })
 			move({regind2, %[a], SSL }, %[a])
 				| {regconst2, %[a], SSL }               | |
 lxa $1 > 3      | |     allocate(REG={LOCAL2, SL, 2}, REG={CONST2,$1-1})
-			"1:\tmov 4(%[a]),%[a]" /* SL */
+			"1:"
+			move({regind2,%[a], SSL},%[a])
 			"sob %[b],1b"
 			setcc(%[a]) erase(%[a]) erase(%[b])
 				| {regconst2, %[a], SSL }               | |