diff options
| author |  gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-09-30 16:10:03 +0000 |
|---|---|---|
| committer | gareuselesinge <gareuselesinge@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2013-09-30 16:10:03 +0000 |
| commit | c96140256591d98b806a777e5e400f89f614a798 (patch) | |
| tree | 22e3bf972648382e0ae3069d23d03d9a14d3f567 /ide/coqide.ml | |
| parent | 94ad539b17f1509540517ccdedefcda7cdd5fd4f (diff) | |
Backtrace.record_backtrace in CoqIDE too
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16822 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'ide/coqide.ml')
| -rw-r--r-- | ide/coqide.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ide/coqide.ml b/ide/coqide.ml index cdd1a9e48..165d7b080 100644 --- a/ide/coqide.ml +++ b/ide/coqide.ml @@ -1440,6 +1440,7 @@ let read_coqide_args argv = output_string stderr "Error: missing argument after -coqtop"; exit 1 |"-debug"::args -> Minilib.debug := true; + Backtrace.record_backtrace true; filter_coqtop coqtop project_files ("-debug"::out) args |arg::args -> filter_coqtop coqtop project_files (arg::out) args |[] -> (coqtop,List.rev project_files,List.rev out) |