No callers, so no functional change, as yet. Signed-off-by: Ian Jackson <ian.jack...@eu.citrix.com> Acked-by: Ian Campbell <ian.campb...@citrix.com> --- Osstest.pm | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-)
diff --git a/Osstest.pm b/Osstest.pm index e8bd77b..7d6949f 100644 --- a/Osstest.pm +++ b/Osstest.pm @@ -35,7 +35,7 @@ BEGIN { getmethod postfork $dbh_tests db_retry db_retry_retry db_retry_abort - db_begin_work + db_begin_work db_prepare ensuredir get_filecontents_core_quiet system_checked nonempty visible_undef show_abs_time ); @@ -268,6 +268,13 @@ sub db_retry ($$$;$$) { return $r; } +sub db_prepare ($) { + # caller must ensure global filehandle DEBUG is open + my ($stmt) = @_; + print ::DEBUG "DB PREPARING:\n$stmt\n"; + return $dbh_tests->prepare($stmt); +} + sub postfork () { $mjobdb->jobdb_postfork(); } -- 1.7.10.4 _______________________________________________ Xen-devel mailing list Xen-devel@lists.xen.org http://lists.xen.org/xen-devel