fallback/const-c.inc - metacpan.org

#define PERL_constant_NOTFOUND	1
#define PERL_constant_NOTDEF	2
#define PERL_constant_ISIV	3
#define PERL_constant_ISNO	4
#define PERL_constant_ISNV	5
#define PERL_constant_ISPV	6
#define PERL_constant_ISPVN	7
#define PERL_constant_ISSV	8
#define PERL_constant_ISUNDEF	9
#define PERL_constant_ISUV	10
#define PERL_constant_ISYES	11

#ifndef NVTYPE
typedef double NV; /* 5.6 and later define NVTYPE, and typedef NV to it.  */
#endif
#ifndef aTHX_
#define aTHX_ /* 5.6 or later define this for threading support.  */
#endif
#ifndef pTHX_
#define pTHX_ /* 5.6 or later define this for threading support.  */
#endif

static int
constant_14 (pTHX_ const char *name, IV *iv_return) {
  /* When generated this function returned values for the list of names given
     here.  However, subsequent manual editing may have added or removed some.
     CLUTO_CLFUN_E1 CLUTO_CLFUN_G1 CLUTO_CLFUN_H1 CLUTO_CLFUN_H2 CLUTO_CLFUN_I1
     CLUTO_CLFUN_I2 CLUTO_TREE_TOP */
  /* Offset 12 gives the best switch position.  */
  switch (name[12]) {
  case 'E':
    if (memEQ(name, "CLUTO_CLFUN_E1", 14)) {
    /*                           ^        */
#ifdef CLUTO_CLFUN_E1
      *iv_return = CLUTO_CLFUN_E1;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'G':
    if (memEQ(name, "CLUTO_CLFUN_G1", 14)) {
    /*                           ^        */
#ifdef CLUTO_CLFUN_G1
      *iv_return = CLUTO_CLFUN_G1;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'H':
    if (memEQ(name, "CLUTO_CLFUN_H1", 14)) {
    /*                           ^        */
#ifdef CLUTO_CLFUN_H1
      *iv_return = CLUTO_CLFUN_H1;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    if (memEQ(name, "CLUTO_CLFUN_H2", 14)) {
    /*                           ^        */
#ifdef CLUTO_CLFUN_H2
      *iv_return = CLUTO_CLFUN_H2;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'I':
    if (memEQ(name, "CLUTO_CLFUN_I1", 14)) {
    /*                           ^        */
#ifdef CLUTO_CLFUN_I1
      *iv_return = CLUTO_CLFUN_I1;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    if (memEQ(name, "CLUTO_CLFUN_I2", 14)) {
    /*                           ^        */
#ifdef CLUTO_CLFUN_I2
      *iv_return = CLUTO_CLFUN_I2;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'O':
    if (memEQ(name, "CLUTO_TREE_TOP", 14)) {
    /*                           ^        */
#ifdef CLUTO_TREE_TOP
      *iv_return = CLUTO_TREE_TOP;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  }
  return PERL_constant_NOTFOUND;
}

static int
constant_15 (pTHX_ const char *name, IV *iv_return) {
  /* When generated this function returned values for the list of names given
     here.  However, subsequent manual editing may have added or removed some.
     CLUTO_CLFUN_CUT CLUTO_CLFUN_G1P CLUTO_MEM_REUSE CLUTO_TREE_FULL
     CLUTO_VER_MAJOR CLUTO_VER_MINOR */
  /* Offset 14 gives the best switch position.  */
  switch (name[14]) {
  case 'E':
    if (memEQ(name, "CLUTO_MEM_REUS", 14)) {
    /*                             E      */
#ifdef CLUTO_MEM_REUSE
      *iv_return = CLUTO_MEM_REUSE;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'L':
    if (memEQ(name, "CLUTO_TREE_FUL", 14)) {
    /*                             L      */
#ifdef CLUTO_TREE_FULL
      *iv_return = CLUTO_TREE_FULL;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'P':
    if (memEQ(name, "CLUTO_CLFUN_G1", 14)) {
    /*                             P      */
#ifdef CLUTO_CLFUN_G1P
      *iv_return = CLUTO_CLFUN_G1P;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'R':
    if (memEQ(name, "CLUTO_VER_MAJO", 14)) {
    /*                             R      */
#ifdef CLUTO_VER_MAJOR
      *iv_return = CLUTO_VER_MAJOR;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    if (memEQ(name, "CLUTO_VER_MINO", 14)) {
    /*                             R      */
#ifdef CLUTO_VER_MINOR
      *iv_return = CLUTO_VER_MINOR;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'T':
    if (memEQ(name, "CLUTO_CLFUN_CU", 14)) {
    /*                             T      */
#ifdef CLUTO_CLFUN_CUT
      *iv_return = CLUTO_CLFUN_CUT;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  }
  return PERL_constant_NOTFOUND;
}

static int
constant_16 (pTHX_ const char *name, IV *iv_return) {
  /* When generated this function returned values for the list of names given
     here.  However, subsequent manual editing may have added or removed some.
     CLUTO_CLFUN_NCUT CLUTO_CLFUN_RCUT CLUTO_SIM_COSINE */
  /* Offset 12 gives the best switch position.  */
  switch (name[12]) {
  case 'N':
    if (memEQ(name, "CLUTO_CLFUN_NCUT", 16)) {
    /*                           ^          */
#ifdef CLUTO_CLFUN_NCUT
      *iv_return = CLUTO_CLFUN_NCUT;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'R':
    if (memEQ(name, "CLUTO_CLFUN_RCUT", 16)) {
    /*                           ^          */
#ifdef CLUTO_CLFUN_RCUT
      *iv_return = CLUTO_CLFUN_RCUT;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'S':
    if (memEQ(name, "CLUTO_SIM_COSINE", 16)) {
    /*                           ^          */
#ifdef CLUTO_SIM_COSINE
      *iv_return = CLUTO_SIM_COSINE;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  }
  return PERL_constant_NOTFOUND;
}

static int
constant_17 (pTHX_ const char *name, IV *iv_return) {
  /* When generated this function returned values for the list of names given
     here.  However, subsequent manual editing may have added or removed some.
     CLUTO_CLFUN_CLINK CLUTO_CLFUN_MMCUT CLUTO_CLFUN_SLINK CLUTO_CLFUN_UPGMA
     CLUTO_MEM_NOREUSE CLUTO_MTYPE_HEDGE CLUTO_MTYPE_HSTAR */
  /* Offset 12 gives the best switch position.  */
  switch (name[12]) {
  case 'C':
    if (memEQ(name, "CLUTO_CLFUN_CLINK", 17)) {
    /*                           ^           */
#ifdef CLUTO_CLFUN_CLINK
      *iv_return = CLUTO_CLFUN_CLINK;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'H':
    if (memEQ(name, "CLUTO_MTYPE_HEDGE", 17)) {
    /*                           ^           */
#ifdef CLUTO_MTYPE_HEDGE
      *iv_return = CLUTO_MTYPE_HEDGE;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    if (memEQ(name, "CLUTO_MTYPE_HSTAR", 17)) {
    /*                           ^           */
#ifdef CLUTO_MTYPE_HSTAR
      *iv_return = CLUTO_MTYPE_HSTAR;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'M':
    if (memEQ(name, "CLUTO_CLFUN_MMCUT", 17)) {
    /*                           ^           */
#ifdef CLUTO_CLFUN_MMCUT
      *iv_return = CLUTO_CLFUN_MMCUT;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'R':
    if (memEQ(name, "CLUTO_MEM_NOREUSE", 17)) {
    /*                           ^           */
#ifdef CLUTO_MEM_NOREUSE
      *iv_return = CLUTO_MEM_NOREUSE;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'S':
    if (memEQ(name, "CLUTO_CLFUN_SLINK", 17)) {
    /*                           ^           */
#ifdef CLUTO_CLFUN_SLINK
      *iv_return = CLUTO_CLFUN_SLINK;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'U':
    if (memEQ(name, "CLUTO_CLFUN_UPGMA", 17)) {
    /*                           ^           */
#ifdef CLUTO_CLFUN_UPGMA
      *iv_return = CLUTO_CLFUN_UPGMA;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  }
  return PERL_constant_NOTFOUND;
}

static int
constant_18 (pTHX_ const char *name, IV *iv_return) {
  /* When generated this function returned values for the list of names given
     here.  However, subsequent manual editing may have added or removed some.
     CLUTO_COLMODEL_IDF CLUTO_DBG_CCMPSTAT CLUTO_DBG_PROGRESS
     CLUTO_GRMODEL_NONE CLUTO_MTYPE_HSTAR2 CLUTO_ROWMODEL_LOG
     CLUTO_SIM_CORRCOEF CLUTO_SIM_EJACCARD CLUTO_VER_SUBMINOR */
  /* Offset 12 gives the best switch position.  */
  switch (name[12]) {
  case 'A':
    if (memEQ(name, "CLUTO_SIM_EJACCARD", 18)) {
    /*                           ^            */
#ifdef CLUTO_SIM_EJACCARD
      *iv_return = CLUTO_SIM_EJACCARD;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'B':
    if (memEQ(name, "CLUTO_VER_SUBMINOR", 18)) {
    /*                           ^            */
#ifdef CLUTO_VER_SUBMINOR
      *iv_return = CLUTO_VER_SUBMINOR;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'E':
    if (memEQ(name, "CLUTO_COLMODEL_IDF", 18)) {
    /*                           ^            */
#ifdef CLUTO_COLMODEL_IDF
      *iv_return = CLUTO_COLMODEL_IDF;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    if (memEQ(name, "CLUTO_ROWMODEL_LOG", 18)) {
    /*                           ^            */
#ifdef CLUTO_ROWMODEL_LOG
      *iv_return = CLUTO_ROWMODEL_LOG;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'H':
    if (memEQ(name, "CLUTO_MTYPE_HSTAR2", 18)) {
    /*                           ^            */
#ifdef CLUTO_MTYPE_HSTAR2
      *iv_return = CLUTO_MTYPE_HSTAR2;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'L':
    if (memEQ(name, "CLUTO_GRMODEL_NONE", 18)) {
    /*                           ^            */
#ifdef CLUTO_GRMODEL_NONE
      *iv_return = CLUTO_GRMODEL_NONE;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'M':
    if (memEQ(name, "CLUTO_DBG_CCMPSTAT", 18)) {
    /*                           ^            */
#ifdef CLUTO_DBG_CCMPSTAT
      *iv_return = CLUTO_DBG_CCMPSTAT;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'O':
    if (memEQ(name, "CLUTO_DBG_PROGRESS", 18)) {
    /*                           ^            */
#ifdef CLUTO_DBG_PROGRESS
      *iv_return = CLUTO_DBG_PROGRESS;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'R':
    if (memEQ(name, "CLUTO_SIM_CORRCOEF", 18)) {
    /*                           ^            */
#ifdef CLUTO_SIM_CORRCOEF
      *iv_return = CLUTO_SIM_CORRCOEF;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  }
  return PERL_constant_NOTFOUND;
}

static int
constant_19 (pTHX_ const char *name, IV *iv_return) {
  /* When generated this function returned values for the list of names given
     here.  However, subsequent manual editing may have added or removed some.
     CLUTO_CLFUN_CLINK_W CLUTO_CLFUN_SLINK_W CLUTO_CLFUN_UPGMA_W
     CLUTO_COLMODEL_NONE CLUTO_DBG_APROGRESS CLUTO_DBG_CPROGRESS
     CLUTO_DBG_MPROGRESS CLUTO_DBG_RPROGRESS CLUTO_ROWMODEL_NONE
     CLUTO_ROWMODEL_SQRT CLUTO_SIM_EDISTANCE */
  /* Offset 10 gives the best switch position.  */
  switch (name[10]) {
  case 'A':
    if (memEQ(name, "CLUTO_DBG_APROGRESS", 19)) {
    /*                         ^               */
#ifdef CLUTO_DBG_APROGRESS
      *iv_return = CLUTO_DBG_APROGRESS;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'C':
    if (memEQ(name, "CLUTO_DBG_CPROGRESS", 19)) {
    /*                         ^               */
#ifdef CLUTO_DBG_CPROGRESS
      *iv_return = CLUTO_DBG_CPROGRESS;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'E':
    if (memEQ(name, "CLUTO_SIM_EDISTANCE", 19)) {
    /*                         ^               */
#ifdef CLUTO_SIM_EDISTANCE
      *iv_return = CLUTO_SIM_EDISTANCE;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'M':
    if (memEQ(name, "CLUTO_DBG_MPROGRESS", 19)) {
    /*                         ^               */
#ifdef CLUTO_DBG_MPROGRESS
      *iv_return = CLUTO_DBG_MPROGRESS;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'N':
    if (memEQ(name, "CLUTO_CLFUN_CLINK_W", 19)) {
    /*                         ^               */
#ifdef CLUTO_CLFUN_CLINK_W
      *iv_return = CLUTO_CLFUN_CLINK_W;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    if (memEQ(name, "CLUTO_CLFUN_SLINK_W", 19)) {
    /*                         ^               */
#ifdef CLUTO_CLFUN_SLINK_W
      *iv_return = CLUTO_CLFUN_SLINK_W;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    if (memEQ(name, "CLUTO_CLFUN_UPGMA_W", 19)) {
    /*                         ^               */
#ifdef CLUTO_CLFUN_UPGMA_W
      *iv_return = CLUTO_CLFUN_UPGMA_W;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'O':
    if (memEQ(name, "CLUTO_COLMODEL_NONE", 19)) {
    /*                         ^               */
#ifdef CLUTO_COLMODEL_NONE
      *iv_return = CLUTO_COLMODEL_NONE;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    if (memEQ(name, "CLUTO_ROWMODEL_NONE", 19)) {
    /*                         ^               */
#ifdef CLUTO_ROWMODEL_NONE
      *iv_return = CLUTO_ROWMODEL_NONE;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    if (memEQ(name, "CLUTO_ROWMODEL_SQRT", 19)) {
    /*                         ^               */
#ifdef CLUTO_ROWMODEL_SQRT
      *iv_return = CLUTO_ROWMODEL_SQRT;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 'R':
    if (memEQ(name, "CLUTO_DBG_RPROGRESS", 19)) {
    /*                         ^               */
#ifdef CLUTO_DBG_RPROGRESS
      *iv_return = CLUTO_DBG_RPROGRESS;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  }
  return PERL_constant_NOTFOUND;
}

static int
constant (pTHX_ const char *name, STRLEN len, IV *iv_return) {
  /* Initially switch on the length of the name.  */
  /* When generated this function returned values for the list of names given
     in this section of perl code.  Rather than manually editing these functions
     to add or remove constants, which would result in this comment and section
     of code becoming inaccurate, we recommend that you edit this section of
     code, and use it to regenerate a new set of constant functions which you
     then use to replace the originals.

     Regenerate these constant functions by feeding this entire source file to
     perl -x

#!/usr/bin/perl -w
use ExtUtils::Constant qw (constant_types C_constant XS_constant);

my $types = {map {($_, 1)} qw(IV)};
my @names = (qw(CLUTO_CLFUN_CLINK CLUTO_CLFUN_CLINK_W CLUTO_CLFUN_CUT
	       CLUTO_CLFUN_E1 CLUTO_CLFUN_G1 CLUTO_CLFUN_G1P CLUTO_CLFUN_H1
	       CLUTO_CLFUN_H2 CLUTO_CLFUN_I1 CLUTO_CLFUN_I2 CLUTO_CLFUN_MMCUT
	       CLUTO_CLFUN_NCUT CLUTO_CLFUN_RCUT CLUTO_CLFUN_SLINK
	       CLUTO_CLFUN_SLINK_W CLUTO_CLFUN_UPGMA CLUTO_CLFUN_UPGMA_W
	       CLUTO_COLMODEL_IDF CLUTO_COLMODEL_NONE CLUTO_CSTYPE_BESTFIRST
	       CLUTO_CSTYPE_LARGEFIRST CLUTO_CSTYPE_LARGESUBSPACEFIRST
	       CLUTO_DBG_APROGRESS CLUTO_DBG_CCMPSTAT CLUTO_DBG_CPROGRESS
	       CLUTO_DBG_MPROGRESS CLUTO_DBG_PROGRESS CLUTO_DBG_RPROGRESS
	       CLUTO_GRMODEL_ASYMETRIC_DIRECT CLUTO_GRMODEL_ASYMETRIC_LINKS
	       CLUTO_GRMODEL_EXACT_ASYMETRIC_DIRECT
	       CLUTO_GRMODEL_EXACT_ASYMETRIC_LINKS
	       CLUTO_GRMODEL_EXACT_SYMETRIC_DIRECT
	       CLUTO_GRMODEL_EXACT_SYMETRIC_LINKS
	       CLUTO_GRMODEL_INEXACT_ASYMETRIC_DIRECT
	       CLUTO_GRMODEL_INEXACT_ASYMETRIC_LINKS
	       CLUTO_GRMODEL_INEXACT_SYMETRIC_DIRECT
	       CLUTO_GRMODEL_INEXACT_SYMETRIC_LINKS CLUTO_GRMODEL_NONE
	       CLUTO_GRMODEL_SYMETRIC_DIRECT CLUTO_GRMODEL_SYMETRIC_LINKS
	       CLUTO_MEM_NOREUSE CLUTO_MEM_REUSE CLUTO_MTYPE_HEDGE
	       CLUTO_MTYPE_HSTAR CLUTO_MTYPE_HSTAR2 CLUTO_OPTIMIZER_MULTILEVEL
	       CLUTO_OPTIMIZER_SINGLELEVEL CLUTO_ROWMODEL_LOG
	       CLUTO_ROWMODEL_MAXTF CLUTO_ROWMODEL_NONE CLUTO_ROWMODEL_SQRT
	       CLUTO_SIM_CORRCOEF CLUTO_SIM_COSINE CLUTO_SIM_EDISTANCE
	       CLUTO_SIM_EJACCARD CLUTO_SUMMTYPE_MAXCLIQUES
	       CLUTO_SUMMTYPE_MAXITEMSETS CLUTO_TREE_FULL CLUTO_TREE_TOP
	       CLUTO_VER_MAJOR CLUTO_VER_MINOR CLUTO_VER_SUBMINOR));

print constant_types(); # macro defs
foreach (C_constant ("Statistics::Cluto", 'constant', 'IV', $types, undef, 3, @names) ) {
    print $_, "\n"; # C constant subs
}
print "#### XS Section:\n";
print XS_constant ("Statistics::Cluto", $types);
__END__
   */

  switch (len) {
  case 14:
    return constant_14 (aTHX_ name, iv_return);
    break;
  case 15:
    return constant_15 (aTHX_ name, iv_return);
    break;
  case 16:
    return constant_16 (aTHX_ name, iv_return);
    break;
  case 17:
    return constant_17 (aTHX_ name, iv_return);
    break;
  case 18:
    return constant_18 (aTHX_ name, iv_return);
    break;
  case 19:
    return constant_19 (aTHX_ name, iv_return);
    break;
  case 20:
    if (memEQ(name, "CLUTO_ROWMODEL_MAXTF", 20)) {
#ifdef CLUTO_ROWMODEL_MAXTF
      *iv_return = CLUTO_ROWMODEL_MAXTF;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 22:
    if (memEQ(name, "CLUTO_CSTYPE_BESTFIRST", 22)) {
#ifdef CLUTO_CSTYPE_BESTFIRST
      *iv_return = CLUTO_CSTYPE_BESTFIRST;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 23:
    if (memEQ(name, "CLUTO_CSTYPE_LARGEFIRST", 23)) {
#ifdef CLUTO_CSTYPE_LARGEFIRST
      *iv_return = CLUTO_CSTYPE_LARGEFIRST;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 25:
    if (memEQ(name, "CLUTO_SUMMTYPE_MAXCLIQUES", 25)) {
#ifdef CLUTO_SUMMTYPE_MAXCLIQUES
      *iv_return = CLUTO_SUMMTYPE_MAXCLIQUES;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 26:
    /* Names all of length 26.  */
    /* CLUTO_OPTIMIZER_MULTILEVEL CLUTO_SUMMTYPE_MAXITEMSETS */
    /* Offset 21 gives the best switch position.  */
    switch (name[21]) {
    case 'L':
      if (memEQ(name, "CLUTO_OPTIMIZER_MULTILEVEL", 26)) {
      /*                                    ^           */
#ifdef CLUTO_OPTIMIZER_MULTILEVEL
        *iv_return = CLUTO_OPTIMIZER_MULTILEVEL;
        return PERL_constant_ISIV;
#else
        return PERL_constant_NOTDEF;
#endif
      }
      break;
    case 'M':
      if (memEQ(name, "CLUTO_SUMMTYPE_MAXITEMSETS", 26)) {
      /*                                    ^           */
#ifdef CLUTO_SUMMTYPE_MAXITEMSETS
        *iv_return = CLUTO_SUMMTYPE_MAXITEMSETS;
        return PERL_constant_ISIV;
#else
        return PERL_constant_NOTDEF;
#endif
      }
      break;
    }
    break;
  case 27:
    if (memEQ(name, "CLUTO_OPTIMIZER_SINGLELEVEL", 27)) {
#ifdef CLUTO_OPTIMIZER_SINGLELEVEL
      *iv_return = CLUTO_OPTIMIZER_SINGLELEVEL;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 28:
    if (memEQ(name, "CLUTO_GRMODEL_SYMETRIC_LINKS", 28)) {
#ifdef CLUTO_GRMODEL_SYMETRIC_LINKS
      *iv_return = CLUTO_GRMODEL_SYMETRIC_LINKS;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 29:
    /* Names all of length 29.  */
    /* CLUTO_GRMODEL_ASYMETRIC_LINKS CLUTO_GRMODEL_SYMETRIC_DIRECT */
    /* Offset 28 gives the best switch position.  */
    switch (name[28]) {
    case 'S':
      if (memEQ(name, "CLUTO_GRMODEL_ASYMETRIC_LINK", 28)) {
      /*                                           S      */
#ifdef CLUTO_GRMODEL_ASYMETRIC_LINKS
        *iv_return = CLUTO_GRMODEL_ASYMETRIC_LINKS;
        return PERL_constant_ISIV;
#else
        return PERL_constant_NOTDEF;
#endif
      }
      break;
    case 'T':
      if (memEQ(name, "CLUTO_GRMODEL_SYMETRIC_DIREC", 28)) {
      /*                                           T      */
#ifdef CLUTO_GRMODEL_SYMETRIC_DIRECT
        *iv_return = CLUTO_GRMODEL_SYMETRIC_DIRECT;
        return PERL_constant_ISIV;
#else
        return PERL_constant_NOTDEF;
#endif
      }
      break;
    }
    break;
  case 30:
    if (memEQ(name, "CLUTO_GRMODEL_ASYMETRIC_DIRECT", 30)) {
#ifdef CLUTO_GRMODEL_ASYMETRIC_DIRECT
      *iv_return = CLUTO_GRMODEL_ASYMETRIC_DIRECT;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 31:
    if (memEQ(name, "CLUTO_CSTYPE_LARGESUBSPACEFIRST", 31)) {
#ifdef CLUTO_CSTYPE_LARGESUBSPACEFIRST
      *iv_return = CLUTO_CSTYPE_LARGESUBSPACEFIRST;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 34:
    if (memEQ(name, "CLUTO_GRMODEL_EXACT_SYMETRIC_LINKS", 34)) {
#ifdef CLUTO_GRMODEL_EXACT_SYMETRIC_LINKS
      *iv_return = CLUTO_GRMODEL_EXACT_SYMETRIC_LINKS;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  case 35:
    /* Names all of length 35.  */
    /* CLUTO_GRMODEL_EXACT_ASYMETRIC_LINKS CLUTO_GRMODEL_EXACT_SYMETRIC_DIRECT
       */
    /* Offset 34 gives the best switch position.  */
    switch (name[34]) {
    case 'S':
      if (memEQ(name, "CLUTO_GRMODEL_EXACT_ASYMETRIC_LINK", 34)) {
      /*                                                 S      */
#ifdef CLUTO_GRMODEL_EXACT_ASYMETRIC_LINKS
        *iv_return = CLUTO_GRMODEL_EXACT_ASYMETRIC_LINKS;
        return PERL_constant_ISIV;
#else
        return PERL_constant_NOTDEF;
#endif
      }
      break;
    case 'T':
      if (memEQ(name, "CLUTO_GRMODEL_EXACT_SYMETRIC_DIREC", 34)) {
      /*                                                 T      */
#ifdef CLUTO_GRMODEL_EXACT_SYMETRIC_DIRECT
        *iv_return = CLUTO_GRMODEL_EXACT_SYMETRIC_DIRECT;
        return PERL_constant_ISIV;
#else
        return PERL_constant_NOTDEF;
#endif
      }
      break;
    }
    break;
  case 36:
    /* Names all of length 36.  */
    /* CLUTO_GRMODEL_EXACT_ASYMETRIC_DIRECT
       CLUTO_GRMODEL_INEXACT_SYMETRIC_LINKS */
    /* Offset 35 gives the best switch position.  */
    switch (name[35]) {
    case 'S':
      if (memEQ(name, "CLUTO_GRMODEL_INEXACT_SYMETRIC_LINK", 35)) {
      /*                                                  S      */
#ifdef CLUTO_GRMODEL_INEXACT_SYMETRIC_LINKS
        *iv_return = CLUTO_GRMODEL_INEXACT_SYMETRIC_LINKS;
        return PERL_constant_ISIV;
#else
        return PERL_constant_NOTDEF;
#endif
      }
      break;
    case 'T':
      if (memEQ(name, "CLUTO_GRMODEL_EXACT_ASYMETRIC_DIREC", 35)) {
      /*                                                  T      */
#ifdef CLUTO_GRMODEL_EXACT_ASYMETRIC_DIRECT
        *iv_return = CLUTO_GRMODEL_EXACT_ASYMETRIC_DIRECT;
        return PERL_constant_ISIV;
#else
        return PERL_constant_NOTDEF;
#endif
      }
      break;
    }
    break;
  case 37:
    /* Names all of length 37.  */
    /* CLUTO_GRMODEL_INEXACT_ASYMETRIC_LINKS
       CLUTO_GRMODEL_INEXACT_SYMETRIC_DIRECT */
    /* Offset 36 gives the best switch position.  */
    switch (name[36]) {
    case 'S':
      if (memEQ(name, "CLUTO_GRMODEL_INEXACT_ASYMETRIC_LINK", 36)) {
      /*                                                   S      */
#ifdef CLUTO_GRMODEL_INEXACT_ASYMETRIC_LINKS
        *iv_return = CLUTO_GRMODEL_INEXACT_ASYMETRIC_LINKS;
        return PERL_constant_ISIV;
#else
        return PERL_constant_NOTDEF;
#endif
      }
      break;
    case 'T':
      if (memEQ(name, "CLUTO_GRMODEL_INEXACT_SYMETRIC_DIREC", 36)) {
      /*                                                   T      */
#ifdef CLUTO_GRMODEL_INEXACT_SYMETRIC_DIRECT
        *iv_return = CLUTO_GRMODEL_INEXACT_SYMETRIC_DIRECT;
        return PERL_constant_ISIV;
#else
        return PERL_constant_NOTDEF;
#endif
      }
      break;
    }
    break;
  case 38:
    if (memEQ(name, "CLUTO_GRMODEL_INEXACT_ASYMETRIC_DIRECT", 38)) {
#ifdef CLUTO_GRMODEL_INEXACT_ASYMETRIC_DIRECT
      *iv_return = CLUTO_GRMODEL_INEXACT_ASYMETRIC_DIRECT;
      return PERL_constant_ISIV;
#else
      return PERL_constant_NOTDEF;
#endif
    }
    break;
  }
  return PERL_constant_NOTFOUND;
}
	Global
`s`	Focus search bar
`?`	Bring up this help dialog
	GitHub
`g` `p`	Go to pull requests
`g` `i`	go to github issues (only if github is preferred repository)
	POD
`g` `a`	Go to author
`g` `c`	Go to changes
`g` `i`	Go to issues
`g` `d`	Go to dist
`g` `r`	Go to repository/SCM
`g` `s`	Go to source
`g` `b`	Go to file browse
	Search terms
module: (e.g. module:Plugin)
distribution: (e.g. distribution:Dancer auth)
author: (e.g. author:SONGMU Redis)
version: (e.g. version:1.00)