Commit eb14b221 authored by Leigh B. Stoller's avatar Leigh B. Stoller

Define some flags for geniflags slot.

parent e777603b
......@@ -31,7 +31,8 @@ use libtblog_simple;
use vars qw($EXPT_PRELOAD $EXPT_START $EXPT_SWAPIN $EXPT_SWAPUPDATE
$EXPT_SWAPOUT $EXPT_SWAPMOD %physicalTables @virtualTables
$EXPT_FLAGS_NAMESONLY $EXPT_FLAGS_INCLUDEVIRT
$EXPT_FLAGS_LOCALONLY
$EXPT_FLAGS_LOCALONLY
$EXPT_GENIFLAGS_EXPT $EXPT_GENIFLAGS_COOKED
@EXPORT_OK);
# Configure variables
......@@ -67,6 +68,9 @@ $EXPT_FLAGS_LOCALONLY = 0x01;
$EXPT_FLAGS_NAMESONLY = 0x02;
$EXPT_FLAGS_INCLUDEVIRT = 0x04;
$EXPT_GENIFLAGS_EXPT = 0x01;
$EXPT_GENIFLAGS_COOKED = 0x02;
# For stats gathering code.
my $EXPT_STARTCLOCK;
my $EXPT_RESOURCESHOSED = 0;
......@@ -74,6 +78,7 @@ my $EXPT_RESOURCESHOSED = 0;
# Why, why, why?
@EXPORT_OK = qw($EXPT_PRELOAD $EXPT_START $EXPT_SWAPUPDATE
$EXPT_SWAPIN $EXPT_SWAPOUT $EXPT_SWAPMOD
$EXPT_GENIFLAGS_EXPT $EXPT_GENIFLAGS_COOKED
%physicalTables @virtualTables);
#
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment