helm/software/components/ng_kernel/nCicLibrary.mli

   1 (*
   2     ||M||  This file is part of HELM, an Hypertextual, Electronic
   3     ||A||  Library of Mathematics, developed at the Computer Science
   4     ||T||  Department, University of Bologna, Italy.
   5     ||I||
   6     ||T||  HELM is free software; you can redistribute it and/or
   7     ||A||  modify it under the terms of the GNU General Public License
   8     \   /  version 2 or (at your option) any later version.
   9      \ /   This software is distributed as is, NO WARRANTY.
  10       V_______________________________________________________________ *)
  11
  12 (* $Id$ *)
  13
  14 exception ObjectNotFound of string Lazy.t
  15 exception LibraryOutOfSync of string Lazy.t
  16
  17 type timestamp
  18 val time0: timestamp
  19
  20 val add_obj: NUri.uri -> NCic.obj -> timestamp
  21 val aliases_of: NUri.uri -> NReference.reference list
  22 val resolve: string -> NReference.reference list
  23 val get_obj: NUri.uri -> NCic.obj (* changes the current timestamp *)
  24
  25 val clear_cache : unit -> unit
  26
  27 val time_travel: timestamp -> unit
  28 val decompile: baseuri:NUri.uri -> unit
  29
  30 module type Serializer =
  31  sig
  32   type status
  33   type obj
  34   val register: string -> ('a -> status -> status) -> ('a -> obj)
  35   val serialize: baseuri:NUri.uri -> obj list -> unit
  36   val require: baseuri:NUri.uri -> status -> status
  37  end
  38
  39 module Serializer(S: sig type status end): Serializer with type status= S.status
  40
  41 (* EOF *)