diff options
| author | herbelin | 2000-10-18 11:14:58 +0000 |
|---|---|---|
| committer | herbelin | 2000-10-18 11:14:58 +0000 |
| commit | 3a0a4c5dd50e113df5d04b4b76b6bcc5bd40deea (patch) | |
| tree | b324b42cbdadf5bfa0a43bee4740166794706f18 | |
| parent | e11a25974cf69d7c42bccc5e1bedc36a68b54221 (diff) | |
2ème
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@720 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | parsing/pcoq.ml4 | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/parsing/pcoq.ml4 b/parsing/pcoq.ml4 index 01ae437a87..a9338ff2bb 100644 --- a/parsing/pcoq.ml4 +++ b/parsing/pcoq.ml4 @@ -444,9 +444,9 @@ let get_default_action_parser () = !default_action_parser_ref let set_default_action_parser f = (default_action_parser_ref := f) let set_default_action_parser_by_name = function - | "constr" -> set_default_action_parser constr_parser - | "tactic" -> set_default_action_parser tactic_parser - | "vernac" -> set_default_action_parser vernac_parser + | "constr" -> set_default_action_parser !constr_parser + | "tactic" -> set_default_action_parser !tactic_parser + | "vernac" -> set_default_action_parser !vernac_parser | _ -> set_default_action_parser ast let default_action_parser = |