view release on metacpan or  search on metacpan

Ctport.ph  view on Meta::CPAN

    eval 'sub SegOff {
        local($struc, $member) = @_;
        eval "(( &NINT)&((($struc *)0)->$member))";
    }';
    eval 'sub ArraySegOff {
        local($struc, $member) = @_;
        eval "(( &NINT) ((($struc *)0)->$member))";
    }';
    if (!defined &ctDTYPES) {
	eval 'sub ctDTYPES {1;}';
	eval 'sub CT_BOOL {(1 << 3);}';
	eval 'sub CT_CHAR {(2 << 3);}';
	eval 'sub CT_CHARU {(3 << 3);}';
	eval 'sub CT_INT2 {((4 << 3) + 1);}';
	eval 'sub CT_INT2U {((5 << 3) + 1);}';
	eval 'sub CT_INT4 {((6 << 3) + 3);}';
	eval 'sub CT_INT4U {((7 << 3) + 3);}';
	eval 'sub CT_MONEY {((8 << 3) + 3);}';
	eval 'sub CT_DATE {((9 << 3) + 3);}';
	eval 'sub CT_TIME {((10 << 3) + 3);}';
	eval 'sub CT_SFLOAT {((11 << 3) + 3);}';
	eval 'sub CT_DFLOAT {((12 << 3) + 7);}';
	eval 'sub CT_SQLBCDold {((13 << 3) + 3);}';
	eval 'sub CT_SQLBCD {((13 << 3) + 4);}';
	eval 'sub CT_EFLOAT {((14 << 3) + 7);}';
	eval 'sub CT_TIMESold {((15 << 3) + 3);}';
	eval 'sub CT_TIMES {((15 << 3) + 4);}';
	eval 'sub CT_ARRAY {(16 << 3);}';
	eval 'sub CT_RESRVD {(17 << 3);}';
	eval 'sub CT_FSTRING {(18 << 3);}';
	eval 'sub CT_FPSTRING {(19 << 3);}';
	eval 'sub CT_F2STRING {(20 << 3);}';
	eval 'sub CT_F4STRING {(21 << 3);}';
	eval 'sub CT_STRING {( &CT_FSTRING + 2);}';
	eval 'sub CT_PSTRING {( &CT_FPSTRING + 2);}';
	eval 'sub CT_2STRING {( &CT_F2STRING + 2);}';
	eval 'sub CT_4STRING {( &CT_F4STRING + 2);}';
	eval 'sub CT_LAST { &CT_4STRING;}';
    }
    eval 'sub CT_STRFLT {( &CT_LAST + 1);}';
    eval 'sub CT_STRLNG {( &CT_LAST + 2);}';
    eval 'sub CT_NUMSTR {( &CT_LAST + 3);}';
    eval 'sub CT_DBLSTR {( &CT_LAST + 4);}';
    eval 'sub CT_SUBSTR {( &CT_LAST + 5);}';
    eval 'sub CT_WLDCRD {( &CT_LAST + 6);}';
    eval 'sub SEC_FILEWORD {1;}';
    eval 'sub SEC_FILEGRUP {2;}';
    eval 'sub SEC_FILEMASK {3;}';
    eval 'sub SEC_FILEOWNR {4;}';
    eval 'sub ctSEGLEN {1;}';
    eval 'sub ctSEGMOD {2;}';
    eval 'sub ctSEGPOS {3;}';
    eval 'sub DataBufferRequests {0;}';
    eval 'sub DataBufferHits {1;}';
    eval 'sub IndexBufferRequests {2;}';
    eval 'sub IndexBufferHits {3;}';
    eval 'sub NbrReadOperations {4;}';
    eval 'sub NbrBytesRead {5;}';
    eval 'sub NbrWriteOperations {6;}';
    eval 'sub NbrBytesWritten {7;}';
    eval 'sub updateIFIL {-99;}';
    eval 'sub cfgFILES {0;}';
    eval 'sub cfgUSERS {1;}';
    eval 'sub cfgIDX_MEMORY {2;}';
    eval 'sub cfgDAT_MEMORY {3;}';
    eval 'sub cfgTOT_MEMORY {4;}';
    eval 'sub cfgUSR_MEMORY {5;}';
    eval 'sub cfgPREIMAGE_FILE {6;}';
    eval 'sub cfgPAGE_SIZE {7;}';
    eval 'sub cfgCOMMIT {8;}';
    eval 'sub cfgLOG_SPACE {9;}';
    eval 'sub cfgLOG_EVEN {10;}';
    eval 'sub cfgLOG_ODD {11;}';
    eval 'sub cfgSTART_EVEN {12;}';
    eval 'sub cfgSTART_ODD {13;}';
    eval 'sub cfgSERVER_DIRECTORY {14;}';
    eval 'sub cfgLOCAL_DIRECTORY {15;}';
    eval 'sub cfgSERVER_NAME {16;}';
    eval 'sub cfgDUMP {17;}';
    eval 'sub cfgSQL_TABLES {18;}';
    eval 'sub cfgKEEP_LOGS {19;}';
    eval 'sub cfgCOMM_PROTOCOL {20;}';
    eval 'sub cfgSQL_SUPERFILES {21;}';
    eval 'sub cfgLIST_MEMORY {22;}';
    eval 'sub cfgSORT_MEMORY {23;}';
    eval 'sub cfgBUFR_MEMORY {24;}';
    eval 'sub cfgPREIMAGE_HASH {25;}';
    eval 'sub cfgLOCK_HASH {26;}';
    eval 'sub cfgUSR_MEM_RULE {27;}';
    eval 'sub cfgGUEST_MEMORY {28;}';
    eval 'sub cfgQUERY_MEMORY {29;}';
    eval 'sub cfgTRAN_TIMEOUT {30;}';
    eval 'sub cfgMAX_DAT_KEY {31;}';
    eval 'sub cfgSQL_DEBUG {32;}';
    eval 'sub cfgSEMAPHORE_BLK {33;}';
    eval 'sub cfgSESSION_TIMEOUT {34;}';
    eval 'sub cfgTASKER_SLEEP {35;}';
    eval 'sub cfgFILE_HANDLES {36;}';
    eval 'sub cfgMEMORY_MONITOR {37;}';
    eval 'sub cfgTASKER_PC {38;}';
    eval 'sub cfgTASKER_SP {39;}';
    eval 'sub cfgTASKER_NP {40;}';
    eval 'sub cfgNODE_DELAY {41;}';
    eval 'sub cfgDEADLOCK_MONITOR {42;}';
    eval 'sub cfgNODEQ_MONITOR {43;}';
    eval 'sub cfgCOMMIT_DELAY {44;}';
    eval 'sub cfgCHECKPOINT_MONITOR {45;}';
    eval 'sub cfgNODEQ_SEARCH {46;}';
    eval 'sub cfgMAX_KEY_SEG {47;}';
    eval 'sub cfgFUNCTION_MONITOR {48;}';
    eval 'sub cfgTASKER_LOOP {49;}';
    eval 'sub cfgREQUEST_DELAY {50;}';
    eval 'sub cfgREQUEST_DELTA {51;}';
    eval 'sub cfg9074_MONITOR {52;}';
    eval 'sub cfg9477_MONITOR {53;}';
    eval 'sub cfgSKIP_MISSING_FILES {54;}';
    eval 'sub cfgTMPNAME_PATH {55;}';
    eval 'sub cfgLOG_EVEN_MIRROR {56;}';
    eval 'sub cfgLOG_ODD_MIRROR {57;}';
    eval 'sub cfgSTART_EVEN_MIRROR {58;}';
    eval 'sub cfgSTART_ODD_MIRROR {59;}';