swh:1:snp:9f9174fb54ac68d4510837c2f930cf0558bce5b6
Tip revision: 67e98eaa3714519dfbb21f454f478fa3bb68fdf2 authored by Pierre-Yves Strub on 30 April 2021, 14:14:14 UTC
Merge branch '1.0' into 1.0-preview
Merge branch '1.0' into 1.0-preview
Tip revision: 67e98ea
ecTerminal.mli
(* --------------------------------------------------------------------
* Copyright (c) - 2012--2016 - IMDEA Software Institute
* Copyright (c) - 2012--2018 - Inria
* Copyright (c) - 2012--2018 - Ecole Polytechnique
*
* Distributed under the terms of the CeCILL-C-V1 license
* -------------------------------------------------------------------- *)
(* -------------------------------------------------------------------- *)
type terminal
type status = [
| `ST_Ok
| `ST_Failure of exn
]
type loglevel = EcGState.loglevel
(* -------------------------------------------------------------------- *)
val interactive : terminal -> bool
val next : terminal -> EcParsetree.prog
val notice : immediate:bool -> loglevel -> string -> terminal -> unit
val finish : status -> terminal -> unit
val finalize : terminal -> unit
val setwidth : terminal -> int -> unit
(* -------------------------------------------------------------------- *)
val from_channel : ?gcstats:bool -> name:string -> in_channel -> terminal
val from_tty : unit -> terminal
val from_emacs : unit -> terminal