X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fir%2Firmode.c;h=d926e90c4c035af4b33cc253f7fdae8efbe2087b;hb=e570f00fb465d212dde403160e97ab45d36d1d7e;hp=232c688be6befa540e308979e9de61143a28cc90;hpb=60b6af1854da15a299131e4c10a74f0bcfc63b9a;p=libfirm

diff --git a/ir/ir/irmode.c b/ir/ir/irmode.c
index 232c688be..d926e90c4 100644
--- a/ir/ir/irmode.c
+++ b/ir/ir/irmode.c
@@ -984,3 +984,35 @@ init_mode (void)
   /* set the machine specific modes to the predifined ones */
   mode_P_mach = mode_P;
 }
+
+
+void finish_mode(void) {
+  obstack_free(&modes, 0);
+
+  mode_T = NULL;
+  mode_X = NULL;
+  mode_M = NULL;
+  mode_BB = NULL;
+  mode_ANY = NULL;
+  mode_BAD = NULL;
+
+  mode_F = NULL;
+  mode_D = NULL;
+  mode_E = NULL;
+
+  mode_Bs = NULL;
+  mode_Bu = NULL;
+  mode_Hs = NULL;
+  mode_Hu = NULL;
+  mode_Is = NULL;
+  mode_Iu = NULL;
+  mode_Ls = NULL;
+  mode_Lu = NULL;
+
+  mode_C = NULL;
+  mode_U = NULL;
+  mode_b = NULL;
+  mode_P = NULL;
+
+  mode_P_mach = NULL;
+}