add patterns for ocaml errors

svn-id: @12645

1 files changed, 10 insertions, 0 deletions

diff --git a/findbr b/findbr
index ca7fa66..951b771 100755
--- a/findbr
+++ b/findbr
@@ -281,11 +281,21 @@ while ( $_ = shift @lines ) {
 		warn "Looking for package $pkg\n";
 		poldek_file( "/usr/lib*/pkgconfig/$pkg.pc" );
 	}
+
+	if (/^ocamlfind: Package `(\S+)' not found - required by/
+		or m{Camlp4: Uncaught exception: DynLoader.Error \("(\S+)", "file not found in path"\)}
+		) {
+		my $pkg = $1;
+		warn "Looking for ocaml package $pkg\n";
+		poldek_file( "/usr/lib*/ocaml/*/$pkg.a", "/usr/lib*/ocaml/*/$pkg");
+	}
+
 	if ( m{^cp: cannot stat `(/.*)': No such file or directory$} ) {
 		my $f = $1;
 		warn "Looking for file $f\n";
 		poldek_file( $f );
 	}
+
 	if ( m{^find-lang.sh: Error: international files not found for '}
 			or m{ gettext tools not found}
 			) {