diff options
Diffstat (limited to 'printing')
| -rw-r--r-- | printing/ppvernac.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/printing/ppvernac.ml b/printing/ppvernac.ml index b5277b62e3..06d0958183 100644 --- a/printing/ppvernac.ml +++ b/printing/ppvernac.ml @@ -480,7 +480,7 @@ let rec pr_vernac = function | VernacStm JoinDocument -> str"Stm JoinDocument" | VernacStm Finish -> str"Stm Finish" | VernacStm (Observe id) -> - str"Stm Observe " ++ str(Stateid.string_of_state_id id) + str"Stm Observe " ++ str(Stateid.to_string id) | VernacStm (Command v) -> str"Stm Command " ++ pr_vernac v | VernacStm (PGLast v) -> str"Stm PGLast " ++ pr_vernac v |