Skip to content
Snippets Groups Projects
Commit ea4f36e6 authored by Reinhold Kainhofer's avatar Reinhold Kainhofer
Browse files

TimeSig: Better warnings

parent 796f6552
Branches
Tags
No related merge requests found
......@@ -795,10 +795,9 @@ sub timesignature {
print "Alternating time signature \"$timesig\" not supported by MusicXML, falling back to $1.\n";
$timesig = $1;
}
# TODO:
if ($timesig =~ /^c((\d+)(\/(\d+))?)$/gs) {
print "Time signature \"$timesig\" not supported by MusicXML, falling back to $1.\n";
$timesig = "$1"; # it would be better to show the "C". Example: 451.023.814
$timesig = "$1"; # TODO: it would be better to show the "C". Example: 451.023.814
}
# For missing timesignature, fall back to "c"
......@@ -814,7 +813,7 @@ sub timesignature {
$symbol = "single-number";
($beats, $beattype) = ($1,2);
} else {
print_error("Time signature '$timesig' looks strange.\n");
print_error("Time signature '$timesig' looks strange, falling back to 4/4.\n");
($beats, $beattype) = (4,4);
}
if ($symbol) {
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment