Changeset 890 for box/chris/merge/lib/common/makeexception.pl.in
- Timestamp:
- 31/08/2006 23:32:17 (6 years ago)
- File:
-
- 1 edited
-
box/chris/merge/lib/common/makeexception.pl.in (modified) (3 diffs)
Legend:
- Unmodified
- Added
- Removed
-
box/chris/merge/lib/common/makeexception.pl.in
r710 r890 1 1 #!@PERL@ 2 3 use lib "../../infrastructure";4 use BoxPlatform;5 2 6 3 # global exception list file 7 4 my $global_list = '../../ExceptionCodes.txt'; 5 8 6 9 7 my @exception; … … 49 47 print "Generating $class exception...\n"; 50 48 51 open CPP,">autogen_${class}Exception.cpp .new" or die "Can't open cpp file for writing";52 open H,">autogen_${class}Exception.h .new" or die "Can't open h file for writing";49 open CPP,">autogen_${class}Exception.cpp" or die "Can't open cpp file for writing"; 50 open H,">autogen_${class}Exception.h" or die "Can't open h file for writing"; 53 51 54 52 # write header file … … 202 200 close H; 203 201 close CPP; 204 205 update_if_changed("autogen_${class}Exception.cpp");206 update_if_changed("autogen_${class}Exception.h");207 202 208 203 # update the global exception list
Note: See TracChangeset
for help on using the changeset viewer.
