← Back to branch summary

~npalix/coccinelle/upstream

« back to all changes in this revision

Viewing changes to bundles/stdcompat/stdcompat-current/interfaces/4.03/lexing.mli

  • Committer: Thierry Martinez
  • Date: 2019-08-20 13:37:04 UTC
  • Revision ID: git-v1:0214afad4a32c95349c2c5a38e37cea407c455d0
Update bundles

Show diffs side-by-side

added added

removed removed

Lines of Context:
bundles/stdcompat/stdcompat-current/interfaces/4.03/lexing.mli
 
1
type position =
 
2
  {
 
3
  pos_fname: string ;
 
4
  pos_lnum: int ;
 
5
  pos_bol: int ;
 
6
  pos_cnum: int }
 
7
val dummy_pos : position
 
8
type lexbuf =
 
9
  {
 
10
  refill_buff: lexbuf -> unit ;
 
11
  mutable lex_buffer: bytes ;
 
12
  mutable lex_buffer_len: int ;
 
13
  mutable lex_abs_pos: int ;
 
14
  mutable lex_start_pos: int ;
 
15
  mutable lex_curr_pos: int ;
 
16
  mutable lex_last_pos: int ;
 
17
  mutable lex_last_action: int ;
 
18
  mutable lex_eof_reached: bool ;
 
19
  mutable lex_mem: int array ;
 
20
  mutable lex_start_p: position ;
 
21
  mutable lex_curr_p: position }
 
22
val from_channel : in_channel -> lexbuf
 
23
val from_string : string -> lexbuf
 
24
val from_function : (bytes -> int -> int) -> lexbuf
 
25
val lexeme : lexbuf -> string
 
26
val lexeme_char : lexbuf -> int -> char
 
27
val lexeme_start : lexbuf -> int
 
28
val lexeme_end : lexbuf -> int
 
29
val lexeme_start_p : lexbuf -> position
 
30
val lexeme_end_p : lexbuf -> position
 
31
val new_line : lexbuf -> unit
 
32
val flush_input : lexbuf -> unit
 
33
val sub_lexeme : lexbuf -> int -> int -> string
 
34
val sub_lexeme_opt : lexbuf -> int -> int -> string option
 
35
val sub_lexeme_char : lexbuf -> int -> char
 
36
val sub_lexeme_char_opt : lexbuf -> int -> char option
 
37
type lex_tables =
 
38
  {
 
39
  lex_base: string ;
 
40
  lex_backtrk: string ;
 
41
  lex_default: string ;
 
42
  lex_trans: string ;
 
43
  lex_check: string ;
 
44
  lex_base_code: string ;
 
45
  lex_backtrk_code: string ;
 
46
  lex_default_code: string ;
 
47
  lex_trans_code: string ;
 
48
  lex_check_code: string ;
 
49
  lex_code: string }
 
50
val engine : lex_tables -> int -> lexbuf -> int
 
51
val new_engine : lex_tables -> int -> lexbuf -> int