package diffast-langs-fortran-parsing

  1. Overview
  2. Docs
Legend:
Library
Module
Module type
Parameter
Class
Class type

Parameters

Signature

module PA = Parser_aux
module Aux : sig ... end
module TokenF : sig ... end
module LineStat = Parser_aux.LineStat
val from_string : string -> Sedlexing.lexbuf
val special_fname : string
val lexing_pos_start : Sedlexing.lexbuf -> Lexing.position
val lexing_pos_end : Sedlexing.lexbuf -> Lexing.position
val get_lc : Lexing.position -> int * int
val lexbuf_from_line : Lexing.position -> int -> string -> Sedlexing.lexbuf
val is_free_source_form : unit -> bool
val is_fixed_source_form : unit -> bool
val normalize_continued_string : string -> string
val startswith_digit : string -> bool
val is_header_filename : string -> bool
val is_white_space : char -> bool
val is_white_space_c : int -> bool
val mkloc : Sedlexing.lexbuf -> Loc.t
val get_last_char : 'a -> char
val is_letter_or_uscore : char -> bool
val get_last_int_literal : string -> int
val mklabel : 'a -> Sedlexing.lexbuf -> 'a * Loc.t
val merge_label : (string * Langs_common.Astloc.t) -> (string * Langs_common.Astloc.t) -> string * Langs_common.Astloc.t
val register_label : (string * Loc.t) -> unit
type margin_stat = {
  1. mutable ms_in_margin : bool;
  2. mutable ms_open_paren : bool;
  3. mutable ms_open_char : PA.char_context;
}
type comment_type =
  1. | C_fixed
  2. | C_free
val comment_type_to_string : comment_type -> string
exception Sep_found of string
class guess_env : object ... end
val check_pos : ?is_blank:bool -> < enter_margin : unit ; in_char : bool ; in_margin : bool ; incr_long_line_count : unit ; pos : int ; set_last_nonblank_char_within_limit : char -> 'a ; set_second_last_nonblank_char_within_limit : char -> unit ; stmt : string.. > -> unit
val head_keywords : string Fortran_parsing.Common.Xset.t
val lexeme : Sedlexing.lexbuf -> string
val scan_label_field : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val possibly_free : ?head_symbol:string -> guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val _scan_label_field : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val skip_line : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_block_comment_label : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_tab_label_field : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_block_comment_tab : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_continuation_field : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_block_comment_cont : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_stmt : ?is_head:bool -> guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_hollerith : guess_env -> SF.t -> int -> int -> Sedlexing.lexbuf -> SF.t
val scan_hollerith_continuation : guess_env -> SF.t -> int -> int -> int -> Sedlexing.lexbuf -> SF.t
val scan_hollerith_skip_line : guess_env -> SF.t -> int -> int -> Sedlexing.lexbuf -> SF.t
val scan_block_comment_stmt : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_char_single : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_char_double : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_comment : comment_type -> ?is_blank:bool -> guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_pp_directive : guess_env -> SF.t -> Sedlexing.lexbuf -> SF.t
val scan_name : guess_env -> Sedlexing.lexbuf -> string
val _guess_source_form : Sedlexing.lexbuf -> SF.t
val name : int -> Sedlexing.lexbuf -> (string -> Tokens_.token) * int
val name_sub : (string -> Tokens_.token) -> int -> Sedlexing.lexbuf -> (string -> Tokens_.token) * int
val tokenize_name : string -> Tokens_.token
exception Invalid_ocl
val find_ocl_keyword : string -> Tokens_.token
val find_omp_keyword : ?no_ident:bool -> string -> Tokens_.token
val get_omp_keyword_string : Tokens_.token -> string
val get_omp_continuable_keyword : Tokens_.token -> string
val get_omp_following_keyword : Tokens_.token -> string
val find_acc_keyword : ?no_ident:bool -> string -> Tokens_.token
val get_acc_keyword_string : Tokens_.token -> string
val blank_pat : Str.regexp
val find_xlf_keyword : string -> Tokens_.token
val find_dec_keyword : string -> Tokens_.token
type pp_define_stat =
  1. | D_id
  2. | D_params
  3. | D_body
  4. | D_finished
val add_comment_region : Langs_common.Astloc.t -> unit
val mktok : ?force_max_line_length:int option -> ?set_token_feeded:bool -> ?pending:bool -> ?start_opt:Lexing.position option -> ?end_opt:Lexing.position option -> Tokens_.token -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val mklab : (string * Loc.t) option -> Sedlexing.lexbuf -> string * Loc.t
val discard_pending_RAWOMP : unit -> unit
val queue_pending_RAWOMP : unit -> unit
val rollback : Sedlexing.lexbuf -> unit
val _token : ?pp_pending_EOL:Tokens_.token Fortran_parsing.Common.PB.qtoken option -> ?identifier_may_continue:bool -> ?hollerith_may_continue:bool -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val skip_char_single : ?is_CC:bool -> Lexing.position -> string -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val skip_char_double : ?is_CC:bool -> Lexing.position -> string -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val label_field : ?pending_EOL:Tokens_.token Fortran_parsing.Common.PB.qtoken option -> (string * Loc.t) option -> int -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val check_continuation : Tokens_.token Fortran_parsing.Common.PB.qtoken option -> Tokens_.token -> Loc.t -> bool * bool
val hollerith : ?partial:bool -> Lexing.position -> int -> int -> int -> string -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val hollerith_continuation : ?partial:bool -> Lexing.position -> int -> int -> int -> string -> int -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val hollerith_skip_line : ?partial:bool -> Lexing.position -> int -> int -> int -> string -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val block_comment : ?pp_pending_EOL:Tokens_.token Fortran_parsing.Common.PB.qtoken option -> ?identifier_may_continue:bool -> Lexing.position -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val block_comment_label : ?pending_EOL:Tokens_.token Fortran_parsing.Common.PB.qtoken option -> (string * Loc.t) option -> int -> Lexing.position -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val is_fixed_cont_line : ?assume_fixed_source_form:bool -> string -> bool
val is_free_cont_line : ?assume_free_source_form:bool -> string -> bool
val get_xlf_token_queue : Lexing.position -> int -> string -> Obj.t Fortran_parsing.Common.Xqueue.c
val get_omp_token_queue : Lexing.position -> int -> string -> Obj.t Fortran_parsing.Common.Xqueue.c
val omp : ?in_comment:bool -> ?pending_EOL:Tokens_.token Fortran_parsing.Common.PB.qtoken option -> ?offset:int -> bool -> Lexing.position -> string -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
val get_acc_token_queue : Lexing.position -> int -> string -> Obj.t Fortran_parsing.Common.Xqueue.c
val pre_pp_macro_arguments : Sedlexing.lexbuf -> bool
val pp_macro_arguments : int -> string list -> string -> Sedlexing.lexbuf -> string list * Lexing.position
val pp_char_single : int -> string list -> string -> Sedlexing.lexbuf -> string list * Lexing.position
val pp_char_double : int -> string list -> string -> Sedlexing.lexbuf -> string list * Lexing.position
val pp_define : Lexing.position -> string -> string list option -> string -> Lexing.position -> pp_define_stat -> Sedlexing.lexbuf -> Tokens_.token Fortran_parsing.Common.PB.qtoken
OCaml

Innovation. Community. Security.