diff options
author | 2017-09-15 10:27:37 +0200 | |
---|---|---|
committer | 2017-09-15 10:27:37 +0200 | |
commit | 8c097e35835c4a31a24c043c1bc36ff9d356a87c (patch) | |
tree | 4fb422e2c20ce00f21a37f3c66b1effbe3c9de5f | |
parent | 6c678a68c081ce24bbdcb092db3f57ef7e171dac (diff) | |
parent | 8d5165155dc4d9e4c03507609bf1b7a24a8ce4d0 (diff) |
Merge PR #1025: BZ#5716, read flags from project file for Compile Buffer
-rw-r--r-- | CHANGES | 5 | ||||
-rw-r--r-- | ide/coqide.ml | 4 |
2 files changed, 8 insertions, 1 deletions
@@ -13,6 +13,11 @@ Tactics profiling, and "Set NativeCompute Profile Filename" customizes the profile filename. +Tools + +- In CoqIDE, the "Compile Buffer" command takes account of flags in + _CoqProject or other project file. + Changes from 8.6.1 to 8.7+beta ============================== diff --git a/ide/coqide.ml b/ide/coqide.ml index 7b65c9fec..2c8ce0049 100644 --- a/ide/coqide.ml +++ b/ide/coqide.ml @@ -439,7 +439,9 @@ let compile sn = match sn.fileops#filename with |None -> flash_info "Active buffer has no name" |Some f -> - let cmd = cmd_coqc#get ^ " -I " ^ (Filename.quote (Filename.dirname f)) + let args = Coq.get_arguments sn.coqtop in + let cmd = cmd_coqc#get + ^ " " ^ String.concat " " args ^ " " ^ (Filename.quote f) ^ " 2>&1" in let buf = Buffer.create 1024 in |