#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_5 (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.
		     FEXCL FSYNC O_RAW */
		  /* Offset 2 gives the best switch position.  */
      ######      switch (name[2]) {
		  case 'R':
      ######        if (memEQ(name, "O_RAW", 5)) {
		    /*                 ^        */
		#ifdef O_RAW
		      *iv_return = O_RAW;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'X':
      ######        if (memEQ(name, "FEXCL", 5)) {
		    /*                 ^        */
		#ifdef FEXCL
		      *iv_return = FEXCL;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'Y':
      ######        if (memEQ(name, "FSYNC", 5)) {
		    /*                 ^        */
		#ifdef FSYNC
		      *iv_return = FSYNC;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  }
      ######      return PERL_constant_NOTFOUND;
		}
		
		static int
          59    constant_6 (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.
		     FASYNC FCREAT FDEFER FDSYNC FRSYNC FTRUNC O_EXCL O_RDWR O_RSRC O_SYNC
		     O_TEXT */
		  /* Offset 3 gives the best switch position.  */
          59      switch (name[3]) {
		  case 'D':
          53        if (memEQ(name, "O_RDWR", 6)) {
		    /*                  ^        */
		#ifdef O_RDWR
          53          *iv_return = O_RDWR;
          53          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'E':
      ######        if (memEQ(name, "FCREAT", 6)) {
		    /*                  ^        */
		#ifdef FCREAT
		      *iv_return = FCREAT;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "O_TEXT", 6)) {
		    /*                  ^        */
		#ifdef O_TEXT
      ######          *iv_return = O_TEXT;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'F':
      ######        if (memEQ(name, "FDEFER", 6)) {
		    /*                  ^        */
		#ifdef FDEFER
		      *iv_return = FDEFER;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'S':
      ######        if (memEQ(name, "O_RSRC", 6)) {
		    /*                  ^        */
		#ifdef O_RSRC
		      *iv_return = O_RSRC;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'U':
      ######        if (memEQ(name, "FTRUNC", 6)) {
		    /*                  ^        */
		#ifdef FTRUNC
		      *iv_return = FTRUNC;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
           6        break;
		  case 'X':
           6        if (memEQ(name, "O_EXCL", 6)) {
		    /*                  ^        */
		#ifdef O_EXCL
           6          *iv_return = O_EXCL;
           6          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'Y':
      ######        if (memEQ(name, "FASYNC", 6)) {
		    /*                  ^        */
		#ifdef FASYNC
      ######          *iv_return = FASYNC;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "FDSYNC", 6)) {
		    /*                  ^        */
		#ifdef FDSYNC
		      *iv_return = FDSYNC;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "FRSYNC", 6)) {
		    /*                  ^        */
		#ifdef FRSYNC
		      *iv_return = FRSYNC;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "O_SYNC", 6)) {
		    /*                  ^        */
		#ifdef O_SYNC
      ######          *iv_return = O_SYNC;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  }
      ######      return PERL_constant_NOTFOUND;
		}
		
		static int
          79    constant_7 (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.
		     FAPPEND FNDELAY F_DUPFD F_EXLCK F_FSYNC F_GETFD F_GETFL F_GETLK F_NODNY
		     F_POSIX F_RDACC F_RDDNY F_RDLCK F_RWACC F_RWDNY F_SETFD F_SETFL F_SETLK
		     F_SHARE F_SHLCK F_UNLCK F_WRACC F_WRDNY F_WRLCK LOCK_EX LOCK_NB LOCK_RW
		     LOCK_SH LOCK_UN O_ALIAS O_ASYNC O_CREAT O_DEFER O_DSYNC O_RSYNC O_TRUNC
		     S_ENFMT S_IEXEC S_IFBLK S_IFCHR S_IFDIR S_IFIFO S_IFLNK S_IFREG S_IFWHT
		     S_IREAD S_IRGRP S_IROTH S_IRUSR S_IRWXG S_IRWXO S_IRWXU S_ISGID S_ISTXT
		     S_ISUID S_ISVTX S_IWGRP S_IWOTH S_IWUSR S_IXGRP S_IXOTH S_IXUSR _S_IFMT */
		  /* Offset 4 gives the best switch position.  */
          79      switch (name[4]) {
		  case 'A':
      ######        if (memEQ(name, "F_RDACC", 7)) {
		    /*                   ^        */
		#ifdef F_RDACC
		      *iv_return = F_RDACC;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_RWACC", 7)) {
		    /*                   ^        */
		#ifdef F_RWACC
		      *iv_return = F_RWACC;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_SHARE", 7)) {
		    /*                   ^        */
		#ifdef F_SHARE
		      *iv_return = F_SHARE;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_WRACC", 7)) {
		    /*                   ^        */
		#ifdef F_WRACC
		      *iv_return = F_WRACC;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'B':
      ######        if (memEQ(name, "S_IFBLK", 7)) {
		    /*                   ^        */
		#ifdef S_IFBLK
      ######          *iv_return = S_IFBLK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'C':
      ######        if (memEQ(name, "S_IFCHR", 7)) {
		    /*                   ^        */
		#ifdef S_IFCHR
      ######          *iv_return = S_IFCHR;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'D':
      ######        if (memEQ(name, "F_NODNY", 7)) {
		    /*                   ^        */
		#ifdef F_NODNY
		      *iv_return = F_NODNY;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_RDDNY", 7)) {
		    /*                   ^        */
		#ifdef F_RDDNY
		      *iv_return = F_RDDNY;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_RWDNY", 7)) {
		    /*                   ^        */
		#ifdef F_RWDNY
		      *iv_return = F_RWDNY;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_WRDNY", 7)) {
		    /*                   ^        */
		#ifdef F_WRDNY
		      *iv_return = F_WRDNY;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IFDIR", 7)) {
		    /*                   ^        */
		#ifdef S_IFDIR
      ######          *iv_return = S_IFDIR;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
          55        break;
		  case 'E':
          55        if (memEQ(name, "FAPPEND", 7)) {
		    /*                   ^        */
		#ifdef FAPPEND
      ######          *iv_return = FAPPEND;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
          55        if (memEQ(name, "O_CREAT", 7)) {
		    /*                   ^        */
		#ifdef O_CREAT
          55          *iv_return = O_CREAT;
          55          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IREAD", 7)) {
		    /*                   ^        */
		#ifdef S_IREAD
      ######          *iv_return = S_IREAD;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'F':
      ######        if (memEQ(name, "O_DEFER", 7)) {
		    /*                   ^        */
		#ifdef O_DEFER
		      *iv_return = O_DEFER;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_ENFMT", 7)) {
		    /*                   ^        */
		#ifdef S_ENFMT
		      *iv_return = S_ENFMT;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "_S_IFMT", 7)) {
		    /*                   ^        */
		#ifdef S_IFMT
      ######          *iv_return = S_IFMT;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           1        break;
		  case 'G':
           1        if (memEQ(name, "S_IRGRP", 7)) {
		    /*                   ^        */
		#ifdef S_IRGRP
      ######          *iv_return = S_IRGRP;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           1        if (memEQ(name, "S_ISGID", 7)) {
		    /*                   ^        */
		#ifdef S_ISGID
      ######          *iv_return = S_ISGID;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           1        if (memEQ(name, "S_IWGRP", 7)) {
		    /*                   ^        */
		#ifdef S_IWGRP
           1          *iv_return = S_IWGRP;
           1          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IXGRP", 7)) {
		    /*                   ^        */
		#ifdef S_IXGRP
      ######          *iv_return = S_IXGRP;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'I':
      ######        if (memEQ(name, "O_ALIAS", 7)) {
		    /*                   ^        */
		#ifdef O_ALIAS
		      *iv_return = O_ALIAS;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IFIFO", 7)) {
		    /*                   ^        */
		#ifdef S_IFIFO
      ######          *iv_return = S_IFIFO;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'L':
      ######        if (memEQ(name, "FNDELAY", 7)) {
		    /*                   ^        */
		#ifdef FNDELAY
      ######          *iv_return = FNDELAY;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_EXLCK", 7)) {
		    /*                   ^        */
		#ifdef F_EXLCK
      ######          *iv_return = F_EXLCK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_RDLCK", 7)) {
		    /*                   ^        */
		#ifdef F_RDLCK
      ######          *iv_return = F_RDLCK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_SHLCK", 7)) {
		    /*                   ^        */
		#ifdef F_SHLCK
      ######          *iv_return = F_SHLCK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_UNLCK", 7)) {
		    /*                   ^        */
		#ifdef F_UNLCK
      ######          *iv_return = F_UNLCK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_WRLCK", 7)) {
		    /*                   ^        */
		#ifdef F_WRLCK
      ######          *iv_return = F_WRLCK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IFLNK", 7)) {
		    /*                   ^        */
		#ifdef S_IFLNK
      ######          *iv_return = S_IFLNK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           1        break;
		  case 'O':
           1        if (memEQ(name, "S_IROTH", 7)) {
		    /*                   ^        */
		#ifdef S_IROTH
      ######          *iv_return = S_IROTH;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           1        if (memEQ(name, "S_IWOTH", 7)) {
		    /*                   ^        */
		#ifdef S_IWOTH
           1          *iv_return = S_IWOTH;
           1          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IXOTH", 7)) {
		    /*                   ^        */
		#ifdef S_IXOTH
      ######          *iv_return = S_IXOTH;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'P':
      ######        if (memEQ(name, "F_DUPFD", 7)) {
		    /*                   ^        */
		#ifdef F_DUPFD
      ######          *iv_return = F_DUPFD;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'R':
      ######        if (memEQ(name, "S_IFREG", 7)) {
		    /*                   ^        */
		#ifdef S_IFREG
      ######          *iv_return = S_IFREG;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'S':
      ######        if (memEQ(name, "F_POSIX", 7)) {
		    /*                   ^        */
		#ifdef F_POSIX
		      *iv_return = F_POSIX;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
           4        break;
		  case 'T':
           4        if (memEQ(name, "F_GETFD", 7)) {
		    /*                   ^        */
		#ifdef F_GETFD
      ######          *iv_return = F_GETFD;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           4        if (memEQ(name, "F_GETFL", 7)) {
		    /*                   ^        */
		#ifdef F_GETFL
           2          *iv_return = F_GETFL;
           2          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           2        if (memEQ(name, "F_GETLK", 7)) {
		    /*                   ^        */
		#ifdef F_GETLK
      ######          *iv_return = F_GETLK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           2        if (memEQ(name, "F_SETFD", 7)) {
		    /*                   ^        */
		#ifdef F_SETFD
      ######          *iv_return = F_SETFD;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           2        if (memEQ(name, "F_SETFL", 7)) {
		    /*                   ^        */
		#ifdef F_SETFL
           2          *iv_return = F_SETFL;
           2          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_SETLK", 7)) {
		    /*                   ^        */
		#ifdef F_SETLK
      ######          *iv_return = F_SETLK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_ISTXT", 7)) {
		    /*                   ^        */
		#ifdef S_ISTXT
		      *iv_return = S_ISTXT;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
           3        break;
		  case 'U':
           3        if (memEQ(name, "O_TRUNC", 7)) {
		    /*                   ^        */
		#ifdef O_TRUNC
           3          *iv_return = O_TRUNC;
           3          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IRUSR", 7)) {
		    /*                   ^        */
		#ifdef S_IRUSR
      ######          *iv_return = S_IRUSR;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_ISUID", 7)) {
		    /*                   ^        */
		#ifdef S_ISUID
      ######          *iv_return = S_ISUID;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IWUSR", 7)) {
		    /*                   ^        */
		#ifdef S_IWUSR
      ######          *iv_return = S_IWUSR;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IXUSR", 7)) {
		    /*                   ^        */
		#ifdef S_IXUSR
      ######          *iv_return = S_IXUSR;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'V':
      ######        if (memEQ(name, "S_ISVTX", 7)) {
		    /*                   ^        */
		#ifdef S_ISVTX
      ######          *iv_return = S_ISVTX;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'W':
      ######        if (memEQ(name, "S_IFWHT", 7)) {
		    /*                   ^        */
		#ifdef S_IFWHT
		      *iv_return = S_IFWHT;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IRWXG", 7)) {
		    /*                   ^        */
		#ifdef S_IRWXG
      ######          *iv_return = S_IRWXG;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IRWXO", 7)) {
		    /*                   ^        */
		#ifdef S_IRWXO
      ######          *iv_return = S_IRWXO;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IRWXU", 7)) {
		    /*                   ^        */
		#ifdef S_IRWXU
      ######          *iv_return = S_IRWXU;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'X':
      ######        if (memEQ(name, "S_IEXEC", 7)) {
		    /*                   ^        */
		#ifdef S_IEXEC
      ######          *iv_return = S_IEXEC;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'Y':
      ######        if (memEQ(name, "F_FSYNC", 7)) {
		    /*                   ^        */
		#ifdef F_FSYNC
		      *iv_return = F_FSYNC;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "O_ASYNC", 7)) {
		    /*                   ^        */
		#ifdef O_ASYNC
      ######          *iv_return = O_ASYNC;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "O_DSYNC", 7)) {
		    /*                   ^        */
		#ifdef O_DSYNC
      ######          *iv_return = O_DSYNC;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "O_RSYNC", 7)) {
		    /*                   ^        */
		#ifdef O_RSYNC
      ######          *iv_return = O_RSYNC;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
          15        break;
		  case '_':
          15        if (memEQ(name, "LOCK_EX", 7)) {
		    /*                   ^        */
		#ifdef LOCK_EX
           2          *iv_return = LOCK_EX;
           2          return PERL_constant_ISIV;
		#else
		      *iv_return = 2;
		      return PERL_constant_ISIV;
		#endif
		    }
          13        if (memEQ(name, "LOCK_NB", 7)) {
		    /*                   ^        */
		#ifdef LOCK_NB
      ######          *iv_return = LOCK_NB;
      ######          return PERL_constant_ISIV;
		#else
		      *iv_return = 4;
		      return PERL_constant_ISIV;
		#endif
		    }
          13        if (memEQ(name, "LOCK_RW", 7)) {
		    /*                   ^        */
		#ifdef LOCK_RW
      ######          *iv_return = LOCK_RW;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
          13        if (memEQ(name, "LOCK_SH", 7)) {
		    /*                   ^        */
		#ifdef LOCK_SH
          12          *iv_return = LOCK_SH;
          12          return PERL_constant_ISIV;
		#else
		      *iv_return = 1;
		      return PERL_constant_ISIV;
		#endif
		    }
           1        if (memEQ(name, "LOCK_UN", 7)) {
		    /*                   ^        */
		#ifdef LOCK_UN
           1          *iv_return = LOCK_UN;
           1          return PERL_constant_ISIV;
		#else
		      *iv_return = 8;
		      return PERL_constant_ISIV;
		#endif
		    }
      ######        break;
		  }
      ######      return PERL_constant_NOTFOUND;
		}
		
		static int
          98    constant_8 (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.
		     F_COMPAT F_DUP2FD F_FREESP F_GETOWN F_GETSIG F_NOTIFY F_SETLKW F_SETOWN
		     F_SETSIG O_APPEND O_BINARY O_DIRECT O_EXLOCK O_NDELAY O_NOCTTY O_NOLINK
		     O_RANDOM O_RDONLY O_SHLOCK O_WRONLY SEEK_CUR SEEK_END SEEK_SET S_IFSOCK
		     S_IWRITE */
		  /* Offset 6 gives the best switch position.  */
          98      switch (name[6]) {
		  case 'A':
      ######        if (memEQ(name, "F_COMPAT", 8)) {
		    /*                     ^       */
		#ifdef F_COMPAT
		      *iv_return = F_COMPAT;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "O_NDELAY", 8)) {
		    /*                     ^       */
		#ifdef O_NDELAY
      ######          *iv_return = O_NDELAY;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           6        break;
		  case 'C':
           6        if (memEQ(name, "O_DIRECT", 8)) {
		    /*                     ^       */
		#ifdef O_DIRECT
      ######          *iv_return = O_DIRECT;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           6        if (memEQ(name, "O_EXLOCK", 8)) {
		    /*                     ^       */
		#ifdef O_EXLOCK
		      *iv_return = O_EXLOCK;
		      return PERL_constant_ISIV;
		#else
           6          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "O_SHLOCK", 8)) {
		    /*                     ^       */
		#ifdef O_SHLOCK
		      *iv_return = O_SHLOCK;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IFSOCK", 8)) {
		    /*                     ^       */
		#ifdef S_IFSOCK
      ######          *iv_return = S_IFSOCK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           5        break;
		  case 'E':
           5        if (memEQ(name, "SEEK_SET", 8)) {
		    /*                     ^       */
		#ifdef SEEK_SET
           5          *iv_return = SEEK_SET;
           5          return PERL_constant_ISIV;
		#else
		      *iv_return = 0;
		      return PERL_constant_ISIV;
		#endif
		    }
      ######        break;
		  case 'F':
      ######        if (memEQ(name, "F_DUP2FD", 8)) {
		    /*                     ^       */
		#ifdef F_DUP2FD
		      *iv_return = F_DUP2FD;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_NOTIFY", 8)) {
		    /*                     ^       */
		#ifdef F_NOTIFY
      ######          *iv_return = F_NOTIFY;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'I':
      ######        if (memEQ(name, "F_GETSIG", 8)) {
		    /*                     ^       */
		#ifdef F_GETSIG
      ######          *iv_return = F_GETSIG;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_SETSIG", 8)) {
		    /*                     ^       */
		#ifdef F_SETSIG
      ######          *iv_return = F_SETSIG;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'K':
      ######        if (memEQ(name, "F_SETLKW", 8)) {
		    /*                     ^       */
		#ifdef F_SETLKW
      ######          *iv_return = F_SETLKW;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
          77        break;
		  case 'L':
          77        if (memEQ(name, "O_RDONLY", 8)) {
		    /*                     ^       */
		#ifdef O_RDONLY
          39          *iv_return = O_RDONLY;
          39          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
          38        if (memEQ(name, "O_WRONLY", 8)) {
		    /*                     ^       */
		#ifdef O_WRONLY
          38          *iv_return = O_WRONLY;
          38          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           2        break;
		  case 'N':
           2        if (memEQ(name, "O_APPEND", 8)) {
		    /*                     ^       */
		#ifdef O_APPEND
           1          *iv_return = O_APPEND;
           1          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           1        if (memEQ(name, "O_NOLINK", 8)) {
		    /*                     ^       */
		#ifdef O_NOLINK
		      *iv_return = O_NOLINK;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
           1        if (memEQ(name, "SEEK_END", 8)) {
		    /*                     ^       */
		#ifdef SEEK_END
           1          *iv_return = SEEK_END;
           1          return PERL_constant_ISIV;
		#else
		      *iv_return = 2;
		      return PERL_constant_ISIV;
		#endif
		    }
      ######        break;
		  case 'O':
      ######        if (memEQ(name, "O_RANDOM", 8)) {
		    /*                     ^       */
		#ifdef O_RANDOM
		      *iv_return = O_RANDOM;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
           6        break;
		  case 'R':
           6        if (memEQ(name, "O_BINARY", 8)) {
		    /*                     ^       */
		#ifdef O_BINARY
           6          *iv_return = O_BINARY;
           6          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'S':
      ######        if (memEQ(name, "F_FREESP", 8)) {
		    /*                     ^       */
		#ifdef F_FREESP
		      *iv_return = F_FREESP;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'T':
      ######        if (memEQ(name, "O_NOCTTY", 8)) {
		    /*                     ^       */
		#ifdef O_NOCTTY
      ######          *iv_return = O_NOCTTY;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "S_IWRITE", 8)) {
		    /*                     ^       */
		#ifdef S_IWRITE
      ######          *iv_return = S_IWRITE;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           2        break;
		  case 'U':
           2        if (memEQ(name, "SEEK_CUR", 8)) {
		    /*                     ^       */
		#ifdef SEEK_CUR
           2          *iv_return = SEEK_CUR;
           2          return PERL_constant_ISIV;
		#else
		      *iv_return = 1;
		      return PERL_constant_ISIV;
		#endif
		    }
      ######        break;
		  case 'W':
      ######        if (memEQ(name, "F_GETOWN", 8)) {
		    /*                     ^       */
		#ifdef F_GETOWN
      ######          *iv_return = F_GETOWN;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_SETOWN", 8)) {
		    /*                     ^       */
		#ifdef F_SETOWN
      ######          *iv_return = F_SETOWN;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  }
      ######      return PERL_constant_NOTFOUND;
		}
		
		static int
      ######    constant_9 (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.
		     DN_ACCESS DN_ATTRIB DN_CREATE DN_DELETE DN_MODIFY DN_RENAME FNONBLOCK
		     F_ALLOCSP F_FSYNC64 F_GETLK64 F_SETLK64 F_UNSHARE LOCK_MAND LOCK_READ
		     O_ACCMODE O_NOATIME O_NOTRANS */
		  /* Offset 3 gives the best switch position.  */
      ######      switch (name[3]) {
		  case 'A':
      ######        if (memEQ(name, "DN_ACCESS", 9)) {
		    /*                  ^           */
		#ifdef DN_ACCESS
      ######          *iv_return = DN_ACCESS;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "DN_ATTRIB", 9)) {
		    /*                  ^           */
		#ifdef DN_ATTRIB
      ######          *iv_return = DN_ATTRIB;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'C':
      ######        if (memEQ(name, "DN_CREATE", 9)) {
		    /*                  ^           */
		#ifdef DN_CREATE
      ######          *iv_return = DN_CREATE;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "O_ACCMODE", 9)) {
		    /*                  ^           */
		#ifdef O_ACCMODE
      ######          *iv_return = O_ACCMODE;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'D':
      ######        if (memEQ(name, "DN_DELETE", 9)) {
		    /*                  ^           */
		#ifdef DN_DELETE
      ######          *iv_return = DN_DELETE;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'E':
      ######        if (memEQ(name, "F_GETLK64", 9)) {
		    /*                  ^           */
		#ifdef F_GETLK64
      ######          *iv_return = F_GETLK64;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_SETLK64", 9)) {
		    /*                  ^           */
		#ifdef F_SETLK64
      ######          *iv_return = F_SETLK64;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'K':
      ######        if (memEQ(name, "LOCK_MAND", 9)) {
		    /*                  ^           */
		#ifdef LOCK_MAND
      ######          *iv_return = LOCK_MAND;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "LOCK_READ", 9)) {
		    /*                  ^           */
		#ifdef LOCK_READ
      ######          *iv_return = LOCK_READ;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'L':
      ######        if (memEQ(name, "F_ALLOCSP", 9)) {
		    /*                  ^           */
		#ifdef F_ALLOCSP
		      *iv_return = F_ALLOCSP;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'M':
      ######        if (memEQ(name, "DN_MODIFY", 9)) {
		    /*                  ^           */
		#ifdef DN_MODIFY
      ######          *iv_return = DN_MODIFY;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'N':
      ######        if (memEQ(name, "FNONBLOCK", 9)) {
		    /*                  ^           */
		#ifdef FNONBLOCK
      ######          *iv_return = FNONBLOCK;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_UNSHARE", 9)) {
		    /*                  ^           */
		#ifdef F_UNSHARE
		      *iv_return = F_UNSHARE;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'O':
      ######        if (memEQ(name, "O_NOATIME", 9)) {
		    /*                  ^           */
		#ifdef O_NOATIME
		      *iv_return = O_NOATIME;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "O_NOTRANS", 9)) {
		    /*                  ^           */
		#ifdef O_NOTRANS
		      *iv_return = O_NOTRANS;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'R':
      ######        if (memEQ(name, "DN_RENAME", 9)) {
		    /*                  ^           */
		#ifdef DN_RENAME
      ######          *iv_return = DN_RENAME;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'S':
      ######        if (memEQ(name, "F_FSYNC64", 9)) {
		    /*                  ^           */
		#ifdef F_FSYNC64
		      *iv_return = F_FSYNC64;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  }
      ######      return PERL_constant_NOTFOUND;
		}
		
		static int
           8    constant_10 (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.
		     FD_CLOEXEC FLARGEFILE F_FREESP64 F_GETLEASE F_SETLEASE F_SETLKW64
		     LOCK_WRITE O_NOFOLLOW O_NONBLOCK */
		  /* Offset 7 gives the best switch position.  */
           8      switch (name[7]) {
		  case 'A':
      ######        if (memEQ(name, "F_GETLEASE", 10)) {
		    /*                      ^         */
		#ifdef F_GETLEASE
      ######          *iv_return = F_GETLEASE;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "F_SETLEASE", 10)) {
		    /*                      ^         */
		#ifdef F_SETLEASE
      ######          *iv_return = F_SETLEASE;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'I':
      ######        if (memEQ(name, "FLARGEFILE", 10)) {
		    /*                      ^         */
		#ifdef FLARGEFILE
		      *iv_return = FLARGEFILE;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        if (memEQ(name, "LOCK_WRITE", 10)) {
		    /*                      ^         */
		#ifdef LOCK_WRITE
      ######          *iv_return = LOCK_WRITE;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           6        break;
		  case 'L':
           6        if (memEQ(name, "O_NOFOLLOW", 10)) {
		    /*                      ^         */
		#ifdef O_NOFOLLOW
           6          *iv_return = O_NOFOLLOW;
           6          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           2        break;
		  case 'O':
           2        if (memEQ(name, "O_NONBLOCK", 10)) {
		    /*                      ^         */
		#ifdef O_NONBLOCK
           2          *iv_return = O_NONBLOCK;
           2          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'P':
      ######        if (memEQ(name, "F_FREESP64", 10)) {
		    /*                      ^         */
		#ifdef F_FREESP64
		      *iv_return = F_FREESP64;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'W':
      ######        if (memEQ(name, "F_SETLKW64", 10)) {
		    /*                      ^         */
		#ifdef F_SETLKW64
      ######          *iv_return = F_SETLKW64;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'X':
      ######        if (memEQ(name, "FD_CLOEXEC", 10)) {
		    /*                      ^         */
		#ifdef FD_CLOEXEC
      ######          *iv_return = FD_CLOEXEC;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  }
      ######      return PERL_constant_NOTFOUND;
		}
		
		static int
          18    constant_11 (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.
		     F_ALLOCSP64 O_DIRECTORY O_LARGEFILE O_NOINHERIT O_TEMPORARY */
		  /* Offset 5 gives the best switch position.  */
          18      switch (name[5]) {
		  case 'E':
      ######        if (memEQ(name, "O_DIRECTORY", 11)) {
		    /*                    ^            */
		#ifdef O_DIRECTORY
      ######          *iv_return = O_DIRECTORY;
      ######          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           6        break;
		  case 'G':
           6        if (memEQ(name, "O_LARGEFILE", 11)) {
		    /*                    ^            */
		#ifdef O_LARGEFILE
           6          *iv_return = O_LARGEFILE;
           6          return PERL_constant_ISIV;
		#else
		      return PERL_constant_NOTDEF;
		#endif
		    }
           6        break;
		  case 'N':
           6        if (memEQ(name, "O_NOINHERIT", 11)) {
		    /*                    ^            */
		#ifdef O_NOINHERIT
		      *iv_return = O_NOINHERIT;
		      return PERL_constant_ISIV;
		#else
           6          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  case 'O':
      ######        if (memEQ(name, "F_ALLOCSP64", 11)) {
		    /*                    ^            */
		#ifdef F_ALLOCSP64
		      *iv_return = F_ALLOCSP64;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
           6        break;
		  case 'P':
           6        if (memEQ(name, "O_TEMPORARY", 11)) {
		    /*                    ^            */
		#ifdef O_TEMPORARY
		      *iv_return = O_TEMPORARY;
		      return PERL_constant_ISIV;
		#else
           6          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  }
      ######      return PERL_constant_NOTFOUND;
		}
		
		static int
         262    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
		
		#!/home/nick/Perl/25060-g-gcov/miniperl -w
		use ExtUtils::Constant qw (constant_types C_constant XS_constant);
		
		my $types = {map {($_, 1)} qw(IV)};
		my @names = (qw(DN_ACCESS DN_ATTRIB DN_CREATE DN_DELETE DN_MODIFY DN_MULTISHOT
			       DN_RENAME FAPPEND FASYNC FCREAT FDEFER FDSYNC FD_CLOEXEC FEXCL
			       FLARGEFILE FNDELAY FNONBLOCK FRSYNC FSYNC FTRUNC F_ALLOCSP
			       F_ALLOCSP64 F_COMPAT F_DUP2FD F_DUPFD F_EXLCK F_FREESP
			       F_FREESP64 F_FSYNC F_FSYNC64 F_GETFD F_GETFL F_GETLEASE F_GETLK
			       F_GETLK64 F_GETOWN F_GETSIG F_NODNY F_NOTIFY F_POSIX F_RDACC
			       F_RDDNY F_RDLCK F_RWACC F_RWDNY F_SETFD F_SETFL F_SETLEASE
			       F_SETLK F_SETLK64 F_SETLKW F_SETLKW64 F_SETOWN F_SETSIG F_SHARE
			       F_SHLCK F_UNLCK F_UNSHARE F_WRACC F_WRDNY F_WRLCK LOCK_MAND
			       LOCK_READ LOCK_RW LOCK_WRITE O_ACCMODE O_ALIAS O_APPEND O_ASYNC
			       O_BINARY O_CREAT O_DEFER O_DIRECT O_DIRECTORY O_DSYNC O_EXCL
			       O_EXLOCK O_IGNORE_CTTY O_LARGEFILE O_NDELAY O_NOATIME O_NOCTTY
			       O_NOFOLLOW O_NOINHERIT O_NOLINK O_NONBLOCK O_NOTRANS O_RANDOM
			       O_RAW O_RDONLY O_RDWR O_RSRC O_RSYNC O_SEQUENTIAL O_SHLOCK
			       O_SYNC O_TEMPORARY O_TEXT O_TRUNC O_WRONLY S_ENFMT S_IEXEC
			       S_IFBLK S_IFCHR S_IFDIR S_IFIFO S_IFLNK S_IFREG S_IFSOCK S_IFWHT
			       S_IREAD S_IRGRP S_IROTH S_IRUSR S_IRWXG S_IRWXO S_IRWXU S_ISGID
			       S_ISTXT S_ISUID S_ISVTX S_IWGRP S_IWOTH S_IWRITE S_IWUSR S_IXGRP
			       S_IXOTH S_IXUSR),
		            {name=>"LOCK_EX", type=>"IV", default=>["IV", "2"]},
		            {name=>"LOCK_NB", type=>"IV", default=>["IV", "4"]},
		            {name=>"LOCK_SH", type=>"IV", default=>["IV", "1"]},
		            {name=>"LOCK_UN", type=>"IV", default=>["IV", "8"]},
		            {name=>"SEEK_CUR", type=>"IV", default=>["IV", "1"]},
		            {name=>"SEEK_END", type=>"IV", default=>["IV", "2"]},
		            {name=>"SEEK_SET", type=>"IV", default=>["IV", "0"]},
		            {name=>"_S_IFMT", type=>"IV", macro=>"S_IFMT", value=>"S_IFMT"});
		
		print constant_types(); # macro defs
		foreach (C_constant ("Fcntl", 'constant', 'IV', $types, undef, 3, @names) ) {
		    print $_, "\n"; # C constant subs
		}
		print "#### XS Section:\n";
		print XS_constant ("Fcntl", $types);
		__END__
		   */
		
         262      switch (len) {
		  case 5:
      ######        return constant_5 (aTHX_ name, iv_return);
          59        break;
		  case 6:
          59        return constant_6 (aTHX_ name, iv_return);
          79        break;
		  case 7:
          79        return constant_7 (aTHX_ name, iv_return);
          98        break;
		  case 8:
          98        return constant_8 (aTHX_ name, iv_return);
      ######        break;
		  case 9:
      ######        return constant_9 (aTHX_ name, iv_return);
           8        break;
		  case 10:
           8        return constant_10 (aTHX_ name, iv_return);
          18        break;
		  case 11:
          18        return constant_11 (aTHX_ name, iv_return);
      ######        break;
		  case 12:
		    /* Names all of length 12.  */
		    /* DN_MULTISHOT O_SEQUENTIAL */
		    /* Offset 8 gives the best switch position.  */
      ######        switch (name[8]) {
		    case 'S':
      ######          if (memEQ(name, "DN_MULTISHOT", 12)) {
		      /*                       ^          */
		#ifdef DN_MULTISHOT
      ######            *iv_return = DN_MULTISHOT;
      ######            return PERL_constant_ISIV;
		#else
		        return PERL_constant_NOTDEF;
		#endif
		      }
      ######          break;
		    case 'T':
      ######          if (memEQ(name, "O_SEQUENTIAL", 12)) {
		      /*                       ^          */
		#ifdef O_SEQUENTIAL
		        *iv_return = O_SEQUENTIAL;
		        return PERL_constant_ISIV;
		#else
      ######            return PERL_constant_NOTDEF;
		#endif
		      }
      ######          break;
		    }
      ######        break;
		  case 13:
      ######        if (memEQ(name, "O_IGNORE_CTTY", 13)) {
		#ifdef O_IGNORE_CTTY
		      *iv_return = O_IGNORE_CTTY;
		      return PERL_constant_ISIV;
		#else
      ######          return PERL_constant_NOTDEF;
		#endif
		    }
      ######        break;
		  }
      ######      return PERL_constant_NOTFOUND;
		}