Commit 13c2b465 authored by Matthieu Muffato's avatar Matthieu Muffato
Browse files

Complain if it cannot parse the file

parent 716d11c3
......@@ -340,6 +340,8 @@ if ($fk_sql_file) {
my $doc = remove_char($_);
if ($doc =~ /ALTER\s+TABLE\s+(\S+)\s+ADD.*FOREIGN\s+KEY\s+\((\S+)\)\s+REFERENCES\s+(\S+)\((\S+)\)/i) {
push @{$table_documentation{$1}->{foreign_keys}}, [$2,$3,$4];
} elsif ($doc =~ /ALTER.*FOREIGN/i) {
die "Unrecognized: $doc";
}
}
close($sql_fh);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment