pike.git / src / pike_types.cmod

version» Context lines:

pike.git/src/pike_types.cmod:75:   PMOD_EXPORT struct pike_string *literal_float_string;   PMOD_EXPORT struct pike_string *literal_function_string;   PMOD_EXPORT struct pike_string *literal_object_string;   PMOD_EXPORT struct pike_string *literal_program_string;   PMOD_EXPORT struct pike_string *literal_array_string;   PMOD_EXPORT struct pike_string *literal_multiset_string;   PMOD_EXPORT struct pike_string *literal_mapping_string;   PMOD_EXPORT struct pike_string *literal_type_string;   PMOD_EXPORT struct pike_string *literal_mixed_string;    + PMOD_EXPORT struct pike_string *unknown_function_string; +    /* Special case for converting T_ZERO into int(0) during processing.    * Note that int(0) is usually automatically converted into T_ZERO,    * so we need to define the type by hand explicitly here.    */   static struct pike_type int0_type_string_storage = {    GC_HEADER_INIT(1),    0,    NULL,    0,    T_INT,
pike.git/src/pike_types.cmod:15031:    literal_float_string = make_shared_string("float");    literal_function_string = make_shared_string("function");    literal_object_string = make_shared_string("object");    literal_program_string = make_shared_string("program");    literal_array_string = make_shared_string("array");    literal_multiset_string = make_shared_string("multiset");    literal_mapping_string = make_shared_string("mapping");    literal_type_string = make_shared_string("type");    literal_mixed_string = make_shared_string("mixed");    +  unknown_function_string = make_shared_string("unknown function"); +    #ifdef PIKE_DEBUG    pike_type_gc_callback = add_gc_callback(gc_mark_external_types, NULL, NULL);   #endif       INIT;   }      void cleanup_pike_types(void)   {    EXIT;
pike.git/src/pike_types.cmod:15126:    free_string(literal_float_string); literal_float_string = NULL;    free_string(literal_function_string); literal_function_string = NULL;    free_string(literal_object_string); literal_object_string = NULL;    free_string(literal_program_string); literal_program_string = NULL;    free_string(literal_array_string); literal_array_string = NULL;    free_string(literal_multiset_string); literal_multiset_string = NULL;    free_string(literal_mapping_string); literal_mapping_string = NULL;    free_string(literal_type_string); literal_type_string = NULL;    free_string(literal_mixed_string); literal_mixed_string = NULL;    +  free_string(unknown_function_string); unknown_function_string = NULL; +    #ifdef PIKE_DEBUG    remove_callback(pike_type_gc_callback);   #endif   }      void cleanup_pike_type_table(void)   {    /* Free the hashtable here. */    if (pike_type_hash) {    free(pike_type_hash);