cvsuser 04/11/27 06:00:45
Modified: build_tools ops2pm.pl
config/gen/makefiles root.in
imcc cfg.c
Log:
integrate and use oplib_ops.h
Revision Changes Path
1.19 +3 -2 parrot/build_tools/ops2pm.pl
Index: ops2pm.pl
===================================================================
RCS file: /cvs/public/parrot/build_tools/ops2pm.pl,v
retrieving revision 1.18
retrieving revision 1.19
diff -u -r1.18 -r1.19
--- ops2pm.pl 27 Nov 2004 09:32:12 -0000 1.18
+++ ops2pm.pl 27 Nov 2004 14:00:40 -0000 1.19
@@ -1,6 +1,6 @@
#! perl -w
# Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-# $Id: ops2pm.pl,v 1.18 2004/11/27 09:32:12 leo Exp $
+# $Id: ops2pm.pl,v 1.19 2004/11/27 14:00:40 leo Exp $
=head1 NAME
@@ -252,7 +252,8 @@
}
print OUT <<END_C;
-}
+} parrot_opcode_enums;
+
#endif
END_C
1.265 +2 -1 parrot/config/gen/makefiles/root.in
Index: root.in
===================================================================
RCS file: /cvs/public/parrot/config/gen/makefiles/root.in,v
retrieving revision 1.264
retrieving revision 1.265
diff -u -r1.264 -r1.265
--- root.in 26 Nov 2004 23:12:25 -0000 1.264
+++ root.in 27 Nov 2004 14:00:44 -0000 1.265
@@ -1,4 +1,4 @@
-# $Id: root.in,v 1.264 2004/11/26 23:12:25 jrieks Exp $
+# $Id: root.in,v 1.265 2004/11/27 14:00:44 leo Exp $
###############################################################################
#
@@ -159,6 +159,7 @@
GEN_HEADERS = \
$(INC)/vtable.h \
$(INC)/oplib/core_ops.h \
+ $(INC)/oplib/ops.h \
$(SRC)/parrot_config.h \
$(INC)/oplib/core_ops_switch.h
1.65 +2 -2 parrot/imcc/cfg.c
Index: cfg.c
===================================================================
RCS file: /cvs/public/parrot/imcc/cfg.c,v
retrieving revision 1.64
retrieving revision 1.65
diff -u -r1.64 -r1.65
--- cfg.c 18 Nov 2004 08:16:47 -0000 1.64
+++ cfg.c 27 Nov 2004 14:00:45 -0000 1.65
@@ -13,6 +13,7 @@
#include <string.h>
#include "imc.h"
#include "optimizer.h"
+#include "parrot/oplib/ops.h"
/* #define ALIAS */
@@ -600,8 +601,7 @@
* if we have a setp_ind opcode, it may write all PMC
* registers from 5..15
*/
- if (ins->opnum == 921 && r->set == 'P') {
- assert(strcmp(ins->op, "setp_ind") == 0);
+ if (ins->opnum == PARROT_OP_setp_ind_i_p && r->set == 'P') {
r->usage |= U_NON_VOLATILE;
}