X-Git-Url: http://git.annexia.org/?a=blobdiff_plain;f=generator%2Fgenerator_types.ml;h=94592991f59b9296c250eae1f5427ccf016767c7;hb=da13c1c0e6980f4838090be9e775b4d5c35662b7;hp=369a49a3e91397673ad92398c3a84e1414179dd7;hpb=f93cdf1ed3323b8d9451a7f4f6365ac30ab8ba81;p=libguestfs.git diff --git a/generator/generator_types.ml b/generator/generator_types.ml index 369a49a..9459299 100644 --- a/generator/generator_types.ml +++ b/generator/generator_types.ml @@ -1,5 +1,5 @@ (* libguestfs - * Copyright (C) 2009-2010 Red Hat Inc. + * Copyright (C) 2009-2011 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 @@ -203,9 +203,10 @@ and argt = *) | Pointer of (string * string) +type errcode = [ `CannotReturnError | `ErrorIsMinusOne | `ErrorIsNULL ] + type flags = | ProtocolLimitWarning (* display warning about protocol size limits *) - | DangerWillRobinson (* flags particularly dangerous commands *) | FishAlias of string (* provide an alias for this cmd in guestfish *) | FishOutput of fish_output_t (* how to display output in guestfish *) | NotInFish (* do not export via guestfish *) @@ -218,7 +219,7 @@ and fish_output_t = | FishOutputOctal (* for int return, print in octal *) | FishOutputHexadecimal (* for int return, print in hex *) -(* See section "Tests" in HACKING file. *) +(* See guestfs(3)/EXTENDING LIBGUESTFS. *) type tests = (test_init * test_prereq * test) list and test = (* Run the command sequence and just expect nothing to fail. *) @@ -289,6 +290,12 @@ and test = *) | TestOutputDevice of seq * string + (* Run the command sequence and expect a hashtable. Check + * one of more fields in the hashtable against known good + * strings. + *) + | TestOutputHashtable of seq * (string * string) list + (* Run the command sequence and expect the final command (only) * to fail. *)