Generate set-field(all-fields) setters for selected inline structures.
[panamaz] / src / notzed.vulkan / gen / vulkan.pm
index fe85338..69f94ef 100644 (file)
@@ -7,7 +7,6 @@ use strict;
 
 use Data::Dumper;
 use XML::Parser;
-use Time::HiRes qw(clock_gettime CLOCK_REALTIME);
 
 sub new {
        my $class = shift;
@@ -25,13 +24,8 @@ sub new {
 
        bless $self, $class;
 
-       my $now = clock_gettime(CLOCK_REALTIME);
-
        loadRegistry($self);
 
-       $now = clock_gettime(CLOCK_REALTIME) - $now;
-       print "$now load registry\n";
-
        # build various indices
        my $data = $self->{data};
        my $handles = $self->{handles};