head	1.1;
access;
symbols
	pkgsrc-2026Q1:1.1.0.50
	pkgsrc-2026Q1-base:1.1
	pkgsrc-2025Q4:1.1.0.48
	pkgsrc-2025Q4-base:1.1
	pkgsrc-2025Q3:1.1.0.46
	pkgsrc-2025Q3-base:1.1
	pkgsrc-2025Q2:1.1.0.44
	pkgsrc-2025Q2-base:1.1
	pkgsrc-2025Q1:1.1.0.42
	pkgsrc-2025Q1-base:1.1
	pkgsrc-2024Q4:1.1.0.40
	pkgsrc-2024Q4-base:1.1
	pkgsrc-2024Q3:1.1.0.38
	pkgsrc-2024Q3-base:1.1
	pkgsrc-2024Q2:1.1.0.36
	pkgsrc-2024Q2-base:1.1
	pkgsrc-2024Q1:1.1.0.34
	pkgsrc-2024Q1-base:1.1
	pkgsrc-2023Q4:1.1.0.32
	pkgsrc-2023Q4-base:1.1
	pkgsrc-2023Q3:1.1.0.30
	pkgsrc-2023Q3-base:1.1
	pkgsrc-2023Q2:1.1.0.28
	pkgsrc-2023Q2-base:1.1
	pkgsrc-2023Q1:1.1.0.26
	pkgsrc-2023Q1-base:1.1
	pkgsrc-2022Q4:1.1.0.24
	pkgsrc-2022Q4-base:1.1
	pkgsrc-2022Q3:1.1.0.22
	pkgsrc-2022Q3-base:1.1
	pkgsrc-2022Q2:1.1.0.20
	pkgsrc-2022Q2-base:1.1
	pkgsrc-2022Q1:1.1.0.18
	pkgsrc-2022Q1-base:1.1
	pkgsrc-2021Q4:1.1.0.16
	pkgsrc-2021Q4-base:1.1
	pkgsrc-2021Q3:1.1.0.14
	pkgsrc-2021Q3-base:1.1
	pkgsrc-2021Q2:1.1.0.12
	pkgsrc-2021Q2-base:1.1
	pkgsrc-2021Q1:1.1.0.10
	pkgsrc-2021Q1-base:1.1
	pkgsrc-2020Q4:1.1.0.8
	pkgsrc-2020Q4-base:1.1
	pkgsrc-2020Q3:1.1.0.6
	pkgsrc-2020Q3-base:1.1
	pkgsrc-2020Q2:1.1.0.4
	pkgsrc-2020Q2-base:1.1
	pkgsrc-2020Q1:1.1.0.2
	pkgsrc-2020Q1-base:1.1;
locks; strict;
comment	@# @;


1.1
date	2019.12.31.19.46.12;	author markd;	state Exp;
branches;
next	;
commitid	NX4FLcla0EcwATQB;


desc
@@


1.1
log
@bibtex2html: build with current ocaml
@
text
@$NetBSD$

fixed compilation with recent versions of OCaml
git commit 8f25afb95a839c9f9522a34013d5c905af14378b

--- bbl_lexer.mll.orig	2014-07-04 07:51:21.000000000 +0000
+++ bbl_lexer.mll
@@@@ -39,7 +39,7 @@@@ rule biblio_header = parse
       { biblio_name lexbuf }
   | eof
       { raise End_of_file }
-  | _ 
+  | _
       { biblio_header lexbuf }
 
 and biblio_name = parse
@@@@ -48,15 +48,15 @@@@ and biblio_name = parse
 	let s = String.sub l 1 (String.length l - 2) in
         Some s }
   | _
-      { None } 
+      { None }
 
 and bibitem = parse
   | "\\end{thebibliography}"
       { raise End_of_biblio }
   | '\\' ['a'-'z']* "bibitem"
       { brace_depth := 0;
-	begin try bibitem1 lexbuf 
-	      with Failure "lexing: empty token" -> opt_ref := None end;
+	begin try bibitem1 lexbuf
+	      with Failure _ -> opt_ref := None end;
         bibitem2 lexbuf }
   | _ { bibitem lexbuf }
 
@@@@ -70,7 +70,7 @@@@ and bibitem1_body = parse
   | eof   { raise End_of_file }
 
 and bibitem2 = parse
-  | '{' { Buffer.reset buf; 
+  | '{' { Buffer.reset buf;
 	  key := bibitem2_body lexbuf;
 	  skip_end_of_line lexbuf;
 	  Buffer.reset buf;
@