Raymond Toy pushed to branch sparc64-dev at cmucl / cmucl
Commits:
-
5dafa396
by Raymond Toy at 2016-12-17T20:11:17-08:00
3 changed files:
Changes:
... | ... | @@ -27,11 +27,17 @@ |
27 | 27 |
"target:assembly/mips/array.assem"
|
28 | 28 |
"target:assembly/mips/arith.assem"
|
29 | 29 |
"target:assembly/mips/alloc.assem"))
|
30 |
,@(when (c:backend-featurep :sparc)
|
|
30 |
,@(when (and (c:backend-featurep :sparc)
|
|
31 |
(not (c:backend-featurep :sparc64)))
|
|
31 | 32 |
'("target:assembly/sparc/assem-rtns.assem"
|
32 | 33 |
"target:assembly/sparc/array.assem"
|
33 | 34 |
"target:assembly/sparc/arith.assem"
|
34 | 35 |
"target:assembly/sparc/alloc.assem"))
|
36 |
,@(when (c:backend-featurep :sparc64)
|
|
37 |
'("target:assembly/sparc64/assem-rtns.assem"
|
|
38 |
"target:assembly/sparc64/array.assem"
|
|
39 |
"target:assembly/sparc64/arith.assem"
|
|
40 |
"target:assembly/sparc64/alloc.assem"))
|
|
35 | 41 |
,@(when (c:backend-featurep :rt)
|
36 | 42 |
'("target:assembly/rt/assem-rtns.assem"
|
37 | 43 |
"target:assembly/rt/array.assem"
|
... | ... | @@ -58,12 +58,19 @@ |
58 | 58 |
(comf "target:assembly/mips/arith" :assem t)
|
59 | 59 |
(comf "target:assembly/mips/alloc" :assem t))
|
60 | 60 |
|
61 |
(when (c:backend-featurep :sparc)
|
|
61 |
(when (and (c:backend-featurep :sparc)
|
|
62 |
(not (c:backend-featurep :sparc64)))
|
|
62 | 63 |
(comf "target:assembly/sparc/assem-rtns" :assem t)
|
63 | 64 |
(comf "target:assembly/sparc/array" :assem t)
|
64 | 65 |
(comf "target:assembly/sparc/arith" :assem t)
|
65 | 66 |
(comf "target:assembly/sparc/alloc" :assem t))
|
66 | 67 |
|
68 |
(when (c:backend-featurep :sparc64)
|
|
69 |
(comf "target:assembly/sparc64/assem-rtns" :assem t)
|
|
70 |
(comf "target:assembly/sparc64/array" :assem t)
|
|
71 |
(comf "target:assembly/sparc64/arith" :assem t)
|
|
72 |
(comf "target:assembly/sparc64/alloc" :assem t))
|
|
73 |
|
|
67 | 74 |
(when (c:backend-featurep :rt)
|
68 | 75 |
(comf "target:assembly/rt/assem-rtns" :assem t)
|
69 | 76 |
(comf "target:assembly/rt/array" :assem t)
|
... | ... | @@ -59,7 +59,8 @@ |
59 | 59 |
(setf (ext:search-list "c:") '("target:compiler/"))
|
60 | 60 |
(setf (ext:search-list "vm:")
|
61 | 61 |
'(#+(or pmax sgi) "c:mips/"
|
62 |
#+sparc "c:sparc/"
|
|
62 |
#+(and sparc (not sparc64)) "c/sparc/"
|
|
63 |
#+sparc64 "c/sparc64/"
|
|
63 | 64 |
#+rt "c:rt/"
|
64 | 65 |
#+hppa "c:hppa/"
|
65 | 66 |
#+x86 "c:x86/"
|
... | ... | @@ -69,7 +70,8 @@ |
69 | 70 |
"c:generic/"))
|
70 | 71 |
(setf (ext:search-list "assem:")
|
71 | 72 |
'(#+(or pmax sgi) "target:assembly/mips/"
|
72 |
#+sparc "target:assembly/sparc/"
|
|
73 |
#+sparc64 "target:assembly/sparc64/"
|
|
74 |
#+(and sparc (not sparc64)) "target:assembly/sparc/"
|
|
73 | 75 |
#+rt "target:assembly/rt/"
|
74 | 76 |
#+hppa "target:assembly/hppa/"
|
75 | 77 |
#+x86 "target:assembly/x86/"
|