blob: 3f4a59d4907d5283c3389f5c0665c5904ad45bf4 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
#!/bin/sh
rm -f /tmp/extr$$.v
vfile=`./hs2v $1`
d=`dirname $vfile`
n=`basename $vfile .v`
if [ -e custom/$n ]; then cat custom/$n > /tmp/extr$$.v; fi
echo "Cd \"$d\". Extraction Language Haskell. 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
exit $out
|