- inherit NRstatus.dumpable_status
- method set_estatus o =
- (self#set_lexicon_engine_status (o :> LexiconEngine.status))
- #set_dumpable_status (o :> 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