Changeset 2990 for box

Timestamp:

28/08/2011 17:07:25 (9 months ago)

Author:

chris

Message:

Output the names of protocol files being written.

File:

• box/trunk/lib/server/makeprotocol.pl.in (modified) (2 diffs)

box/trunk/lib/server/makeprotocol.pl.in

@@ -142 +142 @@
 
 # open files
-my $h_filename = 'autogen_'.$protocol_name.'Protocol.h';
-open CPP,'>autogen_'.$protocol_name.'Protocol.cpp';
-open H,">$h_filename";
+my $filename_base = 'autogen_'.$protocol_name.'Protocol';
+print "Writing $filename_base.cpp\n";
+print "Writing $filename_base.h\n";
+open CPP, "> $filename_base.cpp";
+open H,   "> $filename_base.h";
 
 my $guardname = uc 'AUTOGEN_'.$protocol_name.'Protocol_H';
@@ -156 +158 @@
 #include <sstream>
 
-#include "$h_filename"
+#include "$filename_base.h"
 #include "IOStream.h"
 __E