cvsuser 04/10/24 07:47:27
Modified: src jit.c
Log:
oopsala
Revision Changes Path
1.94 +4 -3 parrot/src/jit.c
Index: jit.c
===================================================================
RCS file: /cvs/public/parrot/src/jit.c,v
retrieving revision 1.93
retrieving revision 1.94
diff -u -r1.93 -r1.94
--- jit.c 24 Oct 2004 12:33:06 -0000 1.93
+++ jit.c 24 Oct 2004 14:47:27 -0000 1.94
@@ -1,6 +1,6 @@
/*
Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-$Id: jit.c,v 1.93 2004/10/24 12:33:06 leo Exp $
+$Id: jit.c,v 1.94 2004/10/24 14:47:27 leo Exp $
=head1 NAME
@@ -1034,12 +1034,12 @@
if ((is_used && volatiles) ||
(!volatiles &&
((ru[typ].reg_dir[us] & PARROT_ARGDIR_IN)))) {
+#if JIT_USE_OFFS
if (first) {
base_reg = Parrot_jit_emit_get_base_reg_no(
jit_info->native_ptr);
first = 0;
}
-#if JIT_USE_OFFS
offs = reg_offs(interpreter, typ, us);
(mov_f[typ])(interpreter, maps[typ][i], base_reg, offs);
#else
@@ -1101,12 +1101,13 @@
if ((is_used && volatiles) ||
(!volatiles &&
(ru[typ].reg_dir[us] & PARROT_ARGDIR_OUT))) {
+#if JIT_USE_OFFS
if (first) {
base_reg = Parrot_jit_emit_get_base_reg_no(
jit_info->native_ptr);
first = 0;
}
-#if JIT_USE_OFFS
+
offs = reg_offs(interpreter, typ, us);
(mov_f[typ])(interpreter, base_reg, offs, maps[typ][i]);
#else