X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fir%2Firprog.c;h=5f7fdf5bc704499c183d1c7162b58a0b46fa0cf6;hb=a947c2090825c6a49b3fbfaafc00c8c34d649a40;hp=f9b4148175ff5a5d3e6b190064a6c7bb096c498b;hpb=41eca21e7add2e4f30f14c46600a23839852b3fc;p=libfirm

diff --git a/ir/ir/irprog.c b/ir/ir/irprog.c
index f9b414817..5f7fdf5bc 100644
--- a/ir/ir/irprog.c
+++ b/ir/ir/irprog.c
@@ -92,13 +92,14 @@ static ir_prog *complete_ir_prog(ir_prog *irp) {
 	/* Set these flags for debugging. */
 	irp->segment_types[IR_SEGMENT_GLOBAL]->flags       |= tf_global_type;
 	irp->segment_types[IR_SEGMENT_THREAD_LOCAL]->flags |= tf_tls_type;
+	irp->segment_types[IR_SEGMENT_CONSTRUCTORS]->flags |= tf_constructors;
+	irp->segment_types[IR_SEGMENT_DESTRUCTORS]->flags  |= tf_destructors;
 
 	/* The global type is a class, but we cannot derive from it, so set
 	   the final property to assist optimizations that checks for it. */
 	set_class_final(irp->segment_types[IR_SEGMENT_GLOBAL], 1);
 
-	irp->const_code_irg   = new_const_code_irg();
-
+	irp->const_code_irg             = new_const_code_irg();
 	irp->phase_state                = phase_building;
 	irp->outs_state                 = outs_none;
 	irp->ip_outedges                = NULL;