mirror of
https://github.com/libguestfs/libguestfs.git
synced 2026-03-21 22:53:37 +00:00
lua: Add another test to prove that the handles are really independent.
This commit is contained in:
@@ -53,6 +53,7 @@ TESTS = \
|
||||
tests/010-load.lua \
|
||||
tests/020-create.lua \
|
||||
tests/025-create-flags.lua \
|
||||
tests/027-create-multiple.lua \
|
||||
tests/030-config.lua \
|
||||
tests/070-optargs.lua
|
||||
|
||||
@@ -66,6 +67,7 @@ EXTRA_DIST += \
|
||||
tests/010-load.lua \
|
||||
tests/020-create.lua \
|
||||
tests/025-create-flags.lua \
|
||||
tests/027-create-multiple.lua \
|
||||
tests/030-config.lua \
|
||||
tests/050-lvcreate.lua \
|
||||
tests/060-readdir.lua \
|
||||
|
||||
41
lua/tests/027-create-multiple.lua
Executable file
41
lua/tests/027-create-multiple.lua
Executable file
@@ -0,0 +1,41 @@
|
||||
#!/usr/bin/lua
|
||||
-- libguestfs Lua bindings -*- lua -*-
|
||||
-- Copyright (C) 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.
|
||||
|
||||
require "guestfs"
|
||||
|
||||
g1 = Guestfs.create ()
|
||||
g2 = Guestfs.create ()
|
||||
g3 = Guestfs.create ()
|
||||
|
||||
-- Check that each handle is independent.
|
||||
g1:set_path ("1")
|
||||
g2:set_path ("2")
|
||||
g3:set_path ("3")
|
||||
|
||||
if g1:get_path () ~= "1" then
|
||||
error (string.format ("incorrect path in g1, expected '1', got '%s'",
|
||||
g1:get_path ()))
|
||||
end
|
||||
if g2:get_path () ~= "2" then
|
||||
error (string.format ("incorrect path in g2, expected '2', got '%s'",
|
||||
g2:get_path ()))
|
||||
end
|
||||
if g3:get_path () ~= "3" then
|
||||
error (string.format ("incorrect path in g3, expected '3', got '%s'",
|
||||
g3:get_path ()))
|
||||
end
|
||||
Reference in New Issue
Block a user