X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_refiner%2FnRstatus.mli;h=631e629e5a663060a1f314fdd738ff809cc90ad9;hb=513c4a61f11ce03888a8a0f9d8e513de6e3a7c8b;hp=89f62ce1d3c5d42bb79b06a3161af110972ac1b5;hpb=f4c17198d8afe7c8cd62dbab527d08902d891491;p=helm.git diff --git a/helm/software/components/ng_refiner/nRstatus.mli b/helm/software/components/ng_refiner/nRstatus.mli index 89f62ce1d..631e629e5 100644 --- a/helm/software/components/ng_refiner/nRstatus.mli +++ b/helm/software/components/ng_refiner/nRstatus.mli @@ -11,31 +11,7 @@ (* $Id: nCicRefiner.ml 9802 2009-05-25 15:39:26Z tassi $ *) -class status : - object ('self) - inherit NCicUnifHint.status - inherit NCicCoercion.status - inherit NCicLibrary.status - method set_rstatus: - < coerc_db : NCicCoercion.db; - uhint_db : NCicUnifHint.db; - timestamp: NCicLibrary.timestamp; .. > -> 'self - end +class type g_status = NCicCoercion.status -module Serializer: - sig - include NCicLibrary.Serializer with type status = status - val require: baseuri:NUri.uri -> (#status as 'status) -> 'status - end +class status : NCicCoercion.status -class dumpable_status : - object ('self) - inherit status - method dump: Serializer.obj list - method set_dump: Serializer.obj list -> 'self - method set_dumpable_status: - < coerc_db : NCicCoercion.db; - uhint_db : NCicUnifHint.db; - timestamp: NCicLibrary.timestamp; - dump: Serializer.obj list; .. > -> 'self - end