/trunk/Examples/test-suite/ocaml/makedebugtop

# · Shell · 21 lines · 12 code · 2 blank · 7 comment · 1 complexity · da4f05ee6d1382f3a0534943c7a95467 MD5 · raw file 

    

  1. #!/bin/sh
    2. 

  2. #
    3. 

  3. # Usage: makedebugtop test_name.c[pp]test
    4. 

  4. #
    5. 

  5. # Creates an ocaml toplevel for debugging based on a .cpptest or .ctest
    6. 

  6. # file.
    7. 

  7. #
    8. 

  8. 

  9. OCAMLINC=/usr/local/lib/ocaml
    10. 

  10. swigtest=$1
    11. 

  11. thetest=`echo $1 | sed -e 's/\.c[p]*test//g'`
    12. 

  12. cppopt=""
    13. 

  13. if echo $swigtest | grep -s cpptest ; then
    14. 

  14. 	cppopt=-xc++
    15. 

  15. fi
    16. 

  16. 

  17. echo "Making the test"
    18. 

  18. make $swigtest
    19. 

  19. echo "Building ${thetest}_top"
    20. 

  20. gcc -c -g $cppopt -I$OCAMLINC ${thetest}_wrap.c
    21. 

  21. ocamlmktop -cclib -g -custom swig.cmo ${thetest}_wrap.o ${thetest}.cmo -o ${thetest}_top -cclib -lstdc++
    22.