mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-08 20:52:28 +02:00
Code Activity

Remove remaining ia64 port debug code.

Browse source
This commit is contained in:
pcpa 2013-04-27 22:49:15 -03:00
parent 6ef03b0e04
commit e80b244f34
3 changed files with 2 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

7
check/lightning.c
View file

@ -522,9 +522,6 @@ static void rehash(hash_t *hash);
/*
* Initialization
*/
#if __ia64__
extern int missing_count;
#endif
static jit_state_t *_jit;
static int flag_verbose;
static int flag_disasm;
@ -3569,10 +3566,6 @@ execute(int argc, char *argv[])
}
function = jit_emit();
#if __ia64__
if (missing_count)
flag_disasm = 1;
#endif
if (flag_verbose > 1 || flag_disasm) {
jit_print();
fprintf(stdout, " - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -\n");

3
include/lightning/jit_private.h
View file

@ -551,8 +551,5 @@ extern jit_bool_t _jit_remap(jit_state_t*);
*/
extern jit_register_t _rvs[];
extern const char *jit_progname;
#if __ia64__
extern int missing_count;
#endif
#endif /* _jit_private_h */

3
lib/jit_ia64.c
View file

@ -194,6 +194,8 @@ jit_register_t _rvs[] = {
{ rc(fpr)|116, "f116"}, { rc(fpr)|117, "f117"},
{ rc(fpr)|118, "f118"}, { rc(fpr)|119, "f119"},
#if 0
/* commented to fit a jit_regset_t in 256 bits, so that the fake
* O0-O7 registers are easily patched when an argument is pushed */
{ rc(fpr)|120, "f120"}, { rc(fpr)|121, "f121"},
{ rc(fpr)|122, "f122"}, { rc(fpr)|123, "f123"},
{ rc(fpr)|124, "f124"}, { rc(fpr)|125, "f125"},
@ -206,7 +208,6 @@ jit_register_t _rvs[] = {
{ rc(arg)|126, "o6" }, { rc(arg)|127, "o7" },
{ _NOREG, "<none>" },
};
int missing_count;
/*
* Implementation