diff options
Diffstat (limited to 'toplevel/vernacentries.ml')
| -rw-r--r-- | toplevel/vernacentries.ml | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/toplevel/vernacentries.ml b/toplevel/vernacentries.ml index 70feb6ceb..d2a9153fe 100644 --- a/toplevel/vernacentries.ml +++ b/toplevel/vernacentries.ml @@ -620,6 +620,10 @@ let vernac_declare_instance id = Dumpglob.dump_definition id false "inst"; Classes.declare_instance false id +let vernac_declare_class id = + Dumpglob.dump_definition id false "class"; + Classes.declare_class false id + (***********) (* Solving *) let vernac_solve n tcom b = @@ -1338,6 +1342,7 @@ let interp c = match c with | VernacInstance (glob, sup, inst, props, pri) -> vernac_instance glob sup inst props pri | VernacContext sup -> vernac_context sup | VernacDeclareInstance id -> vernac_declare_instance id + | VernacDeclareClass id -> vernac_declare_class id (* Solving *) | VernacSolve (n,tac,b) -> vernac_solve n tac b |