bug-texinfo
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

syntax error reported in maintain/generate_code_convert_data.pl


From: Gavin Smith
Subject: syntax error reported in maintain/generate_code_convert_data.pl
Date: Fri, 18 Oct 2024 21:49:00 +0100

The Solaris CI reports a syntax error:

/opt/csw/bin/perl ./../../maintain/generate_code_convert_data.pl \
        < ./main/command_data.c \
            ./../Data/default_css_element_class_styles.csv \
            ./../Data/default_direction_strings.csv \
            ./../Data/default_special_unit_info.csv \
            ./../Data/html_style_commands_element.csv \
            C ./main/conversion_data.c \
            ./main/conversion_data.h
syntax error at ./../../maintain/generate_code_convert_data.pl line 204, near 
"continue"
syntax error at ./../../maintain/generate_code_convert_data.pl line 396, near 
"continue"
Execution of ./../../maintain/generate_code_convert_data.pl aborted due to 
compilation errors.
gmake[3]: Leaving directory 
'/export/home/buildbot/slave/texinfo-solaris10-i386/build/tp/Texinfo/XS'

(from 
https://buildfarm.opencsw.org/buildbot/builders/texinfo-solaris10-i386/builds/5926/steps/shell_2/logs/stdio)

The code in question looks like:

  foreach my $header (@su_header) {
    if ($header =~ /^([^ ]+) ([^ ]+)$/) {
      my $spec = $2;
      if ($spec ne 'string') {
        die "Unknown special unit column spec $spec\n";
      }
      $su_type = $1;
      push @su_ordered_translated_hashes, $su_type;
      $su_header_indices{$su_type} = {$spec => $su_header_index};
    } elsif ($header eq '') {
      continue;
    } else {
      push @su_ordered_untranslated_hashes, $header;
      $su_type = undef;
      $su_header_indices{$header} = $su_header_index;
    }
    $su_header_index++;
  }

I guess "continue;" should have been "next;"?  I have never looked at
this Perl program before and don't know what it is for.




reply via email to

[Prev in Thread] Current Thread [Next in Thread]