diff options
Diffstat (limited to 'haskell/Bindtests.hs')
-rw-r--r-- | haskell/Bindtests.hs | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/haskell/Bindtests.hs b/haskell/Bindtests.hs deleted file mode 100644 index 43f43d40..00000000 --- a/haskell/Bindtests.hs +++ /dev/null @@ -1,40 +0,0 @@ -{- libguestfs generated file - WARNING: THIS FILE IS GENERATED BY 'src/generator.ml'. - ANY CHANGES YOU MAKE TO THIS FILE WILL BE LOST. - - Copyright (C) 2009 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. --} - -module Bindtests where -import qualified Guestfs - -main = do - g <- Guestfs.create - Guestfs.test0 g "abc" (Just "def") [] False 0 "123" "456" - Guestfs.test0 g "abc" Nothing [] False 0 "123" "456" - Guestfs.test0 g "" (Just "def") [] False 0 "123" "456" - Guestfs.test0 g "" (Just "") [] False 0 "123" "456" - Guestfs.test0 g "abc" (Just "def") ["1"] False 0 "123" "456" - Guestfs.test0 g "abc" (Just "def") ["1","2"] False 0 "123" "456" - Guestfs.test0 g "abc" (Just "def") ["1"] True 0 "123" "456" - Guestfs.test0 g "abc" (Just "def") ["1"] False (-1) "123" "456" - Guestfs.test0 g "abc" (Just "def") ["1"] False (-2) "123" "456" - Guestfs.test0 g "abc" (Just "def") ["1"] False 1 "123" "456" - Guestfs.test0 g "abc" (Just "def") ["1"] False 2 "123" "456" - Guestfs.test0 g "abc" (Just "def") ["1"] False 4095 "123" "456" - Guestfs.test0 g "abc" (Just "def") ["1"] False 0 "" "" - putStrLn "EOF" |