d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

added rcsid

Browse source 
Some constants had survived in the text. They were parametrized.
This commit is contained in:
sater 1984-05-19 12:52:25 +00:00
parent f39171e3c4
commit 2d4de6d34e
1 changed files with 5 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

7
mach/pdp/cg/table
View file

@ -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 } | |