#!/bin/sh

set -e

testdir=$(mktemp -d)
trap "rm -rf ${testdir}" 0 INT QUIT ABRT PIPE TERM
cd ${testdir}

cat <<EOF > test.ml
open Rope
let r = Rope.of_string "Hello world!"
let _ = print_int (Rope.length r)
EOF

ocamlfind ocamlc -o byte-code-test -I `ocamlfind query rope` rope.cma test.ml

echo "build: OK"

[ -x byte-code-test ]
./byte-code-test 2> /dev/null | grep -q "12"

echo "run: OK"