diff options
Diffstat (limited to 'Examples/test-suite/ocaml/makedebugtop')
| -rwxr-xr-x | Examples/test-suite/ocaml/makedebugtop | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/Examples/test-suite/ocaml/makedebugtop b/Examples/test-suite/ocaml/makedebugtop new file mode 100755 index 0000000..d51439a --- /dev/null +++ b/Examples/test-suite/ocaml/makedebugtop @@ -0,0 +1,21 @@ +#!/bin/sh +# +# Usage: makedebugtop test_name.c[pp]test +# +# Creates an ocaml toplevel for debugging based on a .cpptest or .ctest +# file. +# + +OCAMLINC=/usr/local/lib/ocaml +swigtest=$1 +thetest=`echo $1 | sed -e 's/\.c[p]*test//g'` +cppopt="" +if echo $swigtest | grep -s cpptest ; then + cppopt=-xc++ +fi + +echo "Making the test" +make $swigtest +echo "Building ${thetest}_top" +gcc -c -g $cppopt -I$OCAMLINC ${thetest}_wrap.c +ocamlmktop -cclib -g -custom swig.cmo ${thetest}_wrap.o ${thetest}.cmo -o ${thetest}_top -cclib -lstdc++ |