cvsuser 03/07/03 04:52:56
Modified: languages/imcc main.c pbc.c
Log:
--leak-test typo; fixed 1 leak
Revision Changes Path
1.30 +2 -1 parrot/languages/imcc/main.c
Index: main.c
===================================================================
RCS file: /cvs/public/parrot/languages/imcc/main.c,v
retrieving revision 1.29
retrieving revision 1.30
diff -u -w -r1.29 -r1.30
--- main.c 2 Jul 2003 16:39:17 -0000 1.29
+++ main.c 3 Jul 2003 11:52:56 -0000 1.30
@@ -51,6 +51,7 @@
" -w --warnings\n"
" -G --no-gc\n"
" --gc-debug\n"
+ " --leak-test|--destroy-at-end\n"
" -. --wait Read a keystroke before starting\n"
" <Compiler options>\n"
" -v --verbose\n"
@@ -109,7 +110,7 @@
{ 'o', 'o', OPTION_required_FLAG, { "--output" } },
{ 'O', 'O', OPTION_optional_FLAG, { "--optimize" } },
{ '\0', OPT_GC_DEBUG, 0, { "--gc-debug" } },
- {'\0', OPT_DESTROY_FLAG, 0, { "--leak_test", "--destroy-at-end" } },
+ {'\0', OPT_DESTROY_FLAG, 0, { "--leak-test", "--destroy-at-end" } },
{ 0, 0, 0, { NULL } }
};
1.36 +1 -0 parrot/languages/imcc/pbc.c
Index: pbc.c
===================================================================
RCS file: /cvs/public/parrot/languages/imcc/pbc.c,v
retrieving revision 1.35
retrieving revision 1.36
diff -u -w -r1.35 -r1.36
--- pbc.c 21 Jun 2003 11:33:37 -0000 1.35
+++ pbc.c 3 Jul 2003 11:52:56 -0000 1.36
@@ -98,6 +98,7 @@
clear_tables();
hash = globals.key_consts;
clear_tables();
+ free(ghash);
globals.cs = NULL;
}
