ocp-indent-nlfork

ocp-indent library, "newline tokens" fork
IN THIS PACKAGE
Module Approx_lexer
include module type of struct include Approx_tokens end
type 'a overflow = 'a Approx_tokens.overflow =
| InRange of 'a
| Overflow of string
type token = Approx_tokens.token =
| AMPERAMPER
| AMPERSAND
| AND
| AS
| ASSERT
| BACKQUOTE
| BANG
| BAR
| BARBAR
| BARRBRACKET
| BEGIN
| CHAR of char overflow
| CLASS
| COLON
| COLONCOLON
| COLONEQUAL
| COLONGREATER
| CONSTRAINT
| DO
| DONE
| DOT
| DOTDOT
| DOWNTO
| ELSE
| END
| EOF
| EQUAL
| EXCEPTION
| EXTERNAL
| FALSE
| FLOAT of string
| FOR
| FUN
| FUNCTION
| FUNCTOR
| GREATER
| GREATERRBRACE
| GREATERRBRACKET
| IF
| IN
| INCLUDE
| INFIXOP0 of string
| INFIXOP1 of string
| INFIXOP2 of string
| INFIXOP3 of string
| INFIXOP4 of string
| INHERIT
| INITIALIZER
| INT of int overflow
| INT32 of int32 overflow
| INT64 of int64 overflow
| LABEL of string
| LAZY
| LBRACE
| LBRACELESS
| LBRACKET
| LBRACKETBAR
| LBRACKETLESS
| LBRACKETGREATER
| LBRACKETPERCENT
| LBRACKETPERCENTPERCENT
| LBRACKETAT
| LBRACKETATAT
| LBRACKETATATAT
| LESS
| LESSMINUS
| LET
| LIDENT of string
| LINE_DIRECTIVE of string
| LPAREN
| MATCH
| METHOD
| MINUS
| MINUSDOT
| MINUSGREATER
| MODULE
| MUTABLE
| NATIVEINT of nativeint overflow
| NEW
| OBJECT
| OF
| OPEN
| OPTLABEL of string
| OR
| PLUS
| PLUSDOT
| PREFIXOP of string
| PRIVATE
| QUESTION
| QUESTIONQUESTION
| QUOTE
| RBRACE
| RBRACKET
| REC
| RPAREN
| SEMI
| SEMISEMI
| SHARP
| SIG
| STAR
| STRUCT
| THEN
| TILDE
| TO
| TRUE
| TRY
| TYPE
| TYPEVAR
| UIDENT of string
| UNDERSCORE
| VAL
| VIRTUAL
| WHEN
| WHILE
| WITH
| ESCAPED_EOL
| EOL
| SPACES
| ILLEGAL_CHAR of char
| COMMA
| COMMENT_OPEN_EOL
| COMMENT_OPEN
| COMMENT_OPEN_CLOSE
| COMMENT_VERB_OPEN
| COMMENT_CODE_OPEN
| COMMENT_CONTENT
| COMMENT_CLOSE
| COMMENT_VERB_CLOSE
| COMMENT_CODE_CLOSE
| STRING_OPEN
| STRING_CONTENT
| STRING_CLOSE
| PPX_QUOTATION_OPEN
| PPX_QUOTATION_CONTENT
| PPX_QUOTATION_CLOSE
| P4_QUOTATION_OPEN
| P4_QUOTATION_CONTENT
| P4_QUOTATION_CLOSE
val string_of_tok : token -> string
type state =
| Newline
| String
| Quotation_p4
| Quotation_ppx of string
| Comment
| Code
| Verbatim
val print_state : Format.formatter -> state -> unit
type context = {
lines_starts : (int * int) list;
stack : state list;
eof_closing : bool;
comment_closing : bool;
}
val print_context : Format.formatter -> context -> unit
val keywords : (string * token) list
val keyword_table : ( string, token ) Hashtbl.t
val lexer_extensions : ( Lexing.lexbuf -> Approx_tokens.token ) list ref
val enable_extension : string -> unit
val disable_extensions : unit -> unit
val eof : context -> context * token
val initial_state : context
val rewind : Lexing.lexbuf -> int -> unit
val char_for_backslash : char -> char
val can_overflow : ( string -> 'a ) -> Lexing.lexbuf -> 'a overflow
val char_for_decimal_code : int -> string -> char
val char_for_hexadecimal_code : Lexing.lexbuf -> int -> char
val cvt_int_literal : string -> int
val cvt_int32_literal : string -> int32
val cvt_int64_literal : string -> int64
val cvt_nativeint_literal : string -> nativeint
val remove_underscores : string -> string
val update_loc : context -> Lexing.lexbuf -> int -> int -> context
val __ocaml_lex_tables : Stdlib.Lexing.lex_tables
val code_newline : context -> Lexing.lexbuf -> context * token
val __ocaml_lex_code_newline_rec : context -> Lexing.lexbuf -> int -> context * token
val code : context -> Lexing.lexbuf -> context * token
val __ocaml_lex_code_rec : context -> Lexing.lexbuf -> int -> context * token
val p4_quotation : context -> Lexing.lexbuf -> context * token
val __ocaml_lex_p4_quotation_rec : context -> Lexing.lexbuf -> int -> context * token
val ppx_quotation : context -> Lexing.lexbuf -> context * token
val __ocaml_lex_ppx_quotation_rec : context -> Lexing.lexbuf -> int -> context * token
val comment : context -> Lexing.lexbuf -> context * token
val __ocaml_lex_comment_rec : context -> Lexing.lexbuf -> int -> context * token
val string : context -> Lexing.lexbuf -> context * token
val __ocaml_lex_string_rec : context -> Lexing.lexbuf -> int -> context * token
val token : context -> Lexing.lexbuf -> context * token
val tokens : context -> Lexing.lexbuf -> (token * string * state list) list
val tokens_of_string : ?st:context -> string -> (token * string * state list) list
val tokens_of_file : ?st:context -> string -> (token * string * state list) list
module Simple : sig ... end