l4/pkg/ocaml/ocaml/contrib/debugger/show_source.mli

   1 (***********************************************************************)
   2 (*                                                                     *)
   3 (*                           Objective Caml                            *)
   4 (*                                                                     *)
   5 (*          Jerome Vouillon, projet Cristal, INRIA Rocquencourt        *)
   6 (*          Objective Caml port by John Malecki and Xavier Leroy       *)
   7 (*                                                                     *)
   8 (*  Copyright 1996 Institut National de Recherche en Informatique et   *)
   9 (*  en Automatique.  All rights reserved.  This file is distributed    *)
  10 (*  under the terms of the Q Public License version 1.0.               *)
  11 (*                                                                     *)
  12 (***********************************************************************)
  13
  14 (* $Id: show_source.mli 7767 2006-12-09 13:49:10Z ertai $ *)
  15
  16 (* Print the line containing the point *)
  17 val show_point : Instruct.debug_event -> bool -> unit;;
  18
  19 (* Tell Emacs we are nowhere in the source. *)
  20 val show_no_point : unit -> unit;;
  21
  22 (* Display part of the source. *)
  23 val show_listing : Lexing.position -> string -> int -> int -> int -> bool -> unit;;