diff options
| author | filliatr | 2001-03-06 07:31:29 +0000 |
|---|---|---|
| committer | filliatr | 2001-03-06 07:31:29 +0000 |
| commit | 2f612369c69e77ae2f1d16ef199b17ba841c02d8 (patch) | |
| tree | 63a8a53443cae13c153cc753e3058e983fe4c3e8 | |
| parent | 663f5bf4f519914998cf6a0ffcd58e737bab2ffb (diff) | |
modifs pour extraction; bug coqmktop
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1428 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | Makefile | 7 | ||||
| -rw-r--r-- | bin/.cvsignore | 1 | ||||
| -rw-r--r-- | dev/ocamldebug-v7.template | 1 | ||||
| -rw-r--r-- | scripts/coqmktop.ml | 2 |
4 files changed, 10 insertions, 1 deletions
@@ -207,6 +207,13 @@ parsing: $(PARSING) pretyping: $(PRETYPING) toplevel: $(TOPLEVEL) +# special binaries for debugging + +EXTRACTIONCMO=contrib/extraction/ocaml.cmo contrib/extraction/extraction.cmo + +bin/coq-extraction: $(COQMKTOP) $(CMO) $(USERTACCMO) + $(COQMKTOP) -top $(INCLUDES) $(CAMLDEBUG) -o $@ $(EXTRACTIONCMO) + ########################################################################### # tests ########################################################################### diff --git a/bin/.cvsignore b/bin/.cvsignore index 4ec23cbfe2..267d455438 100644 --- a/bin/.cvsignore +++ b/bin/.cvsignore @@ -7,3 +7,4 @@ coqdep coq_makefile gallina coq-tex +coq-extraction diff --git a/dev/ocamldebug-v7.template b/dev/ocamldebug-v7.template index b2510be44b..a29c6cb0ab 100644 --- a/dev/ocamldebug-v7.template +++ b/dev/ocamldebug-v7.template @@ -30,6 +30,7 @@ case $coqdebug in -I $COQTOP/proofs -I $COQTOP/tactics \ -I $COQTOP/toplevel -I $COQTOP/dev -I $COQTOP/config \ -I $COQTOP/contrib/omega -I $COQTOP/contrib/ring \ + -I $COQTOP/contrib/extraction \ $* $args;; *) exec $OCAMLDEBUG $*;; esac diff --git a/scripts/coqmktop.ml b/scripts/coqmktop.ml index d8f323d2f2..a58826c417 100644 --- a/scripts/coqmktop.ml +++ b/scripts/coqmktop.ml @@ -219,7 +219,7 @@ let tmp_dynlink()= let _ = Sys.command ("echo \"Dynlink.init();;\" > "^tmp) in let _ = Sys.command (Coq_config.camllib^"/extract_crc"^(crc_cmd Coq_config.camllib)^(crc_cmd Coq_config.camlp4lib)^(rec_crc_cmd - (Coq_config.coqtop^"/src"))^" >> "^tmp) in + Coq_config.coqtop)^" >> "^tmp) in let _ = Sys.command ("echo \";;\" >> "^tmp) in let _ = Sys.command ("echo \"Dynlink.add_available_units crc_unit_list;;\" >> "^ |