1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-18 18:40:22 +02:00

Fix r12 register spec for lightning with sysv x86-64 ABI

* libguile/lightning/lib/jit_x86.c (_rvs): Mark R12 as callee-save.
This commit is contained in:
Andy Wingo 2018-08-24 11:41:44 +02:00
parent 25e9b0f79d
commit 270147cf88

View file

@ -1,5 +1,5 @@
/* /*
* Copyright (C) 2012-2017 Free Software Foundation, Inc. * Copyright (C) 2012-2018 Free Software Foundation, Inc.
* *
* This file is part of GNU lightning. * This file is part of GNU lightning.
* *
@ -185,7 +185,7 @@ jit_register_t _rvs[] = {
{ rc(arg) | rc(gpr) | rc(rg8) | 0, "%rax" }, { rc(arg) | rc(gpr) | rc(rg8) | 0, "%rax" },
{ rc(gpr) | rc(rg8) | 10, "%r10" }, { rc(gpr) | rc(rg8) | 10, "%r10" },
{ rc(gpr) | rc(rg8) | 11, "%r11" }, { rc(gpr) | rc(rg8) | 11, "%r11" },
{ rc(gpr) | rc(rg8) | 12, "%r12" }, { rc(sav) | rc(gpr) | rc(rg8) | 12, "%r12" },
{ rc(sav) | rc(rg8) | rc(gpr) | 3, "%rbx" }, { rc(sav) | rc(rg8) | rc(gpr) | 3, "%rbx" },
{ rc(sav) | rc(rg8) | rc(gpr) | 13, "%r13" }, { rc(sav) | rc(rg8) | rc(gpr) | 13, "%r13" },
{ rc(sav) | rc(rg8) | rc(gpr) | 14, "%r14" }, { rc(sav) | rc(rg8) | rc(gpr) | 14, "%r14" },