pike.git / src / svalue.h

version» Context lines:

pike.git/src/svalue.h:149:    * a non-zero function number in the next 8 bits.    *    * Bit 15 (0x8000) indicates that cdr is a type-node.    *    * Note that this overlaps with the PIKE_T_NO_REF_FLAG,    * but that should be safe, as operators aren't valid    * run-time types.    */    PIKE_T_OPERATOR = 0x0080,    PIKE_T_FIND_LFUN = 0x0180, /* Look up an lfun in an object type. */ +  PIKE_T_GET_RETURN = 0x0280, /* Get the return type for a function. */ +     PIKE_T_SET_CAR = 0x8280, /* Set the CAR of the CAR type to CDR. */    PIKE_T_SET_CDR = 0x8380, /* Set the CDR of the CAR type to CDR. */       PIKE_T_TRANSITIVE = 0x00c0, /* Repeatedly apply a function type. */      /*    * The following types are only used in compile-time types and    * as markers in struct identifier.    */   
pike.git/src/svalue.h:398:   #define tName1(X,Y) "\361\1" X "\0\0" Y   #define tName2(X,Y) "\361\2" X "\0\0\0\0" Y   #endif /* PIKE_BYTEORDER == 1234 */      /* Some convenience macros for common attributes. */   #define tSprintfFormat(X) tAttr("sprintf_format", X)   #define tSprintfArgs(X) tAttr("sprintf_args", X)   #define tDeprecated(X) tAttr("deprecated", X)   #define tUtf8Str tAttr("utf8", tStr8)    + #define tGetReturn(X) "\200\002" X   #define tFindLFun(X, LFUN) "\200\001" X LFUN "\0"   #define tSetCar(X, Y) "\200\202" X Y   #define tSetCdr(X, Y) "\200\203" X Y      #define tTransitive(X, Y) "\300" X Y      #define tSimpleCallable tOr3(tArray,tFunction,tObj)   #define tCallable tOr3(tArr(tSimpleCallable),tFunction,tObj)      #define BIT_ARRAY (1<<PIKE_T_ARRAY)