Define some flags for geniflags slot.

db/Experiment.pm.in

@@ -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);
 
 #