class type g_status =
object
inherit LexiconEngine.g_status
- inherit NRstatus.g_dumpable_status
+ inherit NCicLibrary.g_dumpable_status
end
class status =
object (self)
inherit LexiconEngine.status
- inherit NRstatus.dumpable_status
+ inherit NCicLibrary.dumpable_status
method set_estatus : 'status. #g_status as 'status -> 'self
= fun o -> (self#set_lexicon_engine_status o)#set_dumpable_status o
end