diff options
| author | Michael Schmidt <github@mschmidt.me> | 2015-12-16 13:23:33 +0100 |
|---|---|---|
| committer | Michael Schmidt <github@mschmidt.me> | 2015-12-16 13:23:33 +0100 |
| commit | 267cb3b2fa4279eb1f313bcdda580c06c4666189 (patch) | |
| tree | 61930be5dadd1ef4d8fbcf1ecb8b9edcbc90d268 /powerpc/Asmexpand.ml | |
| parent | 31f7b83e86a2d80d2e310e43a00bfde994c5ab78 (diff) | |
| download | compcert-kvx-267cb3b2fa4279eb1f313bcdda580c06c4666189.tar.gz compcert-kvx-267cb3b2fa4279eb1f313bcdda580c06c4666189.zip | |
bug 17752, fix semantics of builtin_set_spr64
Diffstat (limited to 'powerpc/Asmexpand.ml')
| -rw-r--r-- | powerpc/Asmexpand.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/powerpc/Asmexpand.ml b/powerpc/Asmexpand.ml index ba63bb13..ca166fd1 100644 --- a/powerpc/Asmexpand.ml +++ b/powerpc/Asmexpand.ml @@ -519,7 +519,7 @@ let expand_builtin_inline name args res = if Archi.ppc64 then begin emit (Prldicr(GPR10, ah, _32, _31)); emit (Prldicl(al, al, _0, _32)); - emit (Pori(GPR10, al, Cint _0)); + emit (Por(GPR10, GPR10, al)); emit (Pmtspr(n, GPR10)) end else raise (Error "__builtin_set_spr64 is only supported for PPC64 targets") |