if (not defined $current_field or $current_field->{type} ne $type) {
if (defined $current_field) {
push @fields,$current_field;
if (not defined $current_field or $current_field->{type} ne $type) {
if (defined $current_field) {
push @fields,$current_field;