# New Ticket Created by "Sean O'Rourke"
# Please include the string: [netlabs #770]
# in the subject line of all future correspondence about this issue.
# <URL: http://bugs6.perl.org/rt2/Ticket/Display.html?id=770 >
simplify() was getting called with no arguments, but expecting one. I
changed it to use the global interference_graph, which is what the other
routines seem to do. Maybe I should reorder the file so prototypes get
checked, or add declarations to the header, but it's not my code...
/s
Index: imc.c
===================================================================
RCS file: /cvs/public/parrot/languages/imcc/imc.c,v
retrieving revision 1.9
diff -p -u -r1.9 imc.c
--- imc.c 4 Jul 2002 02:58:30 -0000 1.9
+++ imc.c 7 Jul 2002 20:55:01 -0000
@@ -180,9 +180,11 @@ int interferes(SymReg * r0, SymReg * r1)
*
*/
-int simplify (SymReg **g){
+int simplify (){
int changes = 0;
int x;
+
+ SymReg ** g = interference_graph;
for(x = 0; x < n_symbols; x++) {
if (g[x]->simplified) {
