No caller yet.
Signed-off-by: Ian Jackson <[email protected]>
---
Osstest/TestSupport.pm | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/Osstest/TestSupport.pm b/Osstest/TestSupport.pm
index 91829a0..3fc8e15 100644
--- a/Osstest/TestSupport.pm
+++ b/Osstest/TestSupport.pm
@@ -50,6 +50,7 @@ BEGIN {
target_cmd_root target_cmd target_cmd_build
target_cmd_output_root target_cmd_output
+ target_cmd_inputfh_root
target_getfile target_getfile_root
target_putfile target_putfile_root
target_putfilecontents_stash
@@ -655,6 +656,11 @@ sub tcmdout {
sub target_cmd_output ($$;$) { tcmdout('osstest',@_); }
sub target_cmd_output_root ($$;$) { tcmdout('root',@_); }
+sub target_cmd_inputfh_root ($$$;$$) {
+ my ($tho,$stdinfh,$tcmd,@rest) = @_;
+ tcmd($stdinfh,undef,'root',$tho,$tcmd,@rest);
+}
+
sub poll_loop ($$$&) {
my ($maxwait, $interval, $what, $code) = @_;
# $code should return undef when all is well
--
1.7.10.4
_______________________________________________
Xen-devel mailing list
[email protected]
http://lists.xen.org/xen-devel
