head	1.2;
access;
symbols
	pkgsrc-2026Q1:1.2.0.50
	pkgsrc-2026Q1-base:1.2
	pkgsrc-2025Q4:1.2.0.48
	pkgsrc-2025Q4-base:1.2
	pkgsrc-2025Q3:1.2.0.46
	pkgsrc-2025Q3-base:1.2
	pkgsrc-2025Q2:1.2.0.44
	pkgsrc-2025Q2-base:1.2
	pkgsrc-2025Q1:1.2.0.42
	pkgsrc-2025Q1-base:1.2
	pkgsrc-2024Q4:1.2.0.40
	pkgsrc-2024Q4-base:1.2
	pkgsrc-2024Q3:1.2.0.38
	pkgsrc-2024Q3-base:1.2
	pkgsrc-2024Q2:1.2.0.36
	pkgsrc-2024Q2-base:1.2
	pkgsrc-2024Q1:1.2.0.34
	pkgsrc-2024Q1-base:1.2
	pkgsrc-2023Q4:1.2.0.32
	pkgsrc-2023Q4-base:1.2
	pkgsrc-2023Q3:1.2.0.30
	pkgsrc-2023Q3-base:1.2
	pkgsrc-2023Q2:1.2.0.28
	pkgsrc-2023Q2-base:1.2
	pkgsrc-2023Q1:1.2.0.26
	pkgsrc-2023Q1-base:1.2
	pkgsrc-2022Q4:1.2.0.24
	pkgsrc-2022Q4-base:1.2
	pkgsrc-2022Q3:1.2.0.22
	pkgsrc-2022Q3-base:1.2
	pkgsrc-2022Q2:1.2.0.20
	pkgsrc-2022Q2-base:1.2
	pkgsrc-2022Q1:1.2.0.18
	pkgsrc-2022Q1-base:1.2
	pkgsrc-2021Q4:1.2.0.16
	pkgsrc-2021Q4-base:1.2
	pkgsrc-2021Q3:1.2.0.14
	pkgsrc-2021Q3-base:1.2
	pkgsrc-2021Q2:1.2.0.12
	pkgsrc-2021Q2-base:1.2
	pkgsrc-2021Q1:1.2.0.10
	pkgsrc-2021Q1-base:1.2
	pkgsrc-2020Q4:1.2.0.8
	pkgsrc-2020Q4-base:1.2
	pkgsrc-2020Q3:1.2.0.6
	pkgsrc-2020Q3-base:1.2
	pkgsrc-2020Q2:1.2.0.4
	pkgsrc-2020Q2-base:1.2
	pkgsrc-2020Q1:1.2.0.2
	pkgsrc-2020Q1-base:1.2
	pkgsrc-2019Q4:1.1.0.18
	pkgsrc-2019Q4-base:1.1
	pkgsrc-2019Q3:1.1.0.14
	pkgsrc-2019Q3-base:1.1
	pkgsrc-2019Q2:1.1.0.12
	pkgsrc-2019Q2-base:1.1
	pkgsrc-2019Q1:1.1.0.10
	pkgsrc-2019Q1-base:1.1
	pkgsrc-2018Q4:1.1.0.8
	pkgsrc-2018Q4-base:1.1
	pkgsrc-2018Q3:1.1.0.6
	pkgsrc-2018Q3-base:1.1
	pkgsrc-2018Q2:1.1.0.4
	pkgsrc-2018Q2-base:1.1
	pkgsrc-2018Q1:1.1.0.2
	pkgsrc-2018Q1-base:1.1;
locks; strict;
comment	@# @;


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

1.1
date	2018.03.14.08.28.44;	author dholland;	state Exp;
branches;
next	;
commitid	zLyENiAd2H3vXouA;


desc
@@


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

fixed compilation with recent versions of OCaml 
git commit 8f25afb95a839c9f9522a34013d5c905af14378b 

--- bibtex_lexer.mll.orig	2014-07-04 07:51:21.000000000 +0000
+++ bibtex_lexer.mll
@@@@ -23,7 +23,7 @@@@
 open Lexing
 open Bibtex_parser
 
-let serious = ref false    (* if we are inside a command or not *) 
+let serious = ref false    (* if we are inside a command or not *)
 
 let brace_depth = ref 0
 
@@@@ -31,12 +31,12 @@@@ let brace_depth = ref 0
 
 let buffer = Buffer.create 8192
 
-let reset_string_buffer () = 
+let reset_string_buffer () =
   Buffer.reset buffer
 
-let store_string_char c = 
+let store_string_char c =
   Buffer.add_char buffer c
- 
+
 let get_stored_string () =
   let s = Buffer.contents buffer in
   Buffer.reset buffer;
@@@@ -55,23 +55,23 @@@@ let space = [' ' '\t' '\r' '\n']
 rule token = parse
   | space +
       { token lexbuf }
-  | '@@' space* 
-    ([^ ' ' '\t' '\n' '\r' '{' '(']+ as entry_type) space* 
+  | '@@' space*
+    ([^ ' ' '\t' '\n' '\r' '{' '(']+ as entry_type) space*
     (('{' | '(') as delim) space*
-       { serious := true; 
-	 start_delim := delim; 
-	 match String.lowercase entry_type with 
-	   | "string" -> 
+       { serious := true;
+	 start_delim := delim;
+	 match String.lowercase_ascii entry_type with
+	   | "string" ->
 	       Tabbrev
-	   | "comment" -> 
+	   | "comment" ->
 	       reset_string_buffer ();
                comment lexbuf;
                serious := false;
                Tcomment (get_stored_string ())
-	   | "preamble" -> 
+	   | "preamble" ->
 	       Tpreamble
-	   |  et -> 
-		Tentry (entry_type, key lexbuf) 
+	   |  et ->
+		Tentry (entry_type, key lexbuf)
        }
   | '=' { if !serious then Tequal else token lexbuf }
   | '#' { if !serious then Tsharp else token lexbuf }
@@@@ -110,7 +110,7 @@@@ and string = parse
       	brace lexbuf;
 	store_string_char '}';
 	string lexbuf
-      }  
+      }
   | '"'
       { () }
   | "\\\""
@@@@ -141,10 +141,10 @@@@ and brace = parse
         brace lexbuf }
 
 and key = parse
-  | [^ ' ' '\t' '\n' '\r' ',']+ 
+  | [^ ' ' '\t' '\n' '\r' ',']+
     { lexeme lexbuf }
-  | eof 
-  | _ 
+  | eof
+  | _
     { raise Parsing.Parse_error }
 
 and comment = parse
@@@@ -153,7 +153,7 @@@@ and comment = parse
   | [^ '}' '@@'] as c
       { store_string_char c;
         comment lexbuf }
-  | eof 
+  | eof
       { () }
-  | _ 
+  | _
       { () }
@


1.1
log
@Fix build with ocaml 4.06.
@
text
@d3 2
a4 1
Silence deprecation warning.
d6 1
a6 1
--- bibtex_lexer.mll~	2014-07-04 07:51:21.000000000 +0000
d8 33
a40 1
@@@@ -60,7 +60,7 @@@@ rule token = parse
d42 2
a43 2
        { serious := true; 
 	 start_delim := delim; 
d45 5
a49 2
+	 match String.lowercase_ascii entry_type with 
 	   | "string" -> 
d51 49
a99 1
 	   | "comment" -> 
@