--- Begin Message ---
Subject: |
[PATCH] Recognize alpha as compilation target |
Date: |
Sun, 7 Aug 2016 21:24:22 +0100 |
* module/system/base/target.scm (cpu-endianness): Add case for "alpha".
(triplet-pointer-size): Likewise.
---
module/system/base/target.scm | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/module/system/base/target.scm b/module/system/base/target.scm
index d1f6cff..02febf8 100644
--- a/module/system/base/target.scm
+++ b/module/system/base/target.scm
@@ -63,7 +63,7 @@
(cond ((string-match "^i[0-9]86$" cpu)
(endianness little))
((member cpu '("x86_64" "ia64"
- "powerpcle" "powerpc64le" "mipsel" "mips64el"
"nios2" "sh4"))
+ "powerpcle" "powerpc64le" "mipsel" "mips64el"
"nios2" "sh4" "alpha"))
(endianness little))
((member cpu '("sparc" "sparc64" "powerpc" "powerpc64" "spu"
"mips" "mips64" "m68k" "s390x"))
@@ -103,7 +103,7 @@
((string-match "64$" cpu) 8)
((string-match "64_?[lbe][lbe]$" cpu) 8)
((member cpu '("sparc" "powerpc" "mips" "mipsel" "nios2" "m68k"
"sh4")) 4)
- ((member cpu '("s390x")) 8)
+ ((member cpu '("s390x" "alpha")) 8)
((string-match "^arm.*" cpu) 4)
(else (error "unknown CPU word size" cpu)))))
--
2.9.1
--- End Message ---
--- Begin Message ---
Subject: |
Re: bug#24180: [PATCH] Recognize alpha as compilation target |
Date: |
Mon, 08 Aug 2016 22:21:20 +0200 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.5 (gnu/linux) |
Applied, cheers :)
On Sun 07 Aug 2016 22:24, James Clarke <address@hidden> writes:
> * module/system/base/target.scm (cpu-endianness): Add case for "alpha".
> (triplet-pointer-size): Likewise.
> ---
> module/system/base/target.scm | 4 ++--
> 1 file changed, 2 insertions(+), 2 deletions(-)
>
> diff --git a/module/system/base/target.scm b/module/system/base/target.scm
> index d1f6cff..02febf8 100644
> --- a/module/system/base/target.scm
> +++ b/module/system/base/target.scm
> @@ -63,7 +63,7 @@
> (cond ((string-match "^i[0-9]86$" cpu)
> (endianness little))
> ((member cpu '("x86_64" "ia64"
> - "powerpcle" "powerpc64le" "mipsel" "mips64el"
> "nios2" "sh4"))
> + "powerpcle" "powerpc64le" "mipsel" "mips64el"
> "nios2" "sh4" "alpha"))
> (endianness little))
> ((member cpu '("sparc" "sparc64" "powerpc" "powerpc64" "spu"
> "mips" "mips64" "m68k" "s390x"))
> @@ -103,7 +103,7 @@
> ((string-match "64$" cpu) 8)
> ((string-match "64_?[lbe][lbe]$" cpu) 8)
> ((member cpu '("sparc" "powerpc" "mips" "mipsel" "nios2" "m68k"
> "sh4")) 4)
> - ((member cpu '("s390x")) 8)
> + ((member cpu '("s390x" "alpha")) 8)
> ((string-match "^arm.*" cpu) 4)
> (else (error "unknown CPU word size" cpu)))))
--- End Message ---