Changeset 899

Timestamp:

31/08/2006 23:56:11 (5 years ago)

Author:

chris

Message:

Revert to trunk

File:

• box/chris/merge/lib/server/makeprotocol.pl.in (modified) (4 diffs)

box/chris/merge/lib/server/makeprotocol.pl.in

@@ -1 +1 @@
 #!@PERL@
 use strict;
-
-use lib "../../infrastructure";
-use BoxPlatform;
 
 # Make protocol C++ classes from a protocol description file
@@ -171 +168 @@
 # open files
 my $h_filename = 'autogen_'.$protocol_name.'Protocol'.$type.'.h';
-open CPP,'>autogen_'.$protocol_name.'Protocol'.$type.'.cpp.new';
-open H,">$h_filename.new";
+open CPP,'>autogen_'.$protocol_name.'Protocol'.$type.'.cpp';
+open H,">$h_filename";
 
 print CPP <<__E;
@@ -916 +913 @@
 close CPP;
 
-update_if_changed('autogen_'.$protocol_name.'Protocol'.$type.'.cpp');
-update_if_changed($h_filename);
 
 sub obj_is_type
@@ -987 +982 @@
                         # need to translate it
                         my ($format,$arg) = @{$log_display_types{$ty}};
+                        push @str,$format;
                         $arg =~ s/VAR/m$nm/g;
-
-                        if ($format eq "0x%llx" and $target_windows)
-                        {
-                                $format = "0x%I64x";
-                                $arg = "(uint64_t)$arg";
-                        }
-
-                        push @str,$format;
                         push @arg,$arg;
                 }