aboutsummaryrefslogtreecommitdiff
path: root/contrib/extraction/test/extract
diff options
context:
space:
mode:
authorletouzey2001-11-05 17:20:41 +0000
committerletouzey2001-11-05 17:20:41 +0000
commit8cd83fb8dd41521bbc109d37dd49dd3aae0de373 (patch)
tree0292395a354fa041bcfe70976311293994cfe305 /contrib/extraction/test/extract
parent2e6751cdfb0c25274cf789078438df8579b46f7e (diff)
refonte du test
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2162 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'contrib/extraction/test/extract')
-rwxr-xr-xcontrib/extraction/test/extract9
1 files changed, 6 insertions, 3 deletions
diff --git a/contrib/extraction/test/extract b/contrib/extraction/test/extract
index 356a362099..ea85582dff 100755
--- a/contrib/extraction/test/extract
+++ b/contrib/extraction/test/extract
@@ -1,8 +1,11 @@
#!/bin/sh
rm -f /tmp/extr$$.v
-d=`dirname $1`
-n=`basename $1 .v`
-echo "Cd \"$d\". Extraction Module $n. " > /tmp/extr$$.v
+vfile=`./ml2v $1`
+d=`dirname $vfile`
+n=`basename $vfile .v`
+cat custom/all > /tmp/extr$$.v
+if [ -e custom/$n ]; then cat custom/$n >> /tmp/extr$$.v; fi
+echo "Cd \"$d\". Extraction Module $n. " >> /tmp/extr$$.v
../../../bin/coqtop.opt -silent -batch -require $n -load-vernac-source /tmp/extr$$.v
out=$?
rm -f /tmp/extr$$.v