ocaml: Fix memory leak in bindings for functions that return buffers.
[libguestfs.git] / cat / test-virt-cat.sh
1 #!/bin/bash -
2
3 export LANG=C
4 set -e
5
6 # Read out the test files from the image using virt-cat.
7 if [ "$(./virt-cat ../images/fedora.img /etc/test1)" != "abcdefg" ]; then
8     echo "$0: error: mismatch in file test1"
9     exit 1
10 fi
11 if [ "$(./virt-cat ../images/fedora.img /etc/test2)" != "" ]; then
12     echo "$0: error: mismatch in file test2"
13     exit 1
14 fi