From f6de298d0498d5672d05da839021a41277df8e09 Mon Sep 17 00:00:00 2001 From: "Richard W.M. Jones" Date: Wed, 15 Aug 2012 14:10:38 +0100 Subject: erlang: Add tests. Add bindtests and general tests for Erlang. --- erlang/tests/010-load.erl | 23 +++++++++++++++++++++++ 1 file changed, 23 insertions(+) create mode 100755 erlang/tests/010-load.erl (limited to 'erlang/tests') diff --git a/erlang/tests/010-load.erl b/erlang/tests/010-load.erl new file mode 100755 index 00000000..34ade754 --- /dev/null +++ b/erlang/tests/010-load.erl @@ -0,0 +1,23 @@ +#!/usr/bin/env escript +%! -smp enable -sname create_disk debug verbose + +% libguestfs Erlang tests -*- erlang -*- +% Copyright (C) 2009-2012 Red Hat Inc. +% +% This program is free software; you can redistribute it and/or modify +% it under the terms of the GNU General Public License as published by +% the Free Software Foundation; either version 2 of the License, or +% (at your option) any later version. +% +% This program is distributed in the hope that it will be useful, +% but WITHOUT ANY WARRANTY; without even the implied warranty of +% MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +% GNU General Public License for more details. +% +% You should have received a copy of the GNU General Public License along +% with this program; if not, write to the Free Software Foundation, Inc., +% 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA. + +main(_) -> + {ok, G} = guestfs:create(), + ok = guestfs:close(G). \ No newline at end of file -- cgit